1 ///////////////////////////////////////////////////////////////////////////// 
   4 // Author:      Robert Roebling 
   6 // Copyright:   (c) 1998 Robert Roebling 
   7 // Licence:     wxWindows licence 
   8 ///////////////////////////////////////////////////////////////////////////// 
  12 #pragma implementation "choice.h" 
  19 #include "wx/choice.h" 
  21 #include "wx/gtk/private.h" 
  23 //----------------------------------------------------------------------------- 
  25 //----------------------------------------------------------------------------- 
  27 extern void wxapp_install_idle_handler(); 
  30 //----------------------------------------------------------------------------- 
  32 //----------------------------------------------------------------------------- 
  34 extern bool   g_blockEventsOnDrag
; 
  36 //----------------------------------------------------------------------------- 
  38 //----------------------------------------------------------------------------- 
  40 static void gtk_choice_clicked_callback( GtkWidget 
*WXUNUSED(widget
), wxChoice 
*choice 
) 
  43       wxapp_install_idle_handler(); 
  45     if (!choice
->m_hasVMT
) return; 
  47     if (g_blockEventsOnDrag
) return; 
  49     wxCommandEvent 
event(wxEVT_COMMAND_CHOICE_SELECTED
, choice
->GetId() ); 
  50     int n 
= choice
->GetSelection(); 
  53     event
.SetString( choice
->GetStringSelection() ); 
  54     event
.SetEventObject(choice
); 
  56     if ( choice
->HasClientObjectData() ) 
  57         event
.SetClientObject( choice
->GetClientObject(n
) ); 
  58     else if ( choice
->HasClientUntypedData() ) 
  59         event
.SetClientData( choice
->GetClientData(n
) ); 
  61     choice
->GetEventHandler()->ProcessEvent(event
); 
  64 //----------------------------------------------------------------------------- 
  66 //----------------------------------------------------------------------------- 
  68 IMPLEMENT_DYNAMIC_CLASS(wxChoice
,wxControl
) 
  72     m_strings 
= (wxSortedArrayString 
*)NULL
; 
  75 bool wxChoice::Create( wxWindow 
*parent
, wxWindowID id
, 
  76                        const wxPoint 
&pos
, const wxSize 
&size
, 
  77                        int n
, const wxString choices
[], 
  78                        long style
, const wxValidator
& validator
, const wxString 
&name 
) 
  81 #if (GTK_MINOR_VERSION > 0) 
  82     m_acceptsFocus 
= TRUE
; 
  85     if (!PreCreation( parent
, pos
, size 
) || 
  86         !CreateBase( parent
, id
, pos
, size
, style
, validator
, name 
)) 
  88         wxFAIL_MSG( wxT("wxChoice creation failed") ); 
  92     m_widget 
= gtk_option_menu_new(); 
  94     if ( style 
& wxCB_SORT 
) 
  96         // if our m_strings != NULL, DoAppend() will check for it and insert 
  97         // items in the correct order 
  98         m_strings 
= new wxSortedArrayString
; 
 101     GtkWidget 
*menu 
= gtk_menu_new(); 
 103     for (int i 
= 0; i 
< n
; i
++) 
 105         GtkAddHelper(menu
, i
, choices
[i
]); 
 108     gtk_option_menu_set_menu( GTK_OPTION_MENU(m_widget
), menu 
); 
 110     m_parent
->DoAddChild( this ); 
 114     SetFont( parent
->GetFont() ); 
 118     SetBackgroundColour( parent
->GetBackgroundColour() ); 
 119     SetForegroundColour( parent
->GetForegroundColour() ); 
 126 wxChoice::~wxChoice() 
 133 int wxChoice::DoAppend( const wxString 
&item 
) 
 135     wxCHECK_MSG( m_widget 
!= NULL
, -1, wxT("invalid choice control") ); 
 137     GtkWidget 
