]> git.saurik.com Git - wxWidgets.git/blame - src/mac/listbox.cpp
added consts to wxAcceleratorTable ctors from wxAcceleratorEntry array
[wxWidgets.git] / src / mac / listbox.cpp
CommitLineData
e9576ca5
SC
1///////////////////////////////////////////////////////////////////////////////
2// Name: listbox.cpp
3// Purpose: wxListBox
4// Author: AUTHOR
5// Modified by:
6// Created: ??/??/98
7// RCS-ID: $Id$
8// Copyright: (c) AUTHOR
9// Licence: wxWindows licence
10///////////////////////////////////////////////////////////////////////////////
11
12#ifdef __GNUG__
13#pragma implementation "listbox.h"
14#endif
15
03e11df5 16#include "wx/app.h"
e9576ca5
SC
17#include "wx/listbox.h"
18#include "wx/settings.h"
422644a3 19#include "wx/toplevel.h"
e9576ca5
SC
20#include "wx/dynarray.h"
21#include "wx/log.h"
22
519cb848 23#include "wx/utils.h"
519cb848 24
2f1ae414 25#if !USE_SHARED_LIBRARY
e9576ca5 26 IMPLEMENT_DYNAMIC_CLASS(wxListBox, wxControl)
519cb848
SC
27
28BEGIN_EVENT_TABLE(wxListBox, wxControl)
ecaf6c18
SC
29 EVT_SIZE( wxListBox::OnSize )
30 EVT_CHAR( wxListBox::OnChar )
519cb848 31END_EVENT_TABLE()
2f1ae414 32#endif
e9576ca5 33
d497dca4 34#include "wx/mac/uma.h"
519cb848 35
573ac9dc
SC
36#if PRAGMA_STRUCT_ALIGN
37 #pragma options align=mac68k
38#elif PRAGMA_STRUCT_PACKPUSH
39 #pragma pack(push, 2)
40#elif PRAGMA_STRUCT_PACK
41 #pragma pack(2)
42#endif
e42e45a9
SC
43
44typedef struct {
45 unsigned short instruction;
46 void (*function)();
47} ldefRec, *ldefPtr, **ldefHandle;
48
573ac9dc
SC
49#if PRAGMA_STRUCT_ALIGN
50 #pragma options align=reset
51#elif PRAGMA_STRUCT_PACKPUSH
52 #pragma pack(pop)
53#elif PRAGMA_STRUCT_PACK
54 #pragma pack()
55#endif
56
e42e45a9
SC
57extern "C"
58{
59static pascal void wxMacListDefinition( short message, Boolean isSelected, Rect *drawRect,
a8e6bf8a
RR
60 Cell cell, short dataOffset, short dataLength,
61 ListHandle listHandle ) ;
e42e45a9
SC
62}
63
64static pascal void wxMacListDefinition( short message, Boolean isSelected, Rect *drawRect,
a8e6bf8a
RR
65 Cell cell, short dataOffset, short dataLength,
66 ListHandle listHandle )
67{
a8e6bf8a
RR
68 GrafPtr savePort;
69 GrafPtr grafPtr;
70 RgnHandle savedClipRegion;
71 SInt32 savedPenMode;
72 wxListBox* list;
e42e45a9
SC
73 GetPort(&savePort);
74 SetPort((**listHandle).port);
75 grafPtr = (**listHandle).port ;
a8e6bf8a
RR
76 // typecast our refCon
77 list = (wxListBox*) GetControlReference( (ControlHandle) GetListRefCon(listHandle) );
78
79 // Calculate the cell rect.
80
81 switch( message ) {
82 case lInitMsg:
83 break;
84
85 case lCloseMsg:
86 break;
87
88 case lDrawMsg:
89 {
90 const wxString text = list->m_stringArray[cell.v] ;
91
92 // Save the current clip region, and set the clip region to the area we are about
93 // to draw.
94
95 savedClipRegion = NewRgn();
96 GetClip( savedClipRegion );
97
98 ClipRect( drawRect );
99 EraseRect( drawRect );
100
101 MoveTo(drawRect->left + 4 , drawRect->top + 10 );
102 ::TextFont( kFontIDMonaco ) ;
103 ::TextSize( 9 );
104 ::TextFace( 0 ) ;
e42e45a9 105
a8e6bf8a
RR
106 DrawText(text, 0 , text.Length());
107 // If the cell is hilited, do the hilite now. Paint the cell contents with the
108 // appropriate QuickDraw transform mode.
109
110 if( isSelected ) {
76a5e5d2
SC
111 savedPenMode = GetPortPenMode( (CGrafPtr) grafPtr );
112 SetPortPenMode( (CGrafPtr)grafPtr, hilitetransfermode );
a8e6bf8a 113 PaintRect( drawRect );
76a5e5d2 114 SetPortPenMode( (CGrafPtr)grafPtr, savedPenMode );
a8e6bf8a
RR
115 }
116
117 // Restore the saved clip region.
118
119 SetClip( savedClipRegion );
120 DisposeRgn( savedClipRegion );
121 }
122 break;
123 case lHiliteMsg:
124
125 // Hilite or unhilite the cell. Paint the cell contents with the
126 // appropriate QuickDraw transform mode.
127
128 GetPort( &grafPtr );
76a5e5d2
SC
129 savedPenMode = GetPortPenMode( (CGrafPtr)grafPtr );
130 SetPortPenMode( (CGrafPtr)grafPtr, hilitetransfermode );
a8e6bf8a 131 PaintRect( drawRect );
76a5e5d2 132 SetPortPenMode( (CGrafPtr)grafPtr, savedPenMode );
a8e6bf8a
RR
133 break;
134 default :
135 break ;
136 }
137 SetPort(savePort);
e42e45a9
SC
138}
139
519cb848
SC
140extern "C" void MacDrawStringCell(Rect *cellRect, Cell lCell, ListHandle theList, long refCon) ;
141const short kwxMacListWithVerticalScrollbar = 128 ;
dbfc5b97 142const short kwxMacListItemHeight = 14 ;
519cb848 143
e9576ca5
SC
144// ============================================================================
145// list box control implementation
146// ============================================================================
147
148// Listbox item
149wxListBox::wxListBox()
150{
151 m_noItems = 0;
152 m_selected = 0;
2f1ae414 153 m_macList = NULL ;
e9576ca5
SC
154}
155
e42e45a9
SC
156static ListDefUPP macListDefUPP = NULL ;
157
e9576ca5
SC
158bool wxListBox::Create(wxWindow *parent, wxWindowID id,
159 const wxPoint& pos,
160 const wxSize& size,
161 int n, const wxString choices[],
162 long style,
163 const wxValidator& validator,
164 const wxString& name)
165{
60149370
GD
166 m_noItems = 0 ; // this will be increased by our append command
167 m_selected = 0;
168
169 Rect bounds ;
170 Str255 title ;
171
172 MacPreControlCreate( parent , id , "" , pos , size ,style, validator , name , &bounds , title ) ;
e9576ca5 173
60149370 174 ListDefSpec listDef;
e42e45a9
SC
175 listDef.defType = kListDefUserProcType;
176 if ( macListDefUPP == NULL )
177 {
178 macListDefUPP = NewListDefUPP( wxMacListDefinition );
179 }
a8e6bf8a 180 listDef.u.userProc = macListDefUPP ;
de043984 181
e42e45a9 182#if TARGET_CARBON
60149370 183 Size asize;
519cb848 184
519cb848 185
962cbf2e
GD
186 CreateListBoxControl( MAC_WXHWND(parent->MacGetRootWindow()), &bounds, false, 0, 1, false, true,
187 kwxMacListItemHeight, kwxMacListItemHeight, false, &listDef, (ControlRef *)&m_macControl );
519cb848 188
76a5e5d2 189 GetControlData( (ControlHandle) m_macControl, kControlNoPart, kControlListBoxListHandleTag,
60149370 190 sizeof(ListHandle), (Ptr) &m_macList, &asize);
519cb848 191
76a5e5d2
SC
192 SetControlReference( (ControlHandle) m_macControl, (long) this);
193 SetControlVisibility( (ControlHandle) m_macControl, false, false);
519cb848 194
60149370 195#else
de043984 196
a8e6bf8a 197 long result ;
fe3fcb05 198 wxStAppResource resload ;
76a5e5d2 199 m_macControl = ::NewControl( MAC_WXHWND(parent->MacGetRootWindow()) , &bounds , title , false ,
a8e6bf8a
RR
200 kwxMacListWithVerticalScrollbar , 0 , 0,
201 kControlListBoxProc , (long) this ) ;
76a5e5d2 202 ::GetControlData( (ControlHandle) m_macControl , kControlNoPart , kControlListBoxListHandleTag ,
a8e6bf8a 203 sizeof( ListHandle ) , (char*) &m_macList , &result ) ;
60149370
GD
204
205 HLock( (Handle) m_macList ) ;
e42e45a9
SC
206 ldefHandle ldef ;
207 ldef = (ldefHandle) NewHandle( sizeof(ldefRec) ) ;
76a5e5d2 208 if ( (**(ListHandle)m_macList).listDefProc != NULL )
e42e45a9
SC
209 {
210 (**ldef).instruction = 0x4EF9; /* JMP instruction */
211 (**ldef).function = (void(*)()) listDef.u.userProc;
76a5e5d2 212 (**(ListHandle)m_macList).listDefProc = (Handle) ldef ;
e42e45a9
SC
213 }
214
76a5e5d2 215 Point pt = (**(ListHandle)m_macList).cellSize ;
dbfc5b97 216 pt.v = kwxMacListItemHeight ;
76a5e5d2
SC
217 LCellSize( pt , (ListHandle)m_macList ) ;
218 LAddColumn( 1 , 0 , (ListHandle)m_macList ) ;
e42e45a9
SC
219#endif
220 OptionBits options = 0;
60149370
GD
221 if ( style & wxLB_MULTIPLE )
222 {
e42e45a9 223 options += lNoExtend ;
60149370
GD
224 }
225 else if ( style & wxLB_EXTENDED )
226 {
e42e45a9 227 options += lExtendDrag ;
60149370
GD
228 }
229 else
230 {
e42e45a9 231 options = lOnlyOne ;
60149370 232 }
76a5e5d2 233 SetListSelectionFlags((ListHandle)m_macList, options);
60149370
GD
234
235 MacPostControlCreate() ;
236
237 for ( int i = 0 ; i < n ; i++ )
238 {
a8e6bf8a 239 Append( choices[i] ) ;
60149370
GD
240 }
241
76a5e5d2 242 LSetDrawingMode( true , (ListHandle)m_macList ) ;
519cb848 243
60149370 244 return TRUE;
e9576ca5
SC
245}
246
247wxListBox::~wxListBox()
248{
a8e6bf8a
RR
249 Free() ;
250 if ( m_macList )
251 {
60149370 252#if !TARGET_CARBON
76a5e5d2
SC
253 DisposeHandle( (**(ListHandle)m_macList).listDefProc ) ;
254 (**(ListHandle)m_macList).listDefProc = NULL ;
60149370 255#endif
a8e6bf8a
RR
256 m_macList = NULL ;
257 }
e9576ca5
SC
258}
259
e7549107 260void wxListBox::Free()
e9576ca5 261{
e7549107
SC
262#if wxUSE_OWNER_DRAWN
263 if ( m_windowStyle & wxLB_OWNERDRAW )
264 {
265 size_t uiCount = m_aItems.Count();
266 while ( uiCount-- != 0 ) {
267 delete m_aItems[uiCount];
268 }
269
270 m_aItems.Clear();
271 }
272 else
273#endif // wxUSE_OWNER_DRAWN
274 if ( HasClientObjectData() )
275 {
276 for ( size_t n = 0; n < (size_t)m_noItems; n++ )
277 {
278 delete GetClientObject(n);
279 }
280 }
e9576ca5
SC
281}
282
8614041b
SC
283void wxListBox::DoSetSize(int x, int y,
284 int width, int height,
285 int sizeFlags )
286{
a8e6bf8a 287 wxControl::DoSetSize( x , y , width , height , sizeFlags ) ;
8614041b 288#if TARGET_CARBON
a8e6bf8a 289 Rect bounds ;
76a5e5d2 290 GetControlBounds( (ControlHandle) m_macControl , &bounds ) ;
962cbf2e 291 ControlRef control = GetListVerticalScrollBar( (ListHandle)m_macList ) ;
a8e6bf8a
RR
292 if ( control )
293 {
294 Rect scrollbounds ;
295 GetControlBounds( control , &scrollbounds ) ;
296 if( scrollbounds.right != bounds.right + 1 )
297 {
298 UMAMoveControl( control , bounds.right - (scrollbounds.right - scrollbounds.left) + 1 ,
299 scrollbounds.top ) ;
300 }
301 }
8614041b
SC
302#endif
303}
e7549107 304void wxListBox::DoSetFirstItem(int N)
e9576ca5 305{
a8e6bf8a 306 MacScrollTo( N ) ;
e9576ca5
SC
307}
308
309void wxListBox::Delete(int N)
310{
e7549107
SC
311 wxCHECK_RET( N >= 0 && N < m_noItems,
312 wxT("invalid index in wxListBox::Delete") );
313
314#if wxUSE_OWNER_DRAWN
315 delete m_aItems[N];
0baac61e 316 m_aItems.RemoveAt(N);
e7549107
SC
317#else // !wxUSE_OWNER_DRAWN
318 if ( HasClientObjectData() )
319 {
320 delete GetClientObject(N);
321 }
322#endif // wxUSE_OWNER_DRAWN/!wxUSE_OWNER_DRAWN
ecaf6c18 323 m_stringArray.RemoveAt( N ) ;
a8e6bf8a
RR
324 m_dataArray.RemoveAt( N ) ;
325 m_noItems --;
326
327 MacDelete( N ) ;
e9576ca5
SC
328}
329
e7549107 330int wxListBox::DoAppend(const wxString& item)
e9576ca5 331{
a8e6bf8a
RR
332 int index = m_noItems ;
333 if( wxApp::s_macDefaultEncodingIsPC )
334 {
335 m_stringArray.Add( wxMacMakeMacStringFromPC( item ) ) ;
336 m_dataArray.Add( NULL );
337 }
338 else {
339 m_stringArray.Add( item ) ;
340 m_dataArray.Add( NULL );
341 }
342 m_noItems ++;
343 DoSetItemClientData( index , NULL ) ;
344 MacAppend( item ) ;
e7549107 345
a8e6bf8a 346 return index ;
e9576ca5
SC
347}
348
e7549107
SC
349void wxListBox::DoSetItems(const wxArrayString& choices, void** clientData)
350{
351 MacSetRedraw( false ) ;
519cb848 352 Clear() ;
e7549107
SC
353 int n = choices.GetCount();
354
519cb848
SC
355 for( int i = 0 ; i < n ; ++i )
356 {
a8e6bf8a
RR
357 if ( clientData )
358 {
e7549107
SC
359#if wxUSE_OWNER_DRAWN
360 wxASSERT_MSG(clientData[i] == NULL,
361 wxT("Can't use client data with owner-drawn listboxes"));
362#else // !wxUSE_OWNER_DRAWN
a8e6bf8a 363 Append( choices[i] , clientData[i] ) ;
e7549107 364 #endif
a8e6bf8a
RR
365 }
366 else
367 Append( choices[i] ) ;
519cb848 368 }
e7549107
SC
369
370#if wxUSE_OWNER_DRAWN
371 if ( m_windowStyle & wxLB_OWNERDRAW ) {
372 // first delete old items
373 size_t ui = m_aItems.Count();
374 while ( ui-- != 0 ) {
375 delete m_aItems[ui];
376 }
377 m_aItems.Empty();
378
379 // then create new ones
380 for ( ui = 0; ui < (size_t)m_noItems; ui++ ) {
381 wxOwnerDrawn *pNewItem = CreateItem(ui);
382 pNewItem->SetName(choices[ui]);
383 m_aItems.Add(pNewItem);
384 }
385 }
386#endif // wxUSE_OWNER_DRAWN
387 MacSetRedraw( true ) ;
388}
389
390bool wxListBox::HasMultipleSelection() const
391{
392 return (m_windowStyle & wxLB_MULTIPLE) || (m_windowStyle & wxLB_EXTENDED);
e9576ca5
SC
393}
394
519cb848 395int wxListBox::FindString(const wxString& st) const
e9576ca5 396{
a8e6bf8a
RR
397 wxString s ;
398 if( wxApp::s_macDefaultEncodingIsPC )
399 {
400 s = wxMacMakeMacStringFromPC( st ) ;
401 }
402 else
403 s = st ;
404
405 if ( s.Right(1) == "*" )
406 {
407 wxString search = s.Left( s.Length() - 1 ) ;
408 int len = search.Length() ;
409 Str255 s1 , s2 ;
03e11df5
GD
410
411#if TARGET_CARBON
a8e6bf8a 412 c2pstrcpy( (StringPtr) s2 , search.c_str() ) ;
03e11df5 413#else
a8e6bf8a
RR
414 strcpy( (char *) s2 , search.c_str() ) ;
415 c2pstr( (char *) s2 ) ;
03e11df5
GD
416#endif
417
a8e6bf8a
RR
418 for ( int i = 0 ; i < m_noItems ; ++ i )
419 {
03e11df5 420#if TARGET_CARBON
a8e6bf8a 421 c2pstrcpy( (StringPtr) s1 , m_stringArray[i].Left( len ).c_str() ) ;
03e11df5 422#else
a8e6bf8a
RR
423 strcpy( (char *) s1 , m_stringArray[i].Left( len ).c_str() ) ;
424 c2pstr( (char *) s1 ) ;
03e11df5 425#endif
a8e6bf8a
RR
426 if ( EqualString( s1 , s2 , false , false ) )
427 return i ;
428 }
429 if ( s.Left(1) == "*" && s.Length() > 1 )
430 {
ecaf6c18 431 s = st ;
a8e6bf8a
RR
432 s.MakeLower() ;
433 for ( int i = 0 ; i < m_noItems ; ++i )
434 {
435 if ( GetString(i).Lower().Matches(s) )
436 return i ;
437 }
438 }
439
440 }
441 else
442 {
443 Str255 s1 , s2 ;
03e11df5
GD
444
445#if TARGET_CARBON
a8e6bf8a 446 c2pstrcpy( (StringPtr) s2 , s.c_str() ) ;
03e11df5 447#else
a8e6bf8a
RR
448 strcpy( (char *) s2 , s.c_str() ) ;
449 c2pstr( (char *) s2 ) ;
03e11df5
GD
450#endif
451
a8e6bf8a
RR
452 for ( int i = 0 ; i < m_noItems ; ++ i )
453 {
03e11df5 454#if TARGET_CARBON
a8e6bf8a 455 c2pstrcpy( (StringPtr) s1 , m_stringArray[i].c_str() ) ;
03e11df5 456#else
a8e6bf8a
RR
457 strcpy( (char *) s1 , m_stringArray[i].c_str() ) ;
458 c2pstr( (char *) s1 ) ;
03e11df5 459#endif
a8e6bf8a
RR
460 if ( EqualString( s1 , s2 , false , false ) )
461 return i ;
462 }
519cb848
SC
463 }
464 return -1;
e9576ca5
SC
465}
466
467void wxListBox::Clear()
468{
e7549107 469 Free();
e9576ca5 470 m_noItems = 0;
519cb848
SC
471 m_stringArray.Empty() ;
472 m_dataArray.Empty() ;
473 MacClear() ;
e9576ca5
SC
474}
475
476void wxListBox::SetSelection(int N, bool select)
477{
519cb848
SC
478 wxCHECK_RET( N >= 0 && N < m_noItems,
479 "invalid index in wxListBox::SetSelection" );
a8e6bf8a
RR
480 MacSetSelection( N , select ) ;
481 GetSelections( m_selectionPreImage ) ;
e9576ca5
SC
482}
483
e7549107 484bool wxListBox::IsSelected(int N) const
e9576ca5 485{
519cb848
SC
486 wxCHECK_MSG( N >= 0 && N < m_noItems, FALSE,
487 "invalid index in wxListBox::Selected" );
488
a8e6bf8a 489 return MacIsSelected( N ) ;
e9576ca5
SC
490}
491
e7549107 492void *wxListBox::DoGetItemClientData(int N) const
e9576ca5 493{
519cb848 494 wxCHECK_MSG( N >= 0 && N < m_noItems, NULL,
60149370 495 wxT("invalid index in wxListBox::GetClientData"));
519cb848 496
e7549107 497 return (void *)m_dataArray[N];
e9576ca5
SC
498}
499
51abe921
SC
500wxClientData *wxListBox::DoGetItemClientObject(int N) const
501{
a8e6bf8a 502 return (wxClientData *) DoGetItemClientData( N ) ;
51abe921
SC
503}
504
e7549107 505void wxListBox::DoSetItemClientData(int N, void *Client_data)
e9576ca5 506{
519cb848
SC
507 wxCHECK_RET( N >= 0 && N < m_noItems,
508 "invalid index in wxListBox::SetClientData" );
509
e7549107
SC
510#if wxUSE_OWNER_DRAWN
511 if ( m_windowStyle & wxLB_OWNERDRAW )
512 {
513 // client data must be pointer to wxOwnerDrawn, otherwise we would crash
514 // in OnMeasure/OnDraw.
515 wxFAIL_MSG(wxT("Can't use client data with owner-drawn listboxes"));
516 }
517#endif // wxUSE_OWNER_DRAWN
a8e6bf8a
RR
518 wxASSERT_MSG( m_dataArray.GetCount() >= N , "invalid client_data array" ) ;
519
520 if ( m_dataArray.GetCount() > N )
521 {
522 m_dataArray[N] = (char*) Client_data ;
2f1ae414 523 }
8208e181
SC
524 else
525 {
a8e6bf8a 526 m_dataArray.Add( (char*) Client_data ) ;
8208e181 527 }
e7549107
SC
528}
529
530void wxListBox::DoSetItemClientObject(int n, wxClientData* clientData)
531{
532 DoSetItemClientData(n, clientData);
e9576ca5
SC
533}
534
535// Return number of selections and an array of selected integers
536int wxListBox::GetSelections(wxArrayInt& aSelections) const
537{
a8e6bf8a 538 return MacGetSelections( aSelections ) ;
e9576ca5
SC
539}
540
541// Get single selection, for single choice list items
542int wxListBox::GetSelection() const
543{
a8e6bf8a 544 return MacGetSelection() ;
e9576ca5
SC
545}
546
547// Find string for position
548wxString wxListBox::GetString(int N) const
549{
a8e6bf8a
RR
550 if( wxApp::s_macDefaultEncodingIsPC )
551 {
552 return wxMacMakePCStringFromMac( m_stringArray[N] ) ;
553 }
554 else
555 return m_stringArray[N] ;
e9576ca5
SC
556}
557
e7549107 558void wxListBox::DoInsertItems(const wxArrayString& items, int pos)
e9576ca5 559{
e7549107
SC
560 wxCHECK_RET( pos >= 0 && pos <= m_noItems,
561 wxT("invalid index in wxListBox::InsertItems") );
562
563 int nItems = items.GetCount();
564
a8e6bf8a
RR
565 for ( int i = 0 ; i < nItems ; i++ )
566 {
567 m_stringArray.Insert( items[i] , pos + i ) ;
568 m_dataArray.Insert( NULL , pos + i ) ;
569 MacInsert( pos + i , items[i] ) ;
570 }
e9576ca5 571
519cb848 572 m_noItems += nItems;
e9576ca5
SC
573}
574
575void wxListBox::SetString(int N, const wxString& s)
576{
a8e6bf8a
RR
577 wxString str ;
578 if( wxApp::s_macDefaultEncodingIsPC )
579 {
580 str = wxMacMakeMacStringFromPC( s ) ;
581 }
582 else
583 str = s ;
584 m_stringArray[N] = str ;
585 MacSet( N , s ) ;
e9576ca5
SC
586}
587
37e2cb08 588wxSize wxListBox::DoGetBestSize() const
e9576ca5 589{
e7549107 590 return wxSize(100, 100);
e9576ca5
SC
591}
592
51abe921
SC
593int wxListBox::GetCount() const
594{
595 return m_noItems;
596}
597
598void wxListBox::SetupColours()
599{
a756f210 600 SetBackgroundColour(wxSystemSettings::GetColour(wxSYS_COLOUR_WINDOW));
51abe921
SC
601 SetForegroundColour(GetParent()->GetForegroundColour());
602}
603
60149370
GD
604void wxListBox::Refresh(bool eraseBack, const wxRect *rect)
605{
de043984
SC
606 wxControl::Refresh( eraseBack , rect ) ;
607// MacRedrawControl() ;
60149370
GD
608}
609
51abe921
SC
610#if wxUSE_OWNER_DRAWN
611
612class wxListBoxItem : public wxOwnerDrawn
613{
614public:
615 wxListBoxItem(const wxString& str = "");
616};
617
618wxListBoxItem::wxListBoxItem(const wxString& str) : wxOwnerDrawn(str, FALSE)
619{
620 // no bitmaps/checkmarks
621 SetMarginWidth(0);
622}
623
624wxOwnerDrawn *wxListBox::CreateItem(size_t n)
625{
626 return new wxListBoxItem();
627}
628
629#endif //USE_OWNER_DRAWN
e9576ca5 630
519cb848
SC
631// ============================================================================
632// list box control implementation
633// ============================================================================
634
635void MacDrawStringCell(Rect *cellRect, Cell lCell, ListHandle theList, long refCon)
636{
a8e6bf8a
RR
637 wxListBox* list;
638 // typecast our refCon
639 list = (wxListBox*)refCon;
640
641 MoveTo(cellRect->left + 4 , cellRect->top + 10 );
642 const wxString text = list->m_stringArray[lCell.v] ;
643 ::TextFont( kFontIDMonaco ) ;
644 ::TextSize( 9 );
645 ::TextFace( 0 ) ;
646 DrawText(text, 0 , text.Length());
647
519cb848
SC
648}
649
650void wxListBox::MacDelete( int N )
651{
76a5e5d2 652 LDelRow( 1 , N , (ListHandle)m_macList) ;
60149370 653 Refresh();
519cb848
SC
654}
655
656void wxListBox::MacInsert( int n , const char * text)
657{
60149370
GD
658 Cell cell = { 0 , 0 } ;
659 cell.v = n ;
76a5e5d2 660 LAddRow( 1 , cell.v , (ListHandle)m_macList ) ;
e42e45a9 661// LSetCell(text, strlen(text), cell, m_macList);
60149370 662 Refresh();
519cb848
SC
663}
664
665void wxListBox::MacAppend( const char * text)
666{
60149370 667 Cell cell = { 0 , 0 } ;
76a5e5d2
SC
668 cell.v = (**(ListHandle)m_macList).dataBounds.bottom ;
669 LAddRow( 1 , cell.v , (ListHandle)m_macList ) ;
e42e45a9 670 // LSetCell(text, strlen(text), cell, m_macList);
60149370 671 Refresh();
519cb848
SC
672}
673
674void wxListBox::MacClear()
675{
76a5e5d2 676 LDelRow( (**(ListHandle)m_macList).dataBounds.bottom , 0 ,(ListHandle) m_macList ) ;
60149370 677 Refresh();
519cb848
SC
678}
679
680void wxListBox::MacSetSelection( int n , bool select )
681{
a8e6bf8a
RR
682 Cell cell = { 0 , 0 } ;
683 if ( ! (m_windowStyle & wxLB_MULTIPLE) )
684 {
9f081f02
GD
685 if ( LGetSelect( true , &cell , (ListHandle)m_macList ) )
686 {
687 LSetSelect( false , cell , (ListHandle)m_macList ) ;
688 }
a8e6bf8a
RR
689 }
690
691 cell.v = n ;
76a5e5d2
SC
692 LSetSelect( select , cell , (ListHandle)m_macList ) ;
693 LAutoScroll( (ListHandle)m_macList ) ;
a8e6bf8a 694 Refresh();
519cb848
SC
695}
696
697bool wxListBox::MacIsSelected( int n ) const
698{
a8e6bf8a
RR
699 Cell cell = { 0 , 0 } ;
700 cell.v = n ;
76a5e5d2 701 return LGetSelect( false , &cell , (ListHandle)m_macList ) ;
519cb848
SC
702}
703
704void wxListBox::MacDestroy()
705{
60149370 706// DisposeExtLDEFInfo( m_macList ) ;
519cb848
SC
707}
708
709int wxListBox::MacGetSelection() const
710{
a8e6bf8a 711 Cell cell = { 0 , 0 } ;
76a5e5d2 712 if ( LGetSelect( true , &cell , (ListHandle)m_macList ) )
a8e6bf8a
RR
713 return cell.v ;
714 else
715 return -1 ;
519cb848
SC
716}
717
718int wxListBox::MacGetSelections( wxArrayInt& aSelections ) const
719{
a8e6bf8a
RR
720 int no_sel = 0 ;
721
519cb848
SC
722 aSelections.Empty();
723
a8e6bf8a
RR
724 Cell cell = { 0 , 0 } ;
725 cell.v = 0 ;
726
76a5e5d2 727 while ( LGetSelect( true , &cell ,(ListHandle) m_macList ) )
a8e6bf8a
RR
728 {
729 aSelections.Add( cell.v ) ;
730 no_sel++ ;
731 cell.v++ ;
732 }
733 return no_sel ;
519cb848
SC
734}
735
736void wxListBox::MacSet( int n , const char * text )
737{
a8e6bf8a
RR
738 // our implementation does not store anything in the list
739 // so we just have to redraw
740 Cell cell = { 0 , 0 } ;
741 cell.v = n ;
742// LSetCell(text, strlen(text), cell, m_macList);
743 Refresh();
519cb848
SC
744}
745
746void wxListBox::MacScrollTo( int n )
747{
a8e6bf8a 748 // TODO implement scrolling
519cb848
SC
749}
750
751void wxListBox::OnSize( const wxSizeEvent &event)
752{
60149370
GD
753 Point pt;
754
755#if TARGET_CARBON
962cbf2e 756 GetListCellSize((ListHandle)m_macList, &pt);
60149370 757#else
76a5e5d2 758 pt = (**(ListHandle)m_macList).cellSize ;
60149370
GD
759#endif
760 pt.h = m_width - 15 ;
76a5e5d2 761 LCellSize( pt , (ListHandle)m_macList ) ;
519cb848
SC
762}
763
76a5e5d2 764void wxListBox::MacHandleControlClick( WXWidget control , wxInt16 controlpart )
519cb848 765{
a8e6bf8a
RR
766 Boolean wasDoubleClick = false ;
767 long result ;
519cb848 768
76a5e5d2 769 ::GetControlData( (ControlHandle) m_macControl , kControlNoPart , kControlListBoxDoubleClickTag , sizeof( wasDoubleClick ) , (char*) &wasDoubleClick , &result ) ;
a8e6bf8a
RR
770 if ( !wasDoubleClick )
771 {
772 MacDoClick() ;
773 }
774 else
775 {
776 MacDoDoubleClick() ;
777 }
519cb848
SC
778}
779
780void wxListBox::MacSetRedraw( bool doDraw )
781{
76a5e5d2 782 LSetDrawingMode( doDraw , (ListHandle)m_macList ) ;
a8e6bf8a 783
519cb848
SC
784}
785
786void wxListBox::MacDoClick()
787{
a8e6bf8a
RR
788 wxArrayInt aSelections;
789 int n, count = GetSelections(aSelections);
790
791 if ( count == m_selectionPreImage.GetCount() )
792 {
793 bool hasChanged = false ;
794 for ( int i = 0 ; i < count ; ++i )
795 {
796 if ( aSelections[i] != m_selectionPreImage[i] )
797 {
798 hasChanged = true ;
799 break ;
800 }
801 }
802 if ( !hasChanged )
803 {
804 return ;
805 }
806 }
807
808 m_selectionPreImage = aSelections;
809
810 wxCommandEvent event(wxEVT_COMMAND_LISTBOX_SELECTED, m_windowId);
811 event.SetEventObject( this );
812
813 if ( count > 0 )
814 {
815 n = aSelections[0];
816 if ( HasClientObjectData() )
817 event.SetClientObject( GetClientObject(n) );
818 else if ( HasClientUntypedData() )
819 event.SetClientData( GetClientData(n) );
820 event.SetString( GetString(n) );
821 }
822 else
823 {
e7549107 824 n = -1;
a8e6bf8a
RR
825 }
826
e7549107
SC
827 event.m_commandInt = n;
828
829 GetEventHandler()->ProcessEvent(event);
519cb848
SC
830}
831
832void wxListBox::MacDoDoubleClick()
833{
834 wxCommandEvent event(wxEVT_COMMAND_LISTBOX_DOUBLECLICKED, m_windowId);
835 event.SetEventObject( this );
ecaf6c18 836 GetEventHandler()->ProcessEvent(event) ;
519cb848 837}
ecaf6c18
SC
838
839static long sLastTypeIn = 0 ;
840
841void wxListBox::OnChar(wxKeyEvent& event)
842{
843 EventRecord *ev = (EventRecord*) (wxTheApp->MacGetCurrentEvent() ) ;
844 short keycode ;
845 short keychar ;
846 keychar = short(ev->message & charCodeMask);
847 keycode = short(ev->message & keyCodeMask) >> 8 ;
848 if ( event.KeyCode() == WXK_SPACE )
849 {
850 wxCommandEvent event(wxEVT_COMMAND_LISTBOX_SELECTED, m_windowId);
851 event.SetEventObject( this );
852
853 wxArrayInt aSelections;
854 int n, count = GetSelections(aSelections);
855 if ( count > 0 )
856 {
857 n = aSelections[0];
858 if ( HasClientObjectData() )
859 event.SetClientObject( GetClientObject(n) );
860 else if ( HasClientUntypedData() )
861 event.SetClientData( GetClientData(n) );
862 event.SetString( GetString(n) );
863 }
864 else
865 {
866 n = -1;
867 }
868
869 event.m_commandInt = n;
870
871 GetEventHandler()->ProcessEvent(event);
872 }
873 else if ( event.KeyCode() == WXK_DOWN || event.KeyCode() == WXK_UP )
874 {
875 ::HandleControlKey( (ControlHandle) m_macControl , keycode , keychar , ev->modifiers ) ;
876 }
877 else
878 {
879 if ( ev->when > m_lastTypeIn + 60 )
880 {
881 m_typeIn = "" ;
882 }
883 m_lastTypeIn = ev->when ;
884 m_typeIn += (char) event.KeyCode() ;
885 int line = FindString("*"+m_typeIn+"*") ;
886 if ( line >= 0 )
887 {
888 SetSelection(line) ;
889 }
890 }
891}
892