wxItemContainer already deletes client data; don't delete (again) the
[wxWidgets.git] / src / gtk / 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 // wxItemContainer already deletes data for us
170
171 node->SetData( (wxObject*) clientData );
172 }
173
174 wxClientData* wxChoice::DoGetItemClientObject( int n ) const
175 {
176 wxCHECK_MSG( m_widget != NULL, (wxClientData*) NULL, wxT("invalid choice control") );
177
178 wxNode *node = m_clientList.Nth( n );
179 wxCHECK_MSG( node, (wxClientData *)NULL,
180 wxT("invalid index in wxChoice::DoGetItemClientObject") );
181
182 return (wxClientData*) node->Data();
183 }
184
185 void wxChoice::Clear()
186 {
187 wxCHECK_RET( m_widget != NULL, wxT("invalid choice") );
188
189 gtk_option_menu_remove_menu( GTK_OPTION_MENU(m_widget) );
190 GtkWidget *menu = gtk_menu_new();
191 gtk_option_menu_set_menu( GTK_OPTION_MENU(m_widget), menu );
192
193 if ( HasClientObjectData() )
194 {
195 // destroy the data (due to Robert's idea of using wxList<wxObject>
196 // and not wxList<wxClientData> we can't just say
197 // m_clientList.DeleteContents(TRUE) - this would crash!
198 wxNode *node = m_clientList.First();
199 while ( node )
200 {
201 delete (wxClientData *)node->Data();
202 node = node->Next();
203 }
204 }
205 m_clientList.Clear();
206
207 if ( m_strings )
208 m_strings->Clear();
209 }
210
211 void wxChoice::Delete( int n )
212 {
213 wxCHECK_RET( m_widget != NULL, wxT("invalid choice") );
214
215 // VZ: apparently GTK+ doesn't have a built-in function to do it (not even
216 // in 2.0), hence this dump implementation - still better than nothing
217 int i,
218 count = GetCount();
219
220 wxCHECK_RET( n >= 0 && n < count, _T("invalid index in wxChoice::Delete") );
221
222 wxArrayString items;
223 items.Alloc(count);
224 for ( i = 0; i < count; i++ )
225 {
226 if ( i != n )
227 items.Add(GetString(i));
228 }
229
230 Clear();
231
232 for ( i = 0; i < count - 1; i++ )
233 {
234 Append(items[i]);
235 }
236 }
237
238 int wxChoice::FindString( const wxString &string ) const
239 {
240 wxCHECK_MSG( m_widget != NULL, -1, wxT("invalid choice") );
241
242 // If you read this code once and you think you understand
243 // it, then you are very wrong. Robert Roebling.
244
245 GtkMenuShell *menu_shell = GTK_MENU_SHELL( gtk_option_menu_get_menu( GTK_OPTION_MENU(m_widget) ) );
246 int count = 0;
247 GList *child = menu_shell->children;
248 while (child)
249 {
250 GtkBin *bin = GTK_BIN( child->data );
251 GtkLabel *label = (GtkLabel *) NULL;
252 if (bin->child)
253 label = GTK_LABEL(bin->child);
254 if (!label)
255 label = GTK_LABEL( BUTTON_CHILD(m_widget) );
256
257 wxASSERT_MSG( label != NULL , wxT("wxChoice: invalid label") );
258
259 #ifdef __WXGTK20__
260 wxString tmp( wxGTK_CONV_BACK( gtk_label_get_text( label) ) );
261 #else
262 wxString tmp( label->label );
263 #endif
264 if (string == tmp)
265 return count;
266
267 child = child->next;
268 count++;
269 }
270
271 return -1;
272 }
273
274 int wxChoice::GetSelection() const
275 {
276 wxCHECK_MSG( m_widget != NULL, -1, wxT("invalid choice") );
277
278 #ifdef __WXGTK20__
279
280 return gtk_option_menu_get_history( GTK_OPTION_MENU(m_widget) );
281
282 #else
283 GtkMenuShell *menu_shell = GTK_MENU_SHELL( gtk_option_menu_get_menu( GTK_OPTION_MENU(m_widget) ) );
284 int count = 0;
285
286 GList *child = menu_shell->children;
287 while (child)
288 {
289 GtkBin *bin = GTK_BIN( child->data );
290 if (!bin->child) return count;
291 child = child->next;
292 count++;
293 }
294
295 return -1;
296 #endif
297 }
298
299 void wxChoice::SetString( int WXUNUSED(n), const wxString& WXUNUSED(string) )
300 {
301 wxCHECK_RET( m_widget != NULL, wxT("invalid choice") );
302
303 wxFAIL_MSG(wxT("not implemented"));
304 }
305
306 wxString wxChoice::GetString( int n ) const
307 {
308 wxCHECK_MSG( m_widget != NULL, wxT(""), wxT("invalid choice") );
309
310 GtkMenuShell *menu_shell = GTK_MENU_SHELL( gtk_option_menu_get_menu( GTK_OPTION_MENU(m_widget) ) );
311 int count = 0;
312 GList *child = menu_shell->children;
313 while (child)
314 {
315 GtkBin *bin = GTK_BIN( child->data );
316 if (count == n)
317 {
318 GtkLabel *label = (GtkLabel *) NULL;
319 if (bin->child)
320 label = GTK_LABEL(bin->child);
321 if (!label)
322 label = GTK_LABEL( BUTTON_CHILD(m_widget) );
323
324 wxASSERT_MSG( label != NULL , wxT("wxChoice: invalid label") );
325
326 #ifdef __WXGTK20__
327 return wxString( wxGTK_CONV_BACK( gtk_label_get_text( label) ) );
328 #else
329 return wxString( label->label );
330 #endif
331 }
332 child = child->next;
333 count++;
334 }
335
336 wxFAIL_MSG( wxT("wxChoice: invalid index in GetString()") );
337
338 return wxT("");
339 }
340
341 int wxChoice::GetCount() const
342 {
343 wxCHECK_MSG( m_widget != NULL, 0, wxT("invalid choice") );
344
345 GtkMenuShell *menu_shell = GTK_MENU_SHELL( gtk_option_menu_get_menu( GTK_OPTION_MENU(m_widget) ) );
346 int count = 0;
347 GList *child = menu_shell->children;
348 while (child)
349 {
350 count++;
351 child = child->next;
352 }
353 return count;
354 }
355
356 void wxChoice::SetSelection( int n )
357 {
358 wxCHECK_RET( m_widget != NULL, wxT("invalid choice") );
359
360 int tmp = n;
361 gtk_option_menu_set_history( GTK_OPTION_MENU(m_widget), (gint)tmp );
362 }
363
364 void wxChoice::ApplyWidgetStyle()
365 {
366 SetWidgetStyle();
367
368 GtkMenuShell *menu_shell = GTK_MENU_SHELL( gtk_option_menu_get_menu( GTK_OPTION_MENU(m_widget) ) );
369
370 gtk_widget_set_style( m_widget, m_widgetStyle );
371 gtk_widget_set_style( GTK_WIDGET( menu_shell ), m_widgetStyle );
372
373 GList *child = menu_shell->children;
374 while (child)
375 {
376 gtk_widget_set_style( GTK_WIDGET( child->data ), m_widgetStyle );
377
378 GtkBin *bin = GTK_BIN( child->data );
379 GtkWidget *label = (GtkWidget *) NULL;
380 if (bin->child)
381 label = bin->child;
382 if (!label)
383 label = BUTTON_CHILD(m_widget);
384
385 gtk_widget_set_style( label, m_widgetStyle );
386
387 child = child->next;
388 }
389 }
390
391 size_t wxChoice::GtkAppendHelper(GtkWidget *menu, const wxString& item)
392 {
393 GtkWidget *menu_item = gtk_menu_item_new_with_label( wxGTK_CONV( item ) );
394
395 size_t index;
396 if ( m_strings )
397 {
398 // sorted control, need to insert at the correct index
399 index = m_strings->Add(item);
400
401 gtk_menu_insert( GTK_MENU(menu), menu_item, index );
402
403 if ( index )
404 {
405 m_clientList.Insert( m_clientList.Item(index - 1),
406 (wxObject*) NULL );
407 }
408 else
409 {
410 m_clientList.Insert( (wxObject*) NULL );
411 }
412 }
413 else
414 {
415 // normal control, just append
416 gtk_menu_append( GTK_MENU(menu), menu_item );
417
418 m_clientList.Append( (wxObject*) NULL );
419
420 // don't call wxChoice::GetCount() from here because it doesn't work
421 // if we're called from ctor (and GtkMenuShell is still NULL)
422 index = m_clientList.GetCount() - 1;
423 }
424
425 if (GTK_WIDGET_REALIZED(m_widget))
426 {
427 gtk_widget_realize( menu_item );
428 gtk_widget_realize( GTK_BIN(menu_item)->child );
429
430 if (m_widgetStyle) ApplyWidgetStyle();
431 }
432
433 gtk_signal_connect( GTK_OBJECT( menu_item ), "activate",
434 GTK_SIGNAL_FUNC(gtk_choice_clicked_callback), (gpointer*)this );
435
436 gtk_widget_show( menu_item );
437
438 // return the index of the item in the control
439 return index;
440 }
441
442 wxSize wxChoice::DoGetBestSize() const
443 {
444 wxSize ret( wxControl::DoGetBestSize() );
445
446 // we know better our horizontal extent: it depends on the longest string
447 // we have
448 ret.x = 0;
449 if ( m_widget )
450 {
451 GdkFont *font = m_font.GetInternalFont();
452
453 wxCoord width;
454 size_t count = GetCount();
455 for ( size_t n = 0; n < count; n++ )
456 {
457 // FIXME GTK 2.0
458 width = (wxCoord)gdk_string_width(font, wxGTK_CONV( GetString(n) ) );
459 if ( width > ret.x )
460 ret.x = width;
461 }
462
463 // add extra for the choice "=" button
464
465 // VZ: I don't know how to get the right value, it seems to be in
466 // GtkOptionMenuProps struct from gtkoptionmenu.c but we can't get
467 // to it - maybe we can use gtk_option_menu_size_request() for this
468 // somehow?
469 //
470 // This default value works only for the default GTK+ theme (i.e.
471 // no theme at all) (FIXME)
472 static const int widthChoiceIndicator = 35;
473 ret.x += widthChoiceIndicator;
474 }
475
476 // but not less than the minimal width
477 if ( ret.x < 80 )
478 ret.x = 80;
479
480 ret.y = 16 + gdk_char_height(GET_STYLE_FONT( m_widget->style ), 'H' );
481
482 return ret;
483 }
484
485 #endif // wxUSE_CHOICE
486