*menu 
= gtk_option_menu_get_menu( GTK_OPTION_MENU(m_widget
) ); 
 139     return GtkAddHelper(menu
, GetCount(), item
); 
 142 int wxChoice::DoInsert( const wxString 
&item
, int pos 
) 
 144     wxCHECK_MSG( m_widget 
!= NULL
, -1, wxT("invalid choice control") ); 
 145     wxCHECK_MSG( (pos
>=0) && (pos
<=GetCount()), -1, wxT("invalid index")); 
 147     if (pos 
== GetCount()) 
 148         return DoAppend(item
); 
 150     GtkWidget 
*menu 
= gtk_option_menu_get_menu( GTK_OPTION_MENU(m_widget
) ); 
 152     return GtkAddHelper(menu
, pos
, item
); 
 155 void wxChoice::DoSetItemClientData( int n
, void* clientData 
) 
 157     wxCHECK_RET( m_widget 
!= NULL
, wxT("invalid choice control") ); 
 159     wxNode 
*node 
= m_clientList
.Item( n 
); 
 160     wxCHECK_RET( node
, wxT("invalid index in wxChoice::DoSetItemClientData") ); 
 162     node
->SetData( (wxObject
*) clientData 
); 
 165 void* wxChoice::DoGetItemClientData( int n 
) const 
 167     wxCHECK_MSG( m_widget 
!= NULL
, NULL
, wxT("invalid choice control") ); 
 169     wxNode 
*node 
= m_clientList
.Item( n 
); 
 170     wxCHECK_MSG( node
, NULL
, wxT("invalid index in wxChoice::DoGetItemClientData") ); 
 172     return node
->GetData(); 
 175 void wxChoice::DoSetItemClientObject( int n
, wxClientData
* clientData 
) 
 177     wxCHECK_RET( m_widget 
!= NULL
, wxT("invalid choice control") ); 
 179     wxNode 
*node 
= m_clientList
.Item( n 
); 
 180     wxCHECK_RET( node
, wxT("invalid index in wxChoice::DoSetItemClientObject") ); 
 182     // wxItemContainer already deletes data for us 
 184     node
->SetData( (wxObject
*) clientData 
); 
 187 wxClientData
* wxChoice::DoGetItemClientObject( int n 
) const 
 189     wxCHECK_MSG( m_widget 
!= NULL
, (wxClientData
*) NULL
, wxT("invalid choice control") ); 
 191     wxNode 
*node 
= m_clientList
.Item( n 
); 
 192     wxCHECK_MSG( node
, (wxClientData 
*)NULL
, 
 193                  wxT("invalid index in wxChoice::DoGetItemClientObject") ); 
 195     return (wxClientData
*) node
->GetData(); 
 198 void wxChoice::Clear() 
 200     wxCHECK_RET( m_widget 
!= NULL
, wxT("invalid choice") ); 
 202     gtk_option_menu_remove_menu( GTK_OPTION_MENU(m_widget
) ); 
 203     GtkWidget 
*menu 
= gtk_menu_new(); 
 204     gtk_option_menu_set_menu( GTK_OPTION_MENU(m_widget
), menu 
); 
 206     if ( HasClientObjectData() ) 
 208         // destroy the data (due to Robert's idea of using wxList<wxObject> 
 209         // and not wxList<wxClientData> we can't just say 
 210         // m_clientList.DeleteContents(TRUE) - this would crash! 
 211         wxNode 
*node 
= m_clientList
.GetFirst(); 
 214             delete (wxClientData 
*)node
->GetData(); 
 215             node 
= node
->GetNext(); 
 218     m_clientList
.Clear(); 
 224 void wxChoice::Delete( int n 
) 
 226     wxCHECK_RET( m_widget 
!= NULL
, wxT("invalid choice") ); 
 228     // VZ: apparently GTK+ doesn't have a built-in function to do it (not even 
 229     //     in 2.0), hence this dump implementation - still better than nothing 
 233     wxCHECK_RET( n 
>= 0 && n 
< count
, _T("invalid index in wxChoice::Delete") ); 
 237     for ( i 
= 0; i 
< count
; i
++ ) 
 240             items
