X-Git-Url: https://git.saurik.com/wxWidgets.git/blobdiff_plain/5b781a6729859abc77e6ca5b1f81cbaad974a78f..08d7397c9a177bc73c28017933cfdc4c57369202:/src/mac/listbox.cpp?ds=sidebyside diff --git a/src/mac/listbox.cpp b/src/mac/listbox.cpp index 03ae6e0572..f6c1403b1c 100644 --- a/src/mac/listbox.cpp +++ b/src/mac/listbox.cpp @@ -13,13 +13,16 @@ #pragma implementation "listbox.h" #endif +#include "wx/app.h" #include "wx/listbox.h" #include "wx/settings.h" #include "wx/dynarray.h" #include "wx/log.h" #include "wx/utils.h" -#include "extldef.h" +#ifndef __DARWIN__ +// #include "extldef.h" +#endif #if !USE_SHARED_LIBRARY IMPLEMENT_DYNAMIC_CLASS(wxListBox, wxControl) @@ -29,7 +32,97 @@ BEGIN_EVENT_TABLE(wxListBox, wxControl) END_EVENT_TABLE() #endif -#include +#include "wx/mac/uma.h" + + +typedef struct { + unsigned short instruction; + void (*function)(); +} ldefRec, *ldefPtr, **ldefHandle; + +extern "C" +{ +static pascal void wxMacListDefinition( short message, Boolean isSelected, Rect *drawRect, + Cell cell, short dataOffset, short dataLength, + ListHandle listHandle ) ; +} + +static pascal void wxMacListDefinition( short message, Boolean isSelected, Rect *drawRect, + Cell cell, short dataOffset, short dataLength, + ListHandle listHandle ) +{ + FontInfo fontInfo; + GrafPtr savePort; + GrafPtr grafPtr; + RgnHandle savedClipRegion; + SInt32 savedPenMode; + wxListBox* list; + GetPort(&savePort); + SetPort((**listHandle).port); + grafPtr = (**listHandle).port ; + // typecast our refCon + list = (wxListBox*) GetControlReference( (ControlHandle) GetListRefCon(listHandle) ); + + // Calculate the cell rect. + + switch( message ) { + case lInitMsg: + break; + + case lCloseMsg: + break; + + case lDrawMsg: + { + const wxString text = list->m_stringArray[cell.v] ; + + // Save the current clip region, and set the clip region to the area we are about + // to draw. + + savedClipRegion = NewRgn(); + GetClip( savedClipRegion ); + ClipRect( drawRect ); + EraseRect( drawRect ); + + + MoveTo(drawRect->left + 4 , drawRect->top + 10 ); + ::TextFont( kFontIDMonaco ) ; + ::TextSize( 9 ); + ::TextFace( 0 ) ; + + DrawText(text, 0 , text.Length()); + // If the cell is hilited, do the hilite now. Paint the cell contents with the + // appropriate QuickDraw transform mode. + + if( isSelected ) { + savedPenMode = GetPortPenMode( grafPtr ); + SetPortPenMode( grafPtr, hilitetransfermode ); + PaintRect( drawRect ); + SetPortPenMode( grafPtr, savedPenMode ); + } + + // Restore the saved clip region. + + SetClip( savedClipRegion ); + DisposeRgn( savedClipRegion ); + } + break; + case lHiliteMsg: + + // Hilite or unhilite the cell. Paint the cell contents with the + // appropriate QuickDraw transform mode. + + GetPort( &grafPtr ); + savedPenMode = GetPortPenMode( grafPtr ); + SetPortPenMode( grafPtr, hilitetransfermode ); + PaintRect( drawRect ); + SetPortPenMode( grafPtr, savedPenMode ); + break; + default : + break ; + } + SetPort(savePort); +} extern "C" void MacDrawStringCell(Rect *cellRect, Cell lCell, ListHandle theList, long refCon) ; const short kwxMacListWithVerticalScrollbar = 128 ; @@ -46,6 +139,8 @@ wxListBox::wxListBox() m_macList = NULL ; } +static ListDefUPP macListDefUPP = NULL ; + bool wxListBox::Create(wxWindow *parent, wxWindowID id, const wxPoint& pos, const wxSize& size, @@ -54,58 +149,84 @@ bool wxListBox::Create(wxWindow *parent, wxWindowID id, const wxValidator& validator, const wxString& name) { - m_noItems = 0 ; // this will be increased by our append command - m_selected = 0; - - Rect bounds ; - Str255 title ; - - MacPreControlCreate( parent , id , "" , pos , size ,style, validator , name , &bounds , title ) ; + m_noItems = 0 ; // this will be increased by our append command + m_selected = 0; + + Rect bounds ; + Str255 title ; + + MacPreControlCreate( parent , id , "" , pos , size ,style, validator , name , &bounds , title ) ; + + ListDefSpec listDef; + listDef.defType = kListDefUserProcType; + if ( macListDefUPP == NULL ) + { + macListDefUPP = NewListDefUPP( wxMacListDefinition ); + } + listDef.u.userProc = macListDefUPP ; +#if TARGET_CARBON + Size asize; - m_macControl = UMANewControl( parent->GetMacRootWindow() , &bounds , title , true , kwxMacListWithVerticalScrollbar , 0 , 0, - kControlListBoxProc , (long) this ) ; - - long result ; - UMAGetControlData( m_macControl , kControlNoPart , kControlListBoxListHandleTag , sizeof( ListHandle ) , (char*) &m_macList , &result ) ; - HLock( (Handle) m_macList ) ; - NewExtLDEFInfo( m_macList , MacDrawStringCell , (long) this ) ; - (**m_macList).selFlags = 0 ; - if ( style & wxLB_MULTIPLE ) - { - (**m_macList).selFlags += lNoExtend ; - } - else if ( style & wxLB_EXTENDED ) - { - (**m_macList).selFlags += lExtendDrag ; - } - else - { - (**m_macList).selFlags = lOnlyOne ; - } - Point pt = (**m_macList).cellSize ; - pt.v = 14 ; - LCellSize( pt , m_macList ) ; + CreateListBoxControl( parent->GetMacRootWindow(), &bounds, false, 0, 1, false, true, + 14, 14, false, &listDef, &m_macControl ); - LAddColumn( 1 , 0 , m_macList ) ; + GetControlData(m_macControl, kControlNoPart, kControlListBoxListHandleTag, + sizeof(ListHandle), (Ptr) &m_macList, &asize); - MacPostControlCreate() ; + SetControlReference(m_macControl, (long) this); + SetControlVisibility(m_macControl, false, false); - ControlFontStyleRec controlstyle ; - controlstyle.flags = kControlUseFontMask + kControlUseSizeMask ; - //controlstyle.font = kControlFontSmallSystemFont ; - controlstyle.font = kFontIDMonaco ; - controlstyle.size = 9 ; - ::UMASetControlFontStyle( m_macControl , &controlstyle ) ; +#else + long result ; - for ( int i = 0 ; i < n ; i++ ) - { - Append( choices[i] ) ; - } + m_macControl = ::NewControl( parent->GetMacRootWindow() , &bounds , title , false , + kwxMacListWithVerticalScrollbar , 0 , 0, + kControlListBoxProc , (long) this ) ; + ::GetControlData( m_macControl , kControlNoPart , kControlListBoxListHandleTag , + sizeof( ListHandle ) , (char*) &m_macList , &result ) ; - LSetDrawingMode( true , m_macList ) ; + HLock( (Handle) m_macList ) ; + ldefHandle ldef ; + ldef = (ldefHandle) NewHandle( sizeof(ldefRec) ) ; + if ( (**m_macList).listDefProc != NULL ) + { + (**ldef).instruction = 0x4EF9; /* JMP instruction */ + (**ldef).function = (void(*)()) listDef.u.userProc; + (**m_macList).listDefProc = (Handle) ldef ; + } + + Point pt = (**m_macList).cellSize ; + pt.v = 14 ; + LCellSize( pt , m_macList ) ; + + LAddColumn( 1 , 0 , m_macList ) ; +#endif + OptionBits options = 0; + if ( style & wxLB_MULTIPLE ) + { + options += lNoExtend ; + } + else if ( style & wxLB_EXTENDED ) + { + options += lExtendDrag ; + } + else + { + options = lOnlyOne ; + } + SetListSelectionFlags(m_macList, options); + + MacPostControlCreate() ; + + for ( int i = 0 ; i < n ; i++ ) + { + Append( choices[i] ) ; + } + + LSetDrawingMode( true , m_macList ) ; - return TRUE; + return TRUE; } wxListBox::~wxListBox() @@ -113,8 +234,11 @@ wxListBox::~wxListBox() Free() ; if ( m_macList ) { - DisposeExtLDEFInfo( m_macList ) ; - m_macList = NULL ; +#if !TARGET_CARBON + DisposeHandle( (**m_macList).listDefProc ) ; + (**m_macList).listDefProc = NULL ; +#endif + m_macList = NULL ; } } @@ -153,7 +277,7 @@ void wxListBox::Delete(int N) #if wxUSE_OWNER_DRAWN delete m_aItems[N]; - m_aItems.Remove(N); + m_aItems.RemoveAt(N); #else // !wxUSE_OWNER_DRAWN if ( HasClientObjectData() ) { @@ -161,7 +285,7 @@ void wxListBox::Delete(int N) } #endif // wxUSE_OWNER_DRAWN/!wxUSE_OWNER_DRAWN m_stringArray.Remove( N ) ; - m_dataArray.Remove( N ) ; + m_dataArray.RemoveAt( N ) ; m_noItems --; MacDelete( N ) ; @@ -246,17 +370,27 @@ int wxListBox::FindString(const wxString& st) const { wxString search = s.Left( s.Length() - 1 ) ; int len = search.Length() ; - Str255 s1 , s2 ; - strcpy( (char*) s2 , search.c_str() ) ; - c2pstr( (char*) s2 ) ; + Str255 s1 , s2 ; + +#if TARGET_CARBON + c2pstrcpy( (StringPtr) s2 , search.c_str() ) ; +#else + strcpy( (char *) s2 , search.c_str() ) ; + c2pstr( (char *) s2 ) ; +#endif + for ( int i = 0 ; i < m_noItems ; ++ i ) { - strcpy( (char*) s1 , m_stringArray[i].Left( len ).c_str() ) ; - c2pstr( (char*) s1 ) ; +#if TARGET_CARBON + c2pstrcpy( (StringPtr) s1 , m_stringArray[i].Left( len ).c_str() ) ; +#else + strcpy( (char *) s1 , m_stringArray[i].Left( len ).c_str() ) ; + c2pstr( (char *) s1 ) ; +#endif if ( EqualString( s1 , s2 , false , false ) ) return i ; } - if ( s.Left(1) = "*" && s.Length() > 1 ) + if ( s.Left(1) == "*" && s.Length() > 1 ) { s.MakeLower() ; for ( int i = 0 ; i < m_noItems ; ++i ) @@ -270,12 +404,22 @@ int wxListBox::FindString(const wxString& st) const else { Str255 s1 , s2 ; - strcpy( (char*) s2 , s.c_str() ) ; - c2pstr( (char*) s2 ) ; + +#if TARGET_CARBON + c2pstrcpy( (StringPtr) s2 , s.c_str() ) ; +#else + strcpy( (char *) s2 , s.c_str() ) ; + c2pstr( (char *) s2 ) ; +#endif + for ( int i = 0 ; i < m_noItems ; ++ i ) { - strcpy( (char*) s1 , m_stringArray[i].c_str() ) ; - c2pstr( (char*) s1 ) ; +#if TARGET_CARBON + c2pstrcpy( (StringPtr) s1 , m_stringArray[i].c_str() ) ; +#else + strcpy( (char *) s1 , m_stringArray[i].c_str() ) ; + c2pstr( (char *) s1 ) ; +#endif if ( EqualString( s1 , s2 , false , false ) ) return i ; } @@ -310,7 +454,7 @@ bool wxListBox::IsSelected(int N) const void *wxListBox::DoGetItemClientData(int N) const { wxCHECK_MSG( N >= 0 && N < m_noItems, NULL, - "invalid index in wxListBox::GetClientData" ); + wxT("invalid index in wxListBox::GetClientData")); return (void *)m_dataArray[N]; } @@ -436,6 +580,16 @@ void wxListBox::SetupColours() SetForegroundColour(GetParent()->GetForegroundColour()); } +void wxListBox::Refresh(bool eraseBack, const wxRect *rect) +{ + // Set up port + WindowRef rootwindow = GetMacRootWindow() ; + wxWindow* wxrootwindow = wxFindWinFromMacWindow( rootwindow ) ; + wxMacDrawingHelper focus( wxrootwindow ); + + UMADrawControl(m_macControl); +} + #if wxUSE_OWNER_DRAWN class wxListBoxItem : public wxOwnerDrawn @@ -478,39 +632,38 @@ void MacDrawStringCell(Rect *cellRect, Cell lCell, ListHandle theList, long refC void wxListBox::MacDelete( int N ) { - ListHandle list ; - long result ; - Cell cell = { 0 , 0 } ; - UMAGetControlData( m_macControl , kControlNoPart , kControlListBoxListHandleTag , sizeof( ListHandle ) , (char*) &list , &result ) ; - LDelRow( 1 , N , list ) ; + LDelRow( 1 , N , m_macList) ; + Refresh(); } void wxListBox::MacInsert( int n , const char * text) { - Cell cell ; - - cell.h = 0 ; - cell.v = n ; - - LAddRow( 1 , cell.v , m_macList ) ; + Cell cell = { 0 , 0 } ; + cell.v = n ; + LAddRow( 1 , cell.v , m_macList ) ; +// LSetCell(text, strlen(text), cell, m_macList); + Refresh(); } void wxListBox::MacAppend( const char * text) { - Cell cell = { 0 , 0 } ; - cell.v = (**m_macList).dataBounds.bottom ; - LAddRow( 1 , cell.v , m_macList ) ; + Cell cell = { 0 , 0 } ; + cell.v = (**m_macList).dataBounds.bottom ; + LAddRow( 1 , cell.v , m_macList ) ; + // LSetCell(text, strlen(text), cell, m_macList); + Refresh(); } void wxListBox::MacClear() { - LDelRow( (**m_macList).dataBounds.bottom , 0 , m_macList ) ; + LDelRow( (**m_macList).dataBounds.bottom , 0 , m_macList ) ; + Refresh(); } void wxListBox::MacSetSelection( int n , bool select ) { Cell cell = { 0 , 0 } ; - if ( LGetSelect( TRUE , &cell , m_macList ) ) + if ( LGetSelect( true , &cell , m_macList ) ) { LSetSelect( false , cell , m_macList ) ; } @@ -518,6 +671,7 @@ void wxListBox::MacSetSelection( int n , bool select ) cell.v = n ; LSetSelect( select , cell , m_macList ) ; LAutoScroll( m_macList ) ; + Refresh(); } bool wxListBox::MacIsSelected( int n ) const @@ -529,7 +683,7 @@ bool wxListBox::MacIsSelected( int n ) const void wxListBox::MacDestroy() { -// DisposeExtLDEFInfo( m_macList ) ; +// DisposeExtLDEFInfo( m_macList ) ; } int wxListBox::MacGetSelection() const @@ -565,7 +719,8 @@ void wxListBox::MacSet( int n , const char * text ) // so we just have to redraw Cell cell = { 0 , 0 } ; cell.v = n ; - LDraw( cell , m_macList ) ; +// LSetCell(text, strlen(text), cell, m_macList); + Refresh(); } void wxListBox::MacScrollTo( int n ) @@ -575,9 +730,15 @@ void wxListBox::MacScrollTo( int n ) void wxListBox::OnSize( const wxSizeEvent &event) { - Point pt = (**m_macList).cellSize ; - pt.h = m_width - 15 ; - LCellSize( pt , m_macList ) ; + Point pt; + +#if TARGET_CARBON + GetListCellSize(m_macList, &pt); +#else + pt = (**m_macList).cellSize ; +#endif + pt.h = m_width - 15 ; + LCellSize( pt , m_macList ) ; } void wxListBox::MacHandleControlClick( ControlHandle control , SInt16 controlpart ) @@ -585,7 +746,7 @@ void wxListBox::MacHandleControlClick( ControlHandle control , SInt16 controlpar Boolean wasDoubleClick = false ; long result ; - UMAGetControlData( m_macControl , kControlNoPart , kControlListBoxDoubleClickTag , sizeof( wasDoubleClick ) , (char*) &wasDoubleClick , &result ) ; + ::GetControlData( m_macControl , kControlNoPart , kControlListBoxDoubleClickTag , sizeof( wasDoubleClick ) , (char*) &wasDoubleClick , &result ) ; if ( !wasDoubleClick ) { MacDoClick() ;