src/gtk1/choice.cpp

   1 /////////////////////////////////////////////////////////////////////////////
   2 // Name:        choice.cpp
   3 // Purpose:
   4 // Author:      Robert Roebling
   5 // Id:          $Id$
   6 // Copyright:   (c) 1998 Robert Roebling
   7 // Licence:     wxWindows licence
   8 /////////////////////////////////////////////////////////////////////////////
   9
  10
  11 #ifdef __GNUG__
  12 #pragma implementation "choice.h"
  13 #endif
  14
  15 #include "wx/defs.h"
  16
  17 #if wxUSE_CHOICE
  18
  19 #include "wx/choice.h"
  20
  21 #include "wx/gtk/private.h"
  22
  23 //-----------------------------------------------------------------------------
  24 // idle system
  25 //-----------------------------------------------------------------------------
  26
  27 extern void wxapp_install_idle_handler();
  28 extern bool g_isIdle;
  29
  30 //-----------------------------------------------------------------------------
  31 // data
  32 //-----------------------------------------------------------------------------
  33
  34 extern bool   g_blockEventsOnDrag;
  35
  36 //-----------------------------------------------------------------------------
  37 // "activate"
  38 //-----------------------------------------------------------------------------
  39
  40 static void gtk_choice_clicked_callback( GtkWidget *WXUNUSED(widget), wxChoice *choice )
  41 {
  42     if (g_isIdle)
  43       wxapp_install_idle_handler();
  44
  45     if (!choice->m_hasVMT) return;
  46
  47     if (g_blockEventsOnDrag) return;
  48
  49     wxCommandEvent event(wxEVT_COMMAND_CHOICE_SELECTED, choice->GetId() );
  50     int n = choice->GetSelection();
  51
  52     event.SetInt( n );
  53     event.SetString( choice->GetStringSelection() );
  54     event.SetEventObject(choice);
  55
  56     if ( choice->HasClientObjectData() )
  57         event.SetClientObject( choice->GetClientObject(n) );
  58     else if ( choice->HasClientUntypedData() )
  59         event.SetClientData( choice->GetClientData(n) );
  60
  61     choice->GetEventHandler()->ProcessEvent(event);
  62 }
  63
  64 //-----------------------------------------------------------------------------
  65 // wxChoice
  66 //-----------------------------------------------------------------------------
  67
  68 IMPLEMENT_DYNAMIC_CLASS(wxChoice,wxControl)
  69
  70 wxChoice::wxChoice()
  71 {
  72     m_strings = (wxSortedArrayString *)NULL;
  73 }
  74
  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 )
  79 {
  80     m_needParent = TRUE;
  81 #if (GTK_MINOR_VERSION > 0)
  82     m_acceptsFocus = TRUE;
  83 #endif
  84
  85     if (!PreCreation( parent, pos, size ) ||
  86         !CreateBase( parent, id, pos, size, style, validator, name ))
  87     {
  88         wxFAIL_MSG( wxT("wxChoice creation failed") );
  89         return FALSE;
  90     }
  91
  92     m_widget = gtk_option_menu_new();
  93
  94     if ( style & wxCB_SORT )
  95     {
  96         // if our m_strings != NULL, DoAppend() will check for it and insert
  97         // items in the correct order
  98         m_strings = new wxSortedArrayString;
  99     }
 100
 101     GtkWidget *menu = gtk_menu_new();
 102
 103     for (int i = 0; i < n; i++)
 104     {
 105         GtkAppendHelper(menu, choices[i]);
 106     }
 107
 108     gtk_option_menu_set_menu( GTK_OPTION_MENU(m_widget), menu );
 109
 110     m_parent->DoAddChild( this );
 111
 112     PostCreation();
 113
 114     SetFont( parent->GetFont() );
 115
 116     SetBestSize(size);
 117
 118     SetBackgroundColour( parent->GetBackgroundColour() );
 119     SetForegroundColour( parent->GetForegroundColour() );
 120
 121     Show( TRUE );
 122
 123     return TRUE;
 124 }
 125
 126 wxChoice::~wxChoice()
 127 {
 128     Clear();
 129
 130     delete m_strings;
 131 }
 132
 133 int wxChoice::DoAppend( const wxString &item )
 134 {
 135     wxCHECK_MSG( m_widget != NULL, -1, wxT("invalid choice control") );
 136
 137     GtkWidget *menu = gtk_option_menu_get_menu( GTK_OPTION_MENU(m_widget) );
 138
 139     return GtkAppendHelper(menu, item);
 140 }
 141
 142 void wxChoice::DoSetItemClientData( int n, void* clientData )
 143 {
 144     wxCHECK_RET( m_widget != NULL, wxT("invalid choice control") );
 145
 146     wxNode *node = m_clientList.Nth( n );
 147     wxCHECK_RET( node, wxT("invalid index in wxChoice::DoSetItemClientData") );
 148
 149     node->SetData( (wxObject*) clientData );
 150 }
 151
 152 void* wxChoice::DoGetItemClientData( int n ) const
 153 {
 154     wxCHECK_MSG( m_widget != NULL, NULL, wxT("invalid choice control") );
 155
 156     wxNode *node = m_clientList.Nth( n );
 157     wxCHECK_MSG( node, NULL, wxT("invalid index in wxChoice::DoGetItemClientData") );
 158
 159     return node->Data();
 160 }
 161
 162 void wxChoice::DoSetItemClientObject( int n, wxClientData* clientData )
 163 {
 164     wxCHECK_RET( m_widget != NULL, wxT("invalid choice control") );
 165
 166     wxNode *node = m_clientList.Nth( n );
 167     wxCHECK_RET( node, wxT("invalid index in wxChoice::DoSetItemClientObject") );
 168
 169     wxClientData *cd = (wxClientData*) node->Data();
 170     delete cd;
 171
 172     node->SetData( (wxObject*) clientData );
 173 }
 174
 175 wxClientData* wxChoice::DoGetItemClientObject( int n ) const
 176 {
 177     wxCHECK_MSG( m_widget != NULL, (wxClientData*) NULL, wxT("invalid choice control") );
 178
 179     wxNode *node = m_clientList.Nth( n );
 180     wxCHECK_MSG( node, (wxClientData *)NULL,
 181                  wxT("invalid index in wxChoice::DoGetItemClientObject") );
 182
 183     return (wxClientData*) node->Data();
 184 }
 185
 186 void wxChoice::Clear()
 187 {
 188     wxCHECK_RET( m_widget != NULL, wxT("invalid choice") );
 189
 190     gtk_option_menu_remove_menu( GTK_OPTION_MENU(m_widget) );
 191     GtkWidget *menu = gtk_menu_new();
 192     gtk_option_menu_set_menu( GTK_OPTION_MENU(m_widget), menu );
 193
 194     if ( HasClientObjectData() )
 195     {
 196         // destroy the data (due to Robert's idea of using wxList<wxObject>
 197         // and not wxList<wxClientData> we can't just say
 198         // m_clientList.DeleteContents(TRUE) - this would crash!
 199         wxNode *node = m_clientList.First();
 200         while ( node )
 201         {
 202             delete (wxClientData *)node->Data();
 203             node = node->Next();
 204         }
 205     }
 206     m_clientList.Clear();
 207
 208     if ( m_strings )
 209         m_strings->Clear();
 210 }
 211
 212 void wxChoice::Delete( int n )
 213 {
 214     wxCHECK_RET( m_widget != NULL, wxT("invalid choice") );
 215
 216     // VZ: apparently GTK+ doesn't have a built-in function to do it (not even
 217     //     in 2.0), hence this dump implementation - still better than nothing
 218     int i,
 219         count = GetCount();
 220
 221     wxCHECK_RET( n >= 0 && n < count, _T("invalid index in wxChoice::Delete") );
 222
 223     wxArrayString items;
 224     items.Alloc(count);
 225     for ( i = 0; i < count; i++ )
 226     {
 227         if ( i != n )
 228             items.Add(GetString(i));
 229     }
 230
 231     Clear();
 232
 233     for ( i = 0; i < count - 1; i++ )
 234     {
 235         Append(items[i]);
 236     }
 237 }
 238
 239 int wxChoice::FindString( const wxString &string ) const
 240 {
 241     wxCHECK_MSG( m_widget != NULL, -1, wxT("invalid choice") );
 242
 243     // If you read this code once and you think you understand
 244     // it, then you are very wrong. Robert Roebling.
 245
 246     GtkMenuShell *menu_shell = GTK_MENU_SHELL( gtk_option_menu_get_menu( GTK_OPTION_MENU(m_widget) ) );
 247     int count = 0;
 248     GList *child = menu_shell->children;
 249     while (child)
 250     {
 251         GtkBin *bin = GTK_BIN( child->data );
 252         GtkLabel *label = (GtkLabel *) NULL;
 253         if (bin->child)
 254             label = GTK_LABEL(bin->child);
 255         if (!label)
 256             label = GTK_LABEL( BUTTON_CHILD(m_widget) );
 257
 258         wxASSERT_MSG( label != NULL , wxT("wxChoice: invalid label") );
 259
 260         if (string == wxString(label->label,*wxConvCurrent))
 261             return count;
 262
 263         child = child->next;
 264         count++;
 265     }
 266
 267     return -1;
 268 }
 269
 270 int wxChoice::GetSelection() const
 271 {
 272     wxCHECK_MSG( m_widget != NULL, -1, wxT("invalid choice") );
 273
 274     GtkMenuShell *menu_shell = GTK_MENU_SHELL( gtk_option_menu_get_menu( GTK_OPTION_MENU(m_widget) ) );
 275     int count = 0;
 276     GList *child = menu_shell->children;
 277     while (child)
 278     {
 279         GtkBin *bin = GTK_BIN( child->data );
 280         if (!bin->child) return count;
 281         child = child->next;
 282         count++;
 283     }
 284
 285     return -1;
 286 }
 287
 288 void wxChoice::SetString( int WXUNUSED(n), const wxString& WXUNUSED(string) )
 289 {
 290     wxCHECK_RET( m_widget != NULL, wxT("invalid choice") );
 291
 292     wxFAIL_MSG(wxT("not implemented"));
 293 }
 294
 295 wxString wxChoice::GetString( int n ) const
 296 {
 297     wxCHECK_MSG( m_widget != NULL, wxT(""), wxT("invalid choice") );
 298
 299     GtkMenuShell *menu_shell = GTK_MENU_SHELL( gtk_option_menu_get_menu( GTK_OPTION_MENU(m_widget) ) );
 300     int count = 0;
 301     GList *child = menu_shell->children;
 302     while (child)
 303     {
 304         GtkBin *bin = GTK_BIN( child->data );
 305         if (count == n)
 306         {
 307             GtkLabel *label = (GtkLabel *) NULL;
 308             if (bin->child)
 309                 label = GTK_LABEL(bin->child);
 310             if (!label)
 311                 label = GTK_LABEL( BUTTON_CHILD(m_widget) );
 312
 313             wxASSERT_MSG( label != NULL , wxT("wxChoice: invalid label") );
 314
 315             return wxString(label->label,*wxConvCurrent);
 316         }
 317         child = child->next;
 318         count++;
 319     }
 320
 321     wxFAIL_MSG( wxT("wxChoice: invalid index in GetString()") );
 322
 323     return wxT("");
 324 }
 325
 326 int wxChoice::GetCount() const
 327 {
 328     wxCHECK_MSG( m_widget != NULL, 0, wxT("invalid choice") );
 329
 330     GtkMenuShell *menu_shell = GTK_MENU_SHELL( gtk_option_menu_get_menu( GTK_OPTION_MENU(m_widget) ) );
 331     int count = 0;
 332     GList *child = menu_shell->children;
 333     while (child)
 334     {
 335         count++;
 336         child = child->next;
 337     }
 338     return count;
 339 }
 340
 341 void wxChoice::SetSelection( int n )
 342 {
 343     wxCHECK_RET( m_widget != NULL, wxT("invalid choice") );
 344
 345     int tmp = n;
 346     gtk_option_menu_set_history( GTK_OPTION_MENU(m_widget), (gint)tmp );
 347 }
 348
 349 void wxChoice::ApplyWidgetStyle()
 350 {
 351     SetWidgetStyle();
 352
 353     GtkMenuShell *menu_shell = GTK_MENU_SHELL( gtk_option_menu_get_menu( GTK_OPTION_MENU(m_widget) ) );
 354
 355     gtk_widget_set_style( m_widget, m_widgetStyle );
 356     gtk_widget_set_style( GTK_WIDGET( menu_shell ), m_widgetStyle );
 357
 358     GList *child = menu_shell->children;
 359     while (child)
 360     {
 361         gtk_widget_set_style( GTK_WIDGET( child->data ), m_widgetStyle );
 362
 363         GtkBin *bin = GTK_BIN( child->data );
 364         GtkWidget *label = (GtkWidget *) NULL;
 365         if (bin->child)
 366             label = bin->child;
 367         if (!label)
 368             label = BUTTON_CHILD(m_widget);
 369
 370         gtk_widget_set_style( label, m_widgetStyle );
 371
 372         child = child->next;
 373     }
 374 }
 375
 376 size_t wxChoice::GtkAppendHelper(GtkWidget *menu, const wxString& item)
 377 {
 378     GtkWidget *menu_item = gtk_menu_item_new_with_label( item.mbc_str() );
 379
 380     size_t index;
 381     if ( m_strings )
 382     {
 383         // sorted control, need to insert at the correct index
 384         index = m_strings->Add(item);
 385
 386         gtk_menu_insert( GTK_MENU(menu), menu_item, index );
 387
 388         if ( index )
 389         {
 390             m_clientList.Insert( m_clientList.Item(index - 1),
 391                                  (wxObject*) NULL );
 392         }
 393         else
 394         {
 395             m_clientList.Insert( (wxObject*) NULL );
 396         }
 397     }
 398     else
 399     {
 400         // normal control, just append
 401         gtk_menu_append( GTK_MENU(menu), menu_item );
 402
 403         m_clientList.Append( (wxObject*) NULL );
 404
 405         // don't call wxChoice::GetCount() from here because it doesn't work
 406         // if we're called from ctor (and GtkMenuShell is still NULL)
 407         index = m_clientList.GetCount() - 1;
 408     }
 409
 410     if (GTK_WIDGET_REALIZED(m_widget))
 411     {
 412         gtk_widget_realize( menu_item );
 413         gtk_widget_realize( GTK_BIN(menu_item)->child );
 414
 415         if (m_widgetStyle) ApplyWidgetStyle();
 416     }
 417
 418     gtk_signal_connect( GTK_OBJECT( menu_item ), "activate",
 419       GTK_SIGNAL_FUNC(gtk_choice_clicked_callback), (gpointer*)this );
 420
 421     gtk_widget_show( menu_item );
 422
 423     // return the index of the item in the control
 424     return index;
 425 }
 426
 427 wxSize wxChoice::DoGetBestSize() const
 428 {
 429     wxSize ret( wxControl::DoGetBestSize() );
 430
 431     // we know better our horizontal extent: it depends on the longest string
 432     // we have
 433     ret.x = 0;
 434     if ( m_widget )
 435     {
 436         GdkFont *font = m_font.GetInternalFont();
 437
 438         wxCoord width;
 439         size_t count = GetCount();
 440         for ( size_t n = 0; n < count; n++ )
 441         {
 442             width = (wxCoord)gdk_string_width(font, GetString(n).mbc_str());
 443             if ( width > ret.x )
 444                 ret.x = width;
 445         }
 446
 447         // add extra for the choice "=" button
 448
 449         // VZ: I don't know how to get the right value, it seems to be in
 450         //     GtkOptionMenuProps struct from gtkoptionmenu.c but we can't get
 451         //     to it - maybe we can use gtk_option_menu_size_request() for this
 452         //     somehow?
 453         //
 454         //     This default value works only for the default GTK+ theme (i.e.
 455         //     no theme at all) (FIXME)
 456         static const int widthChoiceIndicator = 35;
 457         ret.x += widthChoiceIndicator;
 458     }
 459
 460     // but not less than the minimal width
 461     if ( ret.x < 80 )
 462         ret.x = 80;
 463
 464     ret.y = 16 + gdk_char_height(GET_STYLE_FONT( m_widget->style ), 'H');
 465
 466     return ret;
 467 }
 468
 469 #endif // wxUSE_CHOICE
 470