.Add(GetString(i
)); 
 245     for ( i 
= 0; i 
< count 
- 1; i
++ ) 
 251 int wxChoice::FindString( const wxString 
&string 
) const 
 253     wxCHECK_MSG( m_widget 
!= NULL
, -1, wxT("invalid choice") ); 
 255     // If you read this code once and you think you understand 
 256     // it, then you are very wrong. Robert Roebling. 
 258     GtkMenuShell 
*menu_shell 
= GTK_MENU_SHELL( gtk_option_menu_get_menu( GTK_OPTION_MENU(m_widget
) ) ); 
 260     GList 
*child 
= menu_shell
->children
; 
 263         GtkBin 
*bin 
= GTK_BIN( child
->data 
); 
 264         GtkLabel 
*label 
= (GtkLabel 
*) NULL
; 
 266             label 
= GTK_LABEL(bin
->child
); 
 268             label 
= GTK_LABEL( BUTTON_CHILD(m_widget
) ); 
 270         wxASSERT_MSG( label 
!= NULL 
, wxT("wxChoice: invalid label") ); 
 273          wxString 
tmp( wxGTK_CONV_BACK( gtk_label_get_text( label
) ) ); 
 275          wxString 
tmp( label
->label 
); 
 287 int wxChoice::GetSelection() const 
 289     wxCHECK_MSG( m_widget 
!= NULL
, -1, wxT("invalid choice") ); 
 293     return gtk_option_menu_get_history( GTK_OPTION_MENU(m_widget
) ); 
 296     GtkMenuShell 
*menu_shell 
= GTK_MENU_SHELL( gtk_option_menu_get_menu( GTK_OPTION_MENU(m_widget
) ) ); 
 299     GList 
*child 
= menu_shell
->children
; 
 302         GtkBin 
*bin 
= GTK_BIN( child
->data 
); 
 303         if (!bin
->child
) return count
; 
 312 void wxChoice::SetString( int WXUNUSED(n
), const wxString
& WXUNUSED(string
) ) 
 314     wxCHECK_RET( m_widget 
!= NULL
, wxT("invalid choice") ); 
 316     wxFAIL_MSG(wxT("not implemented")); 
 319 wxString 
wxChoice::GetString( int n 
) const 
 321     wxCHECK_MSG( m_widget 
!= NULL
, wxT(""), wxT("invalid choice") ); 
 323     GtkMenuShell 
*menu_shell 
= GTK_MENU_SHELL( gtk_option_menu_get_menu( GTK_OPTION_MENU(m_widget
) ) ); 
 325     GList 
*child 
= menu_shell
->children
; 
 328         GtkBin 
*bin 
= GTK_BIN( child
->data 
); 
 331             GtkLabel 
*label 
= (GtkLabel 
*) NULL
; 
 333                 label 
= GTK_LABEL(bin
->child
); 
 335                 label 
= GTK_LABEL( BUTTON_CHILD(m_widget
) ); 
 337             wxASSERT_MSG( label 
!= NULL 
, wxT("wxChoice: invalid label") ); 
 340             return wxString( wxGTK_CONV_BACK( gtk_label_get_text( label
) ) ); 
 342             return wxString( label
->label 
); 
 349     wxFAIL_MSG( wxT("wxChoice: invalid index in GetString()") ); 
 354 int wxChoice::GetCount() const 
 356     wxCHECK_MSG( m_widget 
!= NULL
, 0, wxT("invalid choice") ); 
 358     GtkMenuShell 
*menu_shell 
= GTK_MENU_SHELL( gtk_option_menu_get_menu( GTK_OPTION_MENU(m_widget
) ) ); 
 360     GList 
*child 
= menu_shell
->children
; 
 369 void wxChoice::SetSelection( int n 
) 
 371     wxCHECK_RET( m_widget 
!= NULL
, wxT("invalid choice") ); 
 374     gtk_option_menu_set_history( GTK_OPTION_MENU(m_widget
), (gint
)tmp 
); 
 377 void wxChoice::ApplyWidgetStyle() 
 381     GtkMenuShell 
