X-Git-Url: https://git.saurik.com/wxWidgets.git/blobdiff_plain/e9576ca53db96b462ed4c0b4bdf47d64c40203e4..594f0f5bf1355fb8d58f403d3ebacc1c1767c429:/src/mac/listbox.cpp

diff --git a/src/mac/listbox.cpp b/src/mac/listbox.cpp
index 1dad21e12c..cb3a39dbd9 100644
--- a/src/mac/listbox.cpp
+++ b/src/mac/listbox.cpp
@@ -13,15 +13,30 @@
 #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"
+#ifndef __DARWIN__
+  #include "extldef.h"
+#endif
+
 #if !USE_SHARED_LIBRARY
   IMPLEMENT_DYNAMIC_CLASS(wxListBox, wxControl)
+
+BEGIN_EVENT_TABLE(wxListBox, wxControl)
+	EVT_SIZE( wxListBox::OnSize ) 
+END_EVENT_TABLE()
 #endif
 
+#include "wx/mac/uma.h"
+
+extern "C" void MacDrawStringCell(Rect *cellRect, Cell lCell, ListHandle theList, long refCon) ;
+const short kwxMacListWithVerticalScrollbar = 128 ;
+
 // ============================================================================
 // list box control implementation
 // ============================================================================
@@ -31,6 +46,7 @@ wxListBox::wxListBox()
 {
   m_noItems = 0;
   m_selected = 0;
+  m_macList = NULL ;
 }
 
 bool wxListBox::Create(wxWindow *parent, wxWindowID id,
@@ -41,111 +57,368 @@ bool wxListBox::Create(wxWindow *parent, wxWindowID id,
                        const wxValidator& validator,
                        const wxString& name)
 {
-  m_noItems = n;
-  m_selected = 0;
+    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 ) ;
 
-  SetName(name);
-  SetValidator(validator);
+#if TARGET_CARBON
+    ListDefSpec listDef;
+    OptionBits  options;
+    Size asize;
 
-  if (parent) parent->AddChild(this);
+    listDef.defType = kListDefStandardTextType;
 
-  wxSystemSettings settings;
-  SetBackgroundColour(wxSystemSettings::GetSystemColour(wxSYS_COLOUR_WINDOW));
+    CreateListBoxControl( parent->GetMacRootWindow(), &bounds, false, 0, 1, false, true,
+                          14, 14, false, &listDef, &m_macControl );
 
-  m_windowId = ( id == -1 ) ? (int)NewControlId() : id;
+    GetControlData(m_macControl, kControlNoPart, kControlListBoxListHandleTag,
+                   sizeof(ListHandle), (Ptr) &m_macList, &asize);
 
-  // TODO create listbox
+    SetControlReference(m_macControl, (long) this);
+    SetControlVisibility(m_macControl, false, false);
+
+    options = 0;
+    if ( style & wxLB_MULTIPLE )
+    {
+        options += lNoExtend ;
+    }
+    else if ( style & wxLB_EXTENDED )
+    {
+        options += lExtendDrag ;
+    }
+    else
+    {
+        options = lOnlyOne ;
+    }
+    SetListSelectionFlags(m_macList, options);
+
+#else
+    long	result ;
+
+    m_macControl = UMANewControl( parent->GetMacRootWindow() , &bounds , title , false ,
+				  kwxMacListWithVerticalScrollbar , 0 , 0, 
+				  kControlListBoxProc , (long) this ) ;
+    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 ) ;
+    
+    LAddColumn( 1 , 0 , m_macList ) ;
+    
+    ControlFontStyleRec		controlstyle ;
+    controlstyle.flags = kControlUseFontMask + kControlUseSizeMask ;
+    //controlstyle.font = kControlFontSmallSystemFont ;
+    controlstyle.font = kFontIDMonaco ;
+    controlstyle.size = 9 ;
+    //::UMASetControlFontStyle( m_macControl , &controlstyle ) ;
+#endif
+    
+    MacPostControlCreate() ;
+    
+    for ( int i = 0 ; i < n ; i++ )
+    {
+	Append( choices[i] ) ;
+    }
+    
+    LSetDrawingMode( true , m_macList ) ;
 
-  return FALSE;
+    return TRUE;
 }
 
 wxListBox::~wxListBox()
 {
+	Free() ;
+	if ( m_macList )
+	{
+#if !TARGET_CARBON
+	    DisposeExtLDEFInfo( m_macList ) ;
+#endif
+	    m_macList = NULL ;
+	}
 }
 
