]> git.saurik.com Git - wxWidgets.git/blame - src/mac/classic/listbox.cpp
projects / wxWidgets.git / blame
? search:
summary | shortlog | log | commit | commitdiff | tree
blob | blame (incremental) | history | HEAD
implemented Freeze/Thaw() (patch 922156)
[wxWidgets.git] / src / mac / classic / listbox.cpp
CommitLineData
2646f485
SC		 1///////////////////////////////////////////////////////////////////////////////
2// Name: listbox.cpp
3// Purpose: wxListBox
4// Author: Stefan Csomor
5// Modified by:
6// Created: 1998-01-01
7// RCS-ID: $Id$
8// Copyright: (c) Stefan Csomor
9// Licence: wxWindows licence
10///////////////////////////////////////////////////////////////////////////////
11
12#ifdef __GNUG__
13#pragma implementation "listbox.h"
14#endif
15
16#include "wx/app.h"
17#include "wx/listbox.h"
18#include "wx/button.h"
19#include "wx/settings.h"
20#include "wx/toplevel.h"
21#include "wx/dynarray.h"
22#include "wx/log.h"
23
24#include "wx/utils.h"
25
26#if !USE_SHARED_LIBRARY
27IMPLEMENT_DYNAMIC_CLASS(wxListBox, wxControl)
28
29BEGIN_EVENT_TABLE(wxListBox, wxControl)
30 EVT_SIZE( wxListBox::OnSize )
31 EVT_CHAR( wxListBox::OnChar )
32END_EVENT_TABLE()
33#endif
34
35#include "wx/mac/uma.h"
36
37#if PRAGMA_STRUCT_ALIGN
38 #pragma options align=mac68k
39#elif PRAGMA_STRUCT_PACKPUSH
40 #pragma pack(push, 2)
41#elif PRAGMA_STRUCT_PACK
42 #pragma pack(2)
43#endif
44
45typedef struct {
46 unsigned short instruction;
47 void (*function)();
48} ldefRec, *ldefPtr, **ldefHandle;
49
50#if PRAGMA_STRUCT_ALIGN
51 #pragma options align=reset
52#elif PRAGMA_STRUCT_PACKPUSH
53 #pragma pack(pop)
54#elif PRAGMA_STRUCT_PACK
55 #pragma pack()
56#endif
57
58#if TARGET_CARBON
59const short kwxMacListItemHeight = 19 ;
60#else
61const short kwxMacListItemHeight = 14 ;
62#endif
63
64extern "C"
65{
66static pascal void wxMacListDefinition( short message, Boolean isSelected, Rect *drawRect,
67 Cell cell, short dataOffset, short dataLength,
68 ListHandle listHandle ) ;
69}
70
71static pascal void wxMacListDefinition( short message, Boolean isSelected, Rect *drawRect,
72 Cell cell, short dataOffset, short dataLength,
73 ListHandle listHandle )
74{
75 wxListBox* list;
76 list = (wxListBox*) GetControlReference( (ControlHandle) GetListRefCon(listHandle) );
77 if ( list == NULL )
78 return ;
79
80 GrafPtr savePort;
81 GrafPtr grafPtr;
82 RgnHandle savedClipRegion;
83 SInt32 savedPenMode;
84 GetPort(&savePort);
85 SetPort((**listHandle).port);
86 grafPtr = (**listHandle).port ;
87 // typecast our refCon
88
89 // Calculate the cell rect.
90
91 switch( message ) {
92 case lInitMsg:
93 break;
94
95 case lCloseMsg:
96 break;
97
98 case lDrawMsg:
99 {
100 const wxString linetext = list->m_stringArray[cell.v] ;
101
102 // Save the current clip region, and set the clip region to the area we are about
103 // to draw.
104
105 savedClipRegion = NewRgn();
106 GetClip( savedClipRegion );
107
108 ClipRect( drawRect );
109 EraseRect( drawRect );
110
111 const wxFont& font = list->GetFont();
112 if ( font.Ok() )
113 {
114 ::TextFont( font.GetMacFontNum() ) ;
115 ::TextSize( font.GetMacFontSize() ) ;
116 ::TextFace( font.GetMacFontStyle() ) ;
117 }
118 else
119 {
120 ::TextFont( kFontIDMonaco ) ;
121 ::TextSize( 9 );
122 ::TextFace( 0 ) ;
123 }
124
125#if TARGET_CARBON
126 {
127 Rect frame = { drawRect->top, drawRect->left + 4,
128 drawRect->top + kwxMacListItemHeight, drawRect->right + 10000 } ;
129 CFMutableStringRef mString = CFStringCreateMutableCopy( NULL , 0 , wxMacCFStringHolder(linetext , list->GetFont().GetEncoding()) ) ;
130 ::TruncateThemeText( mString , kThemeCurrentPortFont, kThemeStateActive, drawRect->right - drawRect->left , truncEnd , NULL ) ;
131 ::DrawThemeTextBox( mString,
132 kThemeCurrentPortFont,
133 kThemeStateActive,
134 false,
135 &frame,
136 teJustLeft,
137 nil );
138 CFRelease( mString ) ;
139 }
140#else
141 {
142 wxCharBuffer text = linetext.mb_str( wxConvLocal) ;
143 MoveTo(drawRect->left + 4 , drawRect->top + 10 );
144 DrawText(text, 0 , strlen(text) );
145 }
146#endif
147 // If the cell is hilited, do the hilite now. Paint the cell contents with the
148 // appropriate QuickDraw transform mode.
149
150 if( isSelected ) {
151 savedPenMode = GetPortPenMode( (CGrafPtr) grafPtr );
152 SetPortPenMode( (CGrafPtr)grafPtr, hilitetransfermode );
153 PaintRect( drawRect );
154 SetPortPenMode( (CGrafPtr)grafPtr, savedPenMode );
155 }
156
157 // Restore the saved clip region.
158
159 SetClip( savedClipRegion );
160 DisposeRgn( savedClipRegion );
161 }
162 break;
163 case lHiliteMsg:
164
165 // Hilite or unhilite the cell. Paint the cell contents with the
166 // appropriate QuickDraw transform mode.
167
168 GetPort( &grafPtr );
169 savedPenMode = GetPortPenMode( (CGrafPtr)grafPtr );
170 SetPortPenMode( (CGrafPtr)grafPtr, hilitetransfermode );
171 PaintRect( drawRect );
172 SetPortPenMode( (CGrafPtr)grafPtr, savedPenMode );
173 break;
174 default :
175 break ;
176 }
177 SetPort(savePort);
178}
179
180extern "C" void MacDrawStringCell(Rect *cellRect, Cell lCell, ListHandle theList, long refCon) ;
181// resources ldef ids
182const short kwxMacListWithVerticalScrollbar = 128 ;
183const short kwxMacListWithVerticalAndHorizontalScrollbar = 129 ;
184
185// ============================================================================
186// list box control implementation
187// ============================================================================
188
189// Listbox item
190wxListBox::wxListBox()
191{
192 m_noItems = 0;
193 m_selected = 0;
194 m_macList = NULL ;
195}
196
197static ListDefUPP macListDefUPP = NULL ;
198
199bool wxListBox::Create(wxWindow *parent, wxWindowID id,
200 const wxPoint& pos,
201 const wxSize& size,
202 const wxArrayString& choices,
203 long style,
204 const wxValidator& validator,
205 const wxString& name)
206{
207 wxCArrayString chs(choices);
208
209 return Create(parent, id, pos, size, chs.GetCount(), chs.GetStrings(),
210 style, validator, name);
211}
212
213bool wxListBox::Create(wxWindow *parent, wxWindowID id,
214 const wxPoint& pos,
215 const wxSize& size,
216 int n, const wxString choices[],
217 long style,
218 const wxValidator& validator,
219 const wxString& name)
220{
221 if ( !wxListBoxBase::Create(parent, id, pos, size, style & ~(wxHSCROLL|wxVSCROLL), validator, name) )
222 return false;
223
224 m_noItems = 0 ; // this will be increased by our append command
225 m_selected = 0;
226
227 Rect bounds ;
228 Str255 title ;
229
230 MacPreControlCreate( parent , id , wxEmptyString , pos , size ,style, validator , name , &bounds , title ) ;
231
232 ListDefSpec listDef;
233 listDef.defType = kListDefUserProcType;
234 if ( macListDefUPP == NULL )
235 {
236 macListDefUPP = NewListDefUPP( wxMacListDefinition );
237 }
238 listDef.u.userProc = macListDefUPP ;
239
240 Str255 fontName ;
241 SInt16 fontSize ;
242 Style fontStyle ;
243#if TARGET_CARBON
244 GetThemeFont(kThemeViewsFont , GetApplicationScript() , fontName , &fontSize , &fontStyle ) ;
245#else
246 GetFontName( kFontIDMonaco , fontName ) ;
247 fontSize = 9 ;
248 fontStyle = normal ;
249#endif
250 SetFont( wxFont (fontSize, wxSWISS, wxNORMAL, wxNORMAL , false , wxMacMakeStringFromPascal( fontName ) ) ) ;
251#if TARGET_CARBON
252 Size asize;
253
254
255 CreateListBoxControl( MAC_WXHWND(parent->MacGetRootWindow()), &bounds, false, 0, 1, (style & wxLB_HSCROLL), true,
256 kwxMacListItemHeight, kwxMacListItemHeight, false, &listDef, (ControlRef *)&m_macControl );
257
258 GetControlData( (ControlHandle) m_macControl, kControlNoPart, kControlListBoxListHandleTag,
259 sizeof(ListHandle), (Ptr) &m_macList, &asize);
260
261 SetControlReference( (ControlHandle) m_macControl, (long) this);
262 SetControlVisibility( (ControlHandle) m_macControl, false, false);
263
264#else
265
266 long result ;
267 wxStAppResource resload ;
268 m_macControl = ::NewControl( MAC_WXHWND(parent->MacGetRootWindow()) , &bounds , title , false ,
269 (style & wxLB_HSCROLL) ? kwxMacListWithVerticalAndHorizontalScrollbar : kwxMacListWithVerticalScrollbar ,
270 0 , 0, kControlListBoxProc , (long) this ) ;
271 ::GetControlData( (ControlHandle) m_macControl , kControlNoPart , kControlListBoxListHandleTag ,
272 sizeof( ListHandle ) , (char*) &m_macList , &result ) ;
273
274 HLock( (Handle) m_macList ) ;
275 ldefHandle ldef ;
276 ldef = (ldefHandle) NewHandle( sizeof(ldefRec) ) ;
277 if ( (**(ListHandle)m_macList).listDefProc != NULL )
278 {
279 (**ldef).instruction = 0x4EF9; /* JMP instruction */
280 (**ldef).function = (void(*)()) listDef.u.userProc;
281 (**(ListHandle)m_macList).listDefProc = (Handle) ldef ;
282 }
283
284 Point pt = (**(ListHandle)m_macList).cellSize ;
285 pt.v = kwxMacListItemHeight ;
286 LCellSize( pt , (ListHandle)m_macList ) ;
287 LAddColumn( 1 , 0 , (ListHandle)m_macList ) ;
288#endif
289 OptionBits options = 0;
290 if ( style & wxLB_MULTIPLE )
291 {
292 options += lExtendDrag + lUseSense ;
293 }
294 else if ( style & wxLB_EXTENDED )
295 {
296 // default behaviour
297 }
298 else
299 {
300 options = (OptionBits) lOnlyOne ;
301 }
302 SetListSelectionFlags((ListHandle)m_macList, options);
303
304 for ( int i = 0 ; i < n ; i++ )
305 {
306 Append( choices[i] ) ;
307 }
308
309 MacPostControlCreate() ;
310
311 LSetDrawingMode( true , (ListHandle)m_macList ) ;
312
313 return TRUE;
314}
315
316wxListBox::~wxListBox()
317{
318 FreeData() ;
319 // avoid access during destruction
320 SetControlReference( (ControlHandle) m_macControl , NULL ) ;
321 if ( m_macList )
322 {
323#if !TARGET_CARBON
324 DisposeHandle( (**(ListHandle)m_macList).listDefProc ) ;
325 (**(ListHandle)m_macList).listDefProc = NULL ;
326#endif
327 m_macList = NULL ;
328 }
329}
330
331void wxListBox::FreeData()
332{
333#if wxUSE_OWNER_DRAWN
334 if ( m_windowStyle & wxLB_OWNERDRAW )
335 {
336 size_t uiCount = m_aItems.Count();
337 while ( uiCount-- != 0 ) {
338 delete m_aItems[uiCount];
339 m_aItems[uiCount] = NULL;
340 }
341
342 m_aItems.Clear();
343 }
344 else
345#endif // wxUSE_OWNER_DRAWN
346 if ( HasClientObjectData() )
347 {
348 for ( size_t n = 0; n < (size_t)m_noItems; n++ )
349 {
350 delete GetClientObject(n);
351 }
352 }
353}
354
355void wxListBox::DoSetSize(int x, int y,
356 int width, int height,
357 int sizeFlags )
358{
359 wxControl::DoSetSize( x , y , width , height , sizeFlags ) ;
360#if TARGET_CARBON
361 Rect bounds ;
362 GetControlBounds( (ControlHandle) m_macControl , &bounds ) ;
363 ControlRef control = GetListVerticalScrollBar( (ListHandle)m_macList ) ;
364 if ( control )
365 {
366 Rect scrollbounds ;
367 GetControlBounds( control , &scrollbounds ) ;
368 if( scrollbounds.right != bounds.right + 1 )
369 {
370 UMAMoveControl( control , bounds.right - (scrollbounds.right - scrollbounds.left) + 1 ,
371 scrollbounds.top ) ;
372 }
373 }
374#endif
375}
376void wxListBox::DoSetFirstItem(int N)
377{
378 MacScrollTo( N ) ;
379}
380
381void wxListBox::Delete(int N)
382{
383 wxCHECK_RET( N >= 0 && N < m_noItems,
384 wxT("invalid index in wxListBox::Delete") );
385
386#if wxUSE_OWNER_DRAWN
387 delete m_aItems[N];
388 m_aItems.RemoveAt(N);
389#else // !wxUSE_OWNER_DRAWN
390 if ( HasClientObjectData() )
391 {
392 delete GetClientObject(N);
393 }
394#endif // wxUSE_OWNER_DRAWN/!wxUSE_OWNER_DRAWN
395 m_stringArray.RemoveAt( N ) ;
396 m_dataArray.RemoveAt( N ) ;
397 m_noItems --;
398
399 MacDelete( N ) ;
400}
401
402int wxListBox::DoAppend(const wxString& item)
403{
404 int index = m_noItems ;
405 m_stringArray.Add( item ) ;
406 m_dataArray.Add( NULL );
407 m_noItems ++;
408 DoSetItemClientData( index , NULL ) ;
409 MacAppend( item ) ;
410
411 return index ;
412}
413
414void wxListBox::DoSetItems(const wxArrayString& choices, void** clientData)
415{
416 MacSetRedraw( false ) ;
417 Clear() ;
418 int n = choices.GetCount();
419
420 for( int i = 0 ; i < n ; ++i )
421 {
422 if ( clientData )
423 {
424#if wxUSE_OWNER_DRAWN
425 wxASSERT_MSG(clientData[i] == NULL,
426 wxT("Can't use client data with owner-drawn listboxes"));
427#else // !wxUSE_OWNER_DRAWN
428 Append( choices[i] , clientData[i] ) ;
429#endif
430 }
431 else
432 Append( choices[i] ) ;
433 }
434
435#if wxUSE_OWNER_DRAWN
436 if ( m_windowStyle & wxLB_OWNERDRAW ) {
437 // first delete old items
438 size_t ui = m_aItems.Count();
439 while ( ui-- != 0 ) {
440 delete m_aItems[ui];
441 m_aItems[ui] = NULL;
442 }
443 m_aItems.Empty();
444
445 // then create new ones
446 for ( ui = 0; ui < (size_t)m_noItems; ui++ ) {
447 wxOwnerDrawn *pNewItem = CreateItem(ui);
448 pNewItem->SetName(choices[ui]);
449 m_aItems.Add(pNewItem);
450 }
451 }
452#endif // wxUSE_OWNER_DRAWN
453 MacSetRedraw( true ) ;
454}
455
456bool wxListBox::HasMultipleSelection() const
457{
458 return (m_windowStyle & wxLB_MULTIPLE) || (m_windowStyle & wxLB_EXTENDED);
459}
460
461int wxListBox::FindString(const wxString& s) const
462{
463
464 if ( s.Right(1) == wxT("*") )
465 {
466 wxString search = s.Left( s.Length() - 1 ) ;
467 int len = search.Length() ;
468 Str255 s1 , s2 ;
469 wxMacStringToPascal( search , s2 ) ;
470
471 for ( int i = 0 ; i < m_noItems ; ++ i )
472 {
473 wxMacStringToPascal( m_stringArray[i].Left( len ) , s1 ) ;
474
475 if ( EqualString( s1 , s2 , false , false ) )
476 return i ;
477 }
478 if ( s.Left(1) == wxT("*") && s.Length() > 1 )
479 {
480 wxString st = s ;
481 st.MakeLower() ;
482 for ( int i = 0 ; i < m_noItems ; ++i )
483 {
484 if ( GetString(i).Lower().Matches(st) )
485 return i ;
486 }
487 }
488
489 }
490 else
491 {
492 Str255 s1 , s2 ;
493
494 wxMacStringToPascal( s , s2 ) ;
495
496 for ( int i = 0 ; i < m_noItems ; ++ i )
497 {
498 wxMacStringToPascal( m_stringArray[i] , s1 ) ;
499
500 if ( EqualString( s1 , s2 , false , false ) )
501 return i ;
502 }
503 }
504 return -1;
505}
506
507void wxListBox::Clear()
508{
509 FreeData();
510 m_noItems = 0;
511 m_stringArray.Empty() ;
512 m_dataArray.Empty() ;
513 MacClear() ;
514}
515
516void wxListBox::SetSelection(int N, bool select)
517{
518 wxCHECK_RET( N >= 0 && N < m_noItems,
519 wxT("invalid index in wxListBox::SetSelection") );
520 MacSetSelection( N , select ) ;
521 GetSelections( m_selectionPreImage ) ;
522}
523
524bool wxListBox::IsSelected(int N) const
525{
526 wxCHECK_MSG( N >= 0 && N < m_noItems, FALSE,
527 wxT("invalid index in wxListBox::Selected") );
528
529 return MacIsSelected( N ) ;
530}
531
532void *wxListBox::DoGetItemClientData(int N) const
533{
534 wxCHECK_MSG( N >= 0 && N < m_noItems, NULL,
535 wxT("invalid index in wxListBox::GetClientData"));
536
537 return (void *)m_dataArray[N];
538}
539
540wxClientData *wxListBox::DoGetItemClientObject(int N) const
541{
542 return (wxClientData *) DoGetItemClientData( N ) ;
543}
544
545void wxListBox::DoSetItemClientData(int N, void *Client_data)
546{
547 wxCHECK_RET( N >= 0 && N < m_noItems,
548 wxT("invalid index in wxListBox::SetClientData") );
549
550#if wxUSE_OWNER_DRAWN
551 if ( m_windowStyle & wxLB_OWNERDRAW )
552 {
553 // client data must be pointer to wxOwnerDrawn, otherwise we would crash
554 // in OnMeasure/OnDraw.
555 wxFAIL_MSG(wxT("Can't use client data with owner-drawn listboxes"));
556 }
557#endif // wxUSE_OWNER_DRAWN
558 wxASSERT_MSG( m_dataArray.GetCount() >= (size_t) N , wxT("invalid client_data array") ) ;
559
560 if ( m_dataArray.GetCount() > (size_t) N )
561 {
562 m_dataArray[N] = (char*) Client_data ;
563 }
564 else
565 {
566 m_dataArray.Add( (char*) Client_data ) ;
567 }
568}
569
570void wxListBox::DoSetItemClientObject(int n, wxClientData* clientData)
571{
572 DoSetItemClientData(n, clientData);
573}
574
575// Return number of selections and an array of selected integers
576int wxListBox::GetSelections(wxArrayInt& aSelections) const
577{
578 return MacGetSelections( aSelections ) ;
579}
580
581// Get single selection, for single choice list items
582int wxListBox::GetSelection() const
583{
584 return MacGetSelection() ;
585}
586
587// Find string for position
588wxString wxListBox::GetString(int N) const
589{
590 return m_stringArray[N] ;
591}
592
593void wxListBox::DoInsertItems(const wxArrayString& items, int pos)
594{
595 wxCHECK_RET( pos >= 0 && pos <= m_noItems,
596 wxT("invalid index in wxListBox::InsertItems") );
597
598 int nItems = items.GetCount();
599
600 for ( int i = 0 ; i < nItems ; i++ )
601 {
602 m_stringArray.Insert( items[i] , pos + i ) ;
603 m_dataArray.Insert( NULL , pos + i ) ;
604 MacInsert( pos + i , items[i] ) ;
605 }
606
607 m_noItems += nItems;
608}
609
610void wxListBox::SetString(int N, const wxString& s)
611{
612 m_stringArray[N] = s ;
613 MacSet( N , s ) ;
614}
615
616wxSize wxListBox::DoGetBestSize() const
617{
618 int lbWidth = 100; // some defaults
619 int lbHeight = 110;
620 int wLine;
621
622 {
623 wxMacPortStateHelper st( UMAGetWindowPort( (WindowRef) MacGetRootWindow() ) ) ;
624
625 if ( m_font.Ok() )
626 {
627 ::TextFont( m_font.GetMacFontNum() ) ;
628 ::TextSize( m_font.GetMacFontSize() ) ;
629 ::TextFace( m_font.GetMacFontStyle() ) ;
630 }
631 else
632 {
633 ::TextFont( kFontIDMonaco ) ;
634 ::TextSize( 9 );
635 ::TextFace( 0 ) ;
636 }
637
638 // Find the widest line
639 for(int i = 0; i < GetCount(); i++) {
640 wxString str(GetString(i));
641 #if wxUSE_UNICODE
642 Point bounds={0,0} ;
643 SInt16 baseline ;
644 ::GetThemeTextDimensions( wxMacCFStringHolder( str , m_font.GetEncoding() ) ,
645 kThemeCurrentPortFont,
646 kThemeStateActive,
647 false,
648 &bounds,
649 &baseline );
650 wLine = bounds.h ;
651 #else
652 wLine = ::TextWidth( str.c_str() , 0 , str.Length() ) ;
653 #endif
654 lbWidth = wxMax(lbWidth, wLine);
655 }
656
657 // Add room for the scrollbar
658 lbWidth += wxSystemSettings::GetMetric(wxSYS_VSCROLL_X);
659
660 // And just a bit more
661 int cy = 12 ;
662 int cx = ::TextWidth( "X" , 0 , 1 ) ;
663 lbWidth += cx ;
664
665 // don't make the listbox too tall (limit height to around 10 items) but don't
666 // make it too small neither
667 lbHeight = (cy+4) * wxMin(wxMax(GetCount(), 3), 10);
668 }
669 return wxSize(lbWidth, lbHeight);
670}
671
672int wxListBox::GetCount() const
673{
674 return m_noItems;
675}
676
677void wxListBox::SetupColours()
678{
679 SetBackgroundColour(wxSystemSettings::GetColour(wxSYS_COLOUR_WINDOW));
680 SetForegroundColour(GetParent()->GetForegroundColour());
681}
682
683void wxListBox::Refresh(bool eraseBack, const wxRect *rect)
684{
685 wxControl::Refresh( eraseBack , rect ) ;
686 // MacRedrawControl() ;
687}
688
689#if wxUSE_OWNER_DRAWN
690
691class wxListBoxItem : public wxOwnerDrawn
692{
693public:
694 wxListBoxItem(const wxString& str = "");
695};
696
697wxListBoxItem::wxListBoxItem(const wxString& str) : wxOwnerDrawn(str, FALSE)
698{
699 // no bitmaps/checkmarks
700 SetMarginWidth(0);
701}
702
703wxOwnerDrawn *wxListBox::CreateItem(size_t n)
704{
705 return new wxListBoxItem();
706}
707
708#endif //USE_OWNER_DRAWN
709
710// ============================================================================
711// list box control implementation
712// ============================================================================
713
714/*
715void MacDrawStringCell(Rect *cellRect, Cell lCell, ListHandle theList, long refCon)
716{
717wxListBox* list;
718// typecast our refCon
719list = (wxListBox*)refCon;
720
721 MoveTo(cellRect->left + 4 , cellRect->top + 10 );
722 const wxString text = list->m_stringArray[lCell.v] ;
723 ::TextFont( kFontIDMonaco ) ;
724 ::TextSize( 9 );
725 ::TextFace( 0 ) ;
726 DrawText(text, 0 , text.Length());
727
728 }
729*/
730void wxListBox::MacDelete( int N )
731{
732 LDelRow( 1 , N , (ListHandle)m_macList) ;
733 Refresh();
734}
735
736void wxListBox::MacInsert( int n , const wxString& text)
737{
738 Cell cell = { 0 , 0 } ;
739 cell.v = n ;
740 LAddRow( 1 , cell.v , (ListHandle)m_macList ) ;
741 // LSetCell(text, strlen(text), cell, m_macList);
742 Refresh();
743}
744
745void wxListBox::MacAppend( const wxString& text)
746{
747 Cell cell = { 0 , 0 } ;
748 cell.v = (**(ListHandle)m_macList).dataBounds.bottom ;
749 LAddRow( 1 , cell.v , (ListHandle)m_macList ) ;
750 // LSetCell(text, strlen(text), cell, m_macList);
751 Refresh();
752}
753
754void wxListBox::MacClear()
755{
756 LDelRow( (**(ListHandle)m_macList).dataBounds.bottom , 0 ,(ListHandle) m_macList ) ;
757 Refresh();
758}
759
760void wxListBox::MacSetSelection( int n , bool select )
761{
762 Cell cell = { 0 , 0 } ;
763 if ( ! (m_windowStyle & wxLB_MULTIPLE) )
764 {
765 if ( LGetSelect( true , &cell , (ListHandle)m_macList ) )
766 {
767 LSetSelect( false , cell , (ListHandle)m_macList ) ;
768 }
769 }
770
771 cell.v = n ;
772 LSetSelect( select , cell , (ListHandle)m_macList ) ;
773 LAutoScroll( (ListHandle)m_macList ) ;
774 Refresh();
775}
776
777bool wxListBox::MacIsSelected( int n ) const
778{
779 Cell cell = { 0 , 0 } ;
780 cell.v = n ;
781 return LGetSelect( false , &cell , (ListHandle)m_macList ) ;
782}
783
784void wxListBox::MacDestroy()
785{
786 // DisposeExtLDEFInfo( m_macList ) ;
787}
788
789int wxListBox::MacGetSelection() const
790{
791 Cell cell = { 0 , 0 } ;
792 if ( LGetSelect( true , &cell , (ListHandle)m_macList ) )
793 return cell.v ;
794 else
795 return -1 ;
796}
797
798int wxListBox::MacGetSelections( wxArrayInt& aSelections ) const
799{
800 int no_sel = 0 ;
801
802 aSelections.Empty();
803
804 Cell cell = { 0 , 0 } ;
805 cell.v = 0 ;
806
807 while ( LGetSelect( true , &cell ,(ListHandle) m_macList ) )
808 {
809 aSelections.Add( cell.v ) ;
810 no_sel++ ;
811 cell.v++ ;
812 }
813 return no_sel ;
814}
815
816void wxListBox::MacSet( int n , const wxString& text )
817{
818 // our implementation does not store anything in the list
819 // so we just have to redraw
820 Cell cell = { 0 , 0 } ;
821 cell.v = n ;
822 // LSetCell(text, strlen(text), cell, m_macList);
823 Refresh();
824}
825
826void wxListBox::MacScrollTo( int n )
827{
828 // TODO implement scrolling
829}
830
831void wxListBox::OnSize( wxSizeEvent &event)
832{
833 Point pt;
834
835#if TARGET_CARBON
836 GetListCellSize((ListHandle)m_macList, &pt);
837#else
838 pt = (**(ListHandle)m_macList).cellSize ;
839#endif
840 pt.h = m_width - 15 ;
841 LCellSize( pt , (ListHandle)m_macList ) ;
842}
843
844void wxListBox::MacHandleControlClick( WXWidget control , wxInt16 controlpart , bool WXUNUSED(mouseStillDown))
845{
846 Boolean wasDoubleClick = false ;
847 long result ;
848
849 ::GetControlData( (ControlHandle) m_macControl , kControlNoPart , kControlListBoxDoubleClickTag , sizeof( wasDoubleClick ) , (char*) &wasDoubleClick , &result ) ;
850 if ( !wasDoubleClick )
851 {
852 MacDoClick() ;
853 }
854 else
855 {
856 MacDoDoubleClick() ;
857 }
858}
859
860void wxListBox::MacSetRedraw( bool doDraw )
861{
862 LSetDrawingMode( doDraw , (ListHandle)m_macList ) ;
863
864}
865
866void wxListBox::MacDoClick()
867{
868 wxArrayInt aSelections;
869 int n ;
870 size_t count = GetSelections(aSelections);
871
872 if ( count == m_selectionPreImage.GetCount() )
873 {
874 bool hasChanged = false ;
875 for ( size_t i = 0 ; i < count ; ++i )
876 {
877 if ( aSelections[i] != m_selectionPreImage[i] )
878 {
879 hasChanged = true ;
880 break ;
881 }
882 }
883 if ( !hasChanged )
884 {
885 return ;
886 }
887 }
888
889 m_selectionPreImage = aSelections;
890
891 wxCommandEvent event(wxEVT_COMMAND_LISTBOX_SELECTED, m_windowId);
892 event.SetEventObject( this );
893
894 if ( count > 0 )
895 {
896 n = aSelections[0];
897 if ( HasClientObjectData() )
898 event.SetClientObject( GetClientObject(n) );
899 else if ( HasClientUntypedData() )
900 event.SetClientData( GetClientData(n) );
901 event.SetString( GetString(n) );
902 }
903 else
904 {
905 n = -1;
906 }
907
908 event.m_commandInt = n;
909
910 GetEventHandler()->ProcessEvent(event);
911}
912
913void wxListBox::MacDoDoubleClick()
914{
915 wxCommandEvent event(wxEVT_COMMAND_LISTBOX_DOUBLECLICKED, m_windowId);
916 event.SetEventObject( this );
917 GetEventHandler()->ProcessEvent(event) ;
918}
919
920void wxListBox::OnChar(wxKeyEvent& event)
921{
922 if ( event.GetKeyCode() == WXK_RETURN || event.GetKeyCode() == WXK_NUMPAD_ENTER)
923 {
924 wxWindow* parent = GetParent() ;
925 while( parent && !parent->IsTopLevel() && parent->GetDefaultItem() == NULL )
926 parent = parent->GetParent() ;
927
928 if ( parent && parent->GetDefaultItem() )
929 {
930 wxButton *def = wxDynamicCast(parent->GetDefaultItem(),
931 wxButton);
932 if ( def && def->IsEnabled() )
933 {
934 wxCommandEvent event(wxEVT_COMMAND_BUTTON_CLICKED, def->GetId() );
935 event.SetEventObject(def);
936 def->Command(event);
937 return ;
938 }
939 }
940 event.Skip() ;
941 }
942 /* generate wxID_CANCEL if command-. or <esc> has been pressed (typically in dialogs) */
943 else if (event.GetKeyCode() == WXK_ESCAPE || (event.GetKeyCode() == '.' && event.MetaDown() ) )
944 {
945 // FIXME: look in ancestors, not just parent.
946 wxWindow* win = GetParent()->FindWindow( wxID_CANCEL ) ;
947 if (win)
948 {
949 wxCommandEvent new_event(wxEVT_COMMAND_BUTTON_CLICKED,wxID_CANCEL);
950 new_event.SetEventObject( win );
951 win->GetEventHandler()->ProcessEvent( new_event );
952 }
953 }
954 else if ( event.GetKeyCode() == WXK_TAB )
955 {
956 wxNavigationKeyEvent new_event;
957 new_event.SetEventObject( this );
958 new_event.SetDirection( !event.ShiftDown() );
959 /* CTRL-TAB changes the (parent) window, i.e. switch notebook page */
960 new_event.SetWindowChange( event.ControlDown() );
961 new_event.SetCurrentFocus( this );
962 if ( !GetEventHandler()->ProcessEvent( new_event ) )
963 event.Skip() ;
964 }
965 else if ( event.GetKeyCode() == WXK_DOWN || event.GetKeyCode() == WXK_UP )
966 {
967 // perform the default key handling first
968 wxControl::OnKeyDown( event ) ;
969
970 wxCommandEvent event(wxEVT_COMMAND_LISTBOX_SELECTED, m_windowId);
971 event.SetEventObject( this );
972
973 wxArrayInt aSelections;
974 int n, count = GetSelections(aSelections);
975 if ( count > 0 )
976 {
977 n = aSelections[0];
978 if ( HasClientObjectData() )
979 event.SetClientObject( GetClientObject(n) );
980 else if ( HasClientUntypedData() )
981 event.SetClientData( GetClientData(n) );
982 event.SetString( GetString(n) );
983 }
984 else
985 {
986 n = -1;
987 }
988
989 event.m_commandInt = n;
990
991 GetEventHandler()->ProcessEvent(event);
992 }
993 else
994 {
995 if ( event.GetTimestamp() > m_lastTypeIn + 60 )
996 {
997 m_typeIn = wxEmptyString ;
998 }
999 m_lastTypeIn = event.GetTimestamp() ;
1000 m_typeIn += (char) event.GetKeyCode() ;
1001 int line = FindString(wxT("*")+m_typeIn+wxT("*")) ;
1002 if ( line >= 0 )
1003 {
1004 if ( GetSelection() != line )
1005 {
1006 SetSelection(line) ;
1007 wxCommandEvent event(wxEVT_COMMAND_LISTBOX_SELECTED, m_windowId);
1008 event.SetEventObject( this );
1009
1010 if ( HasClientObjectData() )
1011 event.SetClientObject( GetClientObject( line ) );
1012 else if ( HasClientUntypedData() )
1013 event.SetClientData( GetClientData(line) );
1014 event.SetString( GetString(line) );
1015
1016 event.m_commandInt = line ;
1017
1018 GetEventHandler()->ProcessEvent(event);
1019 }
1020 }
1021 }
1022}
1023
wxWidgets (Impactor)