*menu_shell 
= GTK_MENU_SHELL( gtk_option_menu_get_menu( GTK_OPTION_MENU(m_widget
) ) ); 
 383     gtk_widget_set_style( m_widget
, m_widgetStyle 
); 
 384     gtk_widget_set_style( GTK_WIDGET( menu_shell 
), m_widgetStyle 
); 
 386     GList 
*child 
= menu_shell
->children
; 
 389         gtk_widget_set_style( GTK_WIDGET( child
->data 
), m_widgetStyle 
); 
 391         GtkBin 
*bin 
= GTK_BIN( child
->data 
); 
 392         GtkWidget 
*label 
= (GtkWidget 
*) NULL
; 
 396             label 
= BUTTON_CHILD(m_widget
); 
 398         gtk_widget_set_style( label
, m_widgetStyle 
); 
 404 int wxChoice::GtkAddHelper(GtkWidget 
*menu
, int pos
, const wxString
& item
) 
 406     wxCHECK_MSG((pos
>=0) && (pos
<=(int)m_clientList
.GetCount()), -1, wxT("invalid index")); 
 408     GtkWidget 
*menu_item 
= gtk_menu_item_new_with_label( wxGTK_CONV( item 
) ); 
 413         // sorted control, need to insert at the correct index 
 414         index 
= m_strings
->Add(item
); 
 416         gtk_menu_insert( GTK_MENU(menu
), menu_item
, index 
); 
 420             m_clientList
.Insert( m_clientList
.Item(index 
- 1), 
 425             m_clientList
.Insert( (wxObject
*) NULL 
); 
 430         // don't call wxChoice::GetCount() from here because it doesn't work 
 431         // if we're called from ctor (and GtkMenuShell is still NULL) 
 433         // normal control, just append 
 434         if (pos 
== (int)m_clientList
.GetCount()) 
 436         gtk_menu_append( GTK_MENU(menu
), menu_item 
); 
 437         m_clientList
.Append( (wxObject
*) NULL 
); 
 438         index 
= m_clientList
.GetCount() - 1; 
 442             gtk_menu_insert( GTK_MENU(menu
), menu_item
, pos 
); 
 443             m_clientList
.Insert( pos
, (wxObject
*) NULL 
); 
 448     if (GTK_WIDGET_REALIZED(m_widget
)) 
 450         gtk_widget_realize( menu_item 
); 
 451         gtk_widget_realize( GTK_BIN(menu_item
)->child 
); 
 453         if (m_widgetStyle
) ApplyWidgetStyle(); 
 456     gtk_signal_connect( GTK_OBJECT( menu_item 
), "activate", 
 457       GTK_SIGNAL_FUNC(gtk_choice_clicked_callback
), (gpointer
*)this ); 
 459     gtk_widget_show( menu_item 
); 
 461     // return the index of the item in the control 
 465 wxSize 
wxChoice::DoGetBestSize() const 
 467     wxSize 
ret( wxControl::DoGetBestSize() ); 
 469     // we know better our horizontal extent: it depends on the longest string 
 475         size_t count 
= GetCount(); 
 476         for ( size_t n 
= 0; n 
< count
; n
++ ) 
 478             GetTextExtent( GetString(n
), &width
, NULL
, NULL
, NULL
, &m_font 
); 
 483         // add extra for the choice "=" button 
 485         // VZ: I don't know how to get the right value, it seems to be in 
 486         //     GtkOptionMenuProps struct from gtkoptionmenu.c but we can't get 
 487         //     to it - maybe we can use gtk_option_menu_size_request() for this 
 490         //     This default value works only for the default GTK+ theme (i.e. 
 491         //     no theme at all) (FIXME) 
 492         static const int widthChoiceIndicator 
= 35; 
 493         ret
.x 
+= widthChoiceIndicator
; 
 496     // but not less than the minimal width 
 500     ret
.y 
= 16 + GetCharHeight(); 
 505 #endif // wxUSE_CHOICE