-void wxListBox::SetFirstItem(int N)
+void wxListBox::Free()
 {
-    // TODO
+#if wxUSE_OWNER_DRAWN
+    if ( m_windowStyle & wxLB_OWNERDRAW )
+    {
+        size_t uiCount = m_aItems.Count();
+        while ( uiCount-- != 0 ) {
+            delete m_aItems[uiCount];
+        }
+
+        m_aItems.Clear();
+    }
+    else
+#endif // wxUSE_OWNER_DRAWN
+    if ( HasClientObjectData() )
+    {
+        for ( size_t n = 0; n < (size_t)m_noItems; n++ )
+        {
+            delete GetClientObject(n);
+        }
+    }
 }
 
-void wxListBox::SetFirstItem(const wxString& s)
+void wxListBox::DoSetFirstItem(int N)
 {
-    // TODO
+	MacScrollTo( N ) ;
 }
 
 void wxListBox::Delete(int N)
 {
-  m_noItems --;
-    // TODO
+    wxCHECK_RET( N >= 0 && N < m_noItems,
+                 wxT("invalid index in wxListBox::Delete") );
+
+#if wxUSE_OWNER_DRAWN
+    delete m_aItems[N];
+    m_aItems.RemoveAt(N);
+#else // !wxUSE_OWNER_DRAWN
+    if ( HasClientObjectData() )
+    {
+        delete GetClientObject(N);
+    }
+#endif // wxUSE_OWNER_DRAWN/!wxUSE_OWNER_DRAWN
+	m_stringArray.Remove( N ) ;
+	m_dataArray.RemoveAt( N ) ;
+	m_noItems --;
+	
+	MacDelete( N ) ;
 }
 
-void wxListBox::Append(const wxString& item)
+int wxListBox::DoAppend(const wxString& item)
 {
-  m_noItems ++;
+	int index = m_noItems ;
+	if( wxApp::s_macDefaultEncodingIsPC )
+	{
+		m_stringArray.Add( wxMacMakeMacStringFromPC( item ) ) ;
+		m_dataArray.Add( NULL );
+	}
+	else {
+		m_stringArray.Add( item ) ;
+		m_dataArray.Add( NULL );
+	}
+ 	m_noItems ++;
+	DoSetItemClientData( index , NULL ) ;
+	MacAppend( item ) ;
+
+	return index ;
+}
 
-  // TODO
+void wxListBox::DoSetItems(const wxArrayString& choices, void** clientData)
+{ 
+  MacSetRedraw( false ) ;
+  Clear() ;  
+  int n = choices.GetCount();
+
+  for( int i = 0 ; i < n ; ++i )
+  {
+  	if ( clientData )
+  	{
+#if wxUSE_OWNER_DRAWN
+            wxASSERT_MSG(clientData[i] == NULL,
+                         wxT("Can't use client data with owner-drawn listboxes"));
+#else // !wxUSE_OWNER_DRAWN
+  		Append( choices[i] , clientData[i] ) ;
+ #endif
+  	}
+  	else
+  		Append( choices[i] ) ;
+  }
+
+#if wxUSE_OWNER_DRAWN
+    if ( m_windowStyle & wxLB_OWNERDRAW ) {
+        // first delete old items
+        size_t ui = m_aItems.Count();
+        while ( ui-- != 0 ) {
+            delete m_aItems[ui];
+        }
+        m_aItems.Empty();
+
+        // then create new ones
+        for ( ui = 0; ui < (size_t)m_noItems; ui++ ) {
+            wxOwnerDrawn *pNewItem = CreateItem(ui);
+            pNewItem->SetName(choices[ui]);
+            m_aItems.Add(pNewItem);
+        }
+    }
+#endif // wxUSE_OWNER_DRAWN
+  MacSetRedraw( true ) ;
 }
 
-void wxListBox::Append(const wxString& item, char *Client_data)
+bool wxListBox::HasMultipleSelection() const
 {
-  m_noItems ++;
-
-  // TODO
+    return (m_windowStyle & wxLB_MULTIPLE) || (m_windowStyle & wxLB_EXTENDED);
 }
 
-void wxListBox::Set(int n, const wxString *choices, char** clientData)
+int wxListBox::FindString(const wxString& st) const
 {
-  m_noItems = n;
+	wxString s ;
+	if( wxApp::s_macDefaultEncodingIsPC )
+	{
+		s = wxMacMakeMacStringFromPC( st ) ;
+	}
+	else
+		s = st ;
+		
+	if ( s.Right(1) == "*" )
+	{
+		wxString search = s.Left( s.Length() - 1 ) ;
+		int len = search.Length() ;
+		Str255 s1 , s2 ;
+
+#if TARGET_CARBON
+		c2pstrcpy( (StringPtr) s2 , search.c_str() ) ;
+#else
+		strcpy( (char *) s2 , search.c_str() ) ;
+		c2pstr( (char *) s2 ) ;
+#endif
 
-  // TODO
-}
+    	for ( int i = 0 ; i < m_noItems ; ++ i )
+	    {
+#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 )
+	    {
+	    	s.MakeLower() ;
+		    for ( int i = 0 ; i < m_noItems ; ++i )
+			{
+				if ( GetString(i).Lower().Matches(s) )
+					return i ;
+			}
+		}	
+
+	}
+	else
+	{
+    	Str255 s1 , s2 ;
+
+#if TARGET_CARBON
+		c2pstrcpy( (StringPtr) s2 , s.c_str() ) ;
+#else
+		strcpy( (char *) s2 , s.c_str() ) ;
+		c2pstr( (char *) s2 ) ;
+#endif
 
-int wxListBox::FindString(const wxString& s) const
-{
-    // TODO
-    return -1;
+	    for ( int i = 0 ; i < m_noItems ; ++ i )
+	    {
+#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 ;
+	    }
+   }
+   return -1;
 }
 
 void wxListBox::Clear()
 {
+  Free();
   m_noItems = 0;
-  // TODO
+  m_stringArray.Empty() ;
+  m_dataArray.Empty() ;
+  MacClear() ;
 }
 
 void wxListBox::SetSelection(int N, bool select)
 {
-    // TODO
+    wxCHECK_RET( N >= 0 && N < m_noItems,
+                 "invalid index in wxListBox::SetSelection" );
+	MacSetSelection( N , select ) ;
+}
+
+bool wxListBox::IsSelected(int N) const
+{
+    wxCHECK_MSG( N >= 0 && N < m_noItems, FALSE,
+                 "invalid index in wxListBox::Selected" );
+
+	return MacIsSelected( N ) ;
 }
 
-bool wxListBox::Selected(int N) const
+void *wxListBox::DoGetItemClientData(int N) const
 {
-    // TODO
-    return FALSE;
+    wxCHECK_MSG( N >= 0 && N < m_noItems, NULL,
+                 wxT("invalid index in wxListBox::GetClientData"));
+
+    return (void *)m_dataArray[N];
 }
 
-void wxListBox::Deselect(int N)
+wxClientData *wxListBox::DoGetItemClientObject(int N) const
 {
-    // TODO
+	return (wxClientData *) DoGetItemClientData( N ) ;
 }
 
-char *wxListBox::GetClientData(int N) const
+void wxListBox::DoSetItemClientData(int N, void *Client_data)
 {
-    // TODO
-    return (char *)NULL;
+    wxCHECK_RET( N >= 0 && N < m_noItems,
+                 "invalid index in wxListBox::SetClientData" );
+
+#if wxUSE_OWNER_DRAWN
+    if ( m_windowStyle & wxLB_OWNERDRAW )
+    {
+        // client data must be pointer to wxOwnerDrawn, otherwise we would crash
+        // in OnMeasure/OnDraw.
+        wxFAIL_MSG(wxT("Can't use client data with owner-drawn listboxes"));
+    }
+#endif // wxUSE_OWNER_DRAWN
+	wxASSERT_MSG( m_dataArray.GetCount() >= N , "invalid client_data array" ) ;
+	
+	if ( m_dataArray.GetCount() > N )
+	{
+    	m_dataArray[N] = (char*) Client_data ;
+    }
+    else
+    {
+    	m_dataArray.Add( (char*) Client_data ) ;
+    }
 }
 
-void wxListBox::SetClientData(int N, char *Client_data)
+void wxListBox::DoSetItemClientObject(int n, wxClientData* clientData)
 {
-    // TODO
+    DoSetItemClientData(n, clientData);
 }
 
 // Return number of selections and an array of selected integers
 int wxListBox::GetSelections(wxArrayInt& aSelections) const
 {
-    aSelections.Empty();
+	return MacGetSelections( aSelections ) ;
 
 /* TODO
-    if ((m_windowStyle & wxLB_MULTIPLE) || (m_windowStyle & wxLB_EXTENDED))
+    if ((m_windowStyle & wxLB_MULTIMacE) || (m_windowStyle & wxLB_EXTENDED))
     {
         int no_sel = ??
         for ( int n = 0; n < no_sel; n++ )
@@ -160,76 +433,283 @@ int wxListBox::GetSelections(wxArrayInt& aSelections) const
         return 1;
     }
 */
-    return 0;
 }
 
 // Get single selection, for single choice list items
 int wxListBox::GetSelection() const
 {
-    // TODO
-    return -1;
+	return MacGetSelection() ;
 }
 
 // Find string for position
 wxString wxListBox::GetString(int N) const
 {
-    // TODO
-    return wxString("");
+	if( wxApp::s_macDefaultEncodingIsPC )
+	{
+		return 		wxMacMakePCStringFromMac( m_stringArray[N] ) ;
+	}
+	else
+		return m_stringArray[N]  ;
 }
 
-void wxListBox::SetSize(int x, int y, int width, int height, int sizeFlags)
+void wxListBox::DoInsertItems(const wxArrayString& items, int pos)
 {
-    // TODO
+    wxCHECK_RET( pos >= 0 && pos <= m_noItems,
+                 wxT("invalid index in wxListBox::InsertItems") );
+
+    int nItems = items.GetCount();
+
+	for ( int i = 0 ; i < nItems ; i++ )
+	{
+		m_stringArray.Insert( items[i] , pos + i ) ;
+		m_dataArray.Insert( NULL , pos + i ) ;
+		MacInsert( pos + i , items[i] ) ;
+	}
+
+    m_noItems += nItems;
 }
 
-void wxListBox::InsertItems(int nItems, const wxString items[], int pos)
+void wxListBox::SetString(int N, const wxString& s)
 {
-    m_noItems += nItems;
+	wxString str ;
+	if( wxApp::s_macDefaultEncodingIsPC )
+	{
+		str = wxMacMakeMacStringFromPC( s )  ;
+	}
+	else
+		str = s ;
+	m_stringArray[N] = str ;
+	MacSet( N , s ) ;
+}
 
-    // TODO
+wxSize wxListBox::DoGetBestSize() const
+{
+    return wxSize(100, 100);
 }
 
-void wxListBox::SetString(int N, const wxString& s)
+int wxListBox::GetCount() const
 {
-    // TODO
+    return m_noItems;
 }
 
-int wxListBox::Number () const
+void wxListBox::SetupColours()
 {
-  return m_noItems;
+    SetBackgroundColour(wxSystemSettings::GetSystemColour(wxSYS_COLOUR_WINDOW));
+    SetForegroundColour(GetParent()->GetForegroundColour());
 }
 
-// For single selection items only
-wxString wxListBox::GetStringSelection () const
+void wxListBox::Refresh(bool eraseBack, const wxRect *rect)
 {
-  int sel = GetSelection ();
-  if (sel > -1)
-    return this->GetString (sel);
-  else
-    return wxString("");
+    // Set up port
+    WindowRef rootwindow = GetMacRootWindow() ;
+    wxWindow* wxrootwindow = wxFindWinFromMacWindow( rootwindow ) ;
+    wxMacDrawingHelper focus( wxrootwindow );
+
+    UMADrawControl(m_macControl);
 }
 
-bool wxListBox::SetStringSelection (const wxString& s, bool flag)
+#if wxUSE_OWNER_DRAWN
+
+class wxListBoxItem : public wxOwnerDrawn
 {
-  int sel = FindString (s);
-  if (sel > -1)
-    {
-      SetSelection (sel, flag);
-      return TRUE;
-    }
-  else
-    return FALSE;
+public:
+    wxListBoxItem(const wxString& str = "");
+};
+
+wxListBoxItem::wxListBoxItem(const wxString& str) : wxOwnerDrawn(str, FALSE)
+{
+    // no bitmaps/checkmarks
+    SetMarginWidth(0);
 }
 
-void wxListBox::Command (wxCommandEvent & event)
+wxOwnerDrawn *wxListBox::CreateItem(size_t n)
 {
-  if (event.m_extraLong)
-    SetSelection (event.m_commandInt);
-  else
-    {
-      Deselect (event.m_commandInt);
-      return;
-    }
-  ProcessCommand (event);
+    return new wxListBoxItem();
+}
+
+#endif  //USE_OWNER_DRAWN
+
+// ============================================================================
+// list box control implementation
+// ============================================================================
+
+void MacDrawStringCell(Rect *cellRect, Cell lCell, ListHandle theList, long refCon)
+{
+	wxListBox*			list;
+	// typecast our refCon
+	list = (wxListBox*)refCon;
+		
+	MoveTo(cellRect->left + 4 , cellRect->top + 10 );
+	const wxString text = list->m_stringArray[lCell.v] ;
+	::TextFont( kFontIDMonaco ) ;
+	::TextSize( 9  );
+	::TextFace( 0 ) ;
+	DrawText(text, 0 , text.Length());
+		
+}
+
+void wxListBox::MacDelete( int N )
+{
+    LDelRow( 1 , N , m_macList) ;
+    Refresh();
+}
+
+void wxListBox::MacInsert( int n , const char * text) 
+{
+    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 ) ;
+    LSetCell(text, strlen(text), cell, m_macList);
+    Refresh();
+}
+
+void wxListBox::MacClear() 
+{
+    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 ) )
+	{
+		LSetSelect( false , cell , m_macList ) ;
+	}
+	
+	cell.v = n ;
+	LSetSelect( select , cell , m_macList ) ;
+	LAutoScroll( m_macList ) ;
+	Refresh();
+}
+
+bool wxListBox::MacIsSelected( int n ) const
+{
+	Cell cell = { 0 , 0 } ;
+	cell.v = n ;
+	return LGetSelect( false , &cell , m_macList ) ;
+}
+
+void wxListBox::MacDestroy()
+{
+//    DisposeExtLDEFInfo( m_macList ) ;
+}
+
+int wxListBox::MacGetSelection() const
+{
+	Cell cell = { 0 , 0 } ;
+	if ( LGetSelect( true , &cell , m_macList ) )
+		return cell.v ;
+	else
+		return -1 ;
+}
+
+int wxListBox::MacGetSelections( wxArrayInt& aSelections ) const
+{
+	int no_sel = 0 ;
+	
+    aSelections.Empty();
+
+	Cell cell = { 0 , 0 } ;
+	cell.v = 0 ;
+	
+	while ( LGetSelect( true , &cell , m_macList ) )
+	{
+		aSelections.Add( cell.v ) ;
+		no_sel++ ;
+		cell.v++ ;
+	}
+	return no_sel ;
+}
+
+void wxListBox::MacSet( int n , const char * text )
+{
+	// our implementation does not store anything in the list
+	// so we just have to redraw
+	Cell cell = { 0 , 0 } ;
+	cell.v = n ;
+	LSetCell(text, strlen(text), cell, m_macList);
+	Refresh();
+}
+
+void wxListBox::MacScrollTo( int n )
+{
+	// TODO implement scrolling
+}
+
+void wxListBox::OnSize( const wxSizeEvent &event)
+{
+    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 ) 
+{
+	Boolean wasDoubleClick = false ;
+	long	result ;
+
+	UMAGetControlData( m_macControl , kControlNoPart , kControlListBoxDoubleClickTag , sizeof( wasDoubleClick ) , (char*) &wasDoubleClick  , &result ) ;
+	if ( !wasDoubleClick )
+	{
+		MacDoClick() ;
+	}
+	else
+	{
+		MacDoDoubleClick() ;
+	}
+}
+
+void wxListBox::MacSetRedraw( bool doDraw ) 
+{
+	LSetDrawingMode( doDraw , m_macList ) ;
+	
+}
+
+void wxListBox::MacDoClick()
+{
+	wxCommandEvent event(wxEVT_COMMAND_LISTBOX_SELECTED, m_windowId);
+    event.SetEventObject( this );
+
+	wxArrayInt aSelections;
+	int n, count = GetSelections(aSelections);
+	if ( count > 0 )
+	{
+           n = aSelections[0];
+           if ( HasClientObjectData() )
+              event.SetClientObject( GetClientObject(n) );
+          else if ( HasClientUntypedData() )
+              event.SetClientData( GetClientData(n) );
+          event.SetString( GetString(n) );
+	}
+	else
+	{
+         n = -1;
+	}
+	
+    event.m_commandInt = n;
+
+    GetEventHandler()->ProcessEvent(event);
+}
+
+void wxListBox::MacDoDoubleClick()
+{
+    wxCommandEvent event(wxEVT_COMMAND_LISTBOX_DOUBLECLICKED, m_windowId);
+    event.SetEventObject( this );
+	GetEventHandler()->ProcessEvent(event) ; 
+}