]> git.saurik.com Git - wxWidgets.git/blame - samples/controls/controls.cpp
Reverted wxFileSystem changes to image.cpp and dib.cpp
[wxWidgets.git] / samples / controls / controls.cpp
CommitLineData
1c005ff7 1/////////////////////////////////////////////////////////////////////////////
dfad0599 2// Name: controls.cpp
1c005ff7
RR
3// Purpose: Controls wxWindows sample
4// Author: Robert Roebling
5// Modified by:
6// RCS-ID: $Id$
c67d8618 7// Copyright: (c) Robert Roebling, Julian Smart
655822f3 8// Licence: wxWindows license
1c005ff7
RR
9/////////////////////////////////////////////////////////////////////////////
10
11#ifdef __GNUG__
9f3362c4 12 #pragma implementation "controls.h"
1c005ff7
RR
13#endif
14
15// For compilers that support precompilation, includes "wx/wx.h".
16#include "wx/wxprec.h"
17
18#ifdef __BORLANDC__
9f3362c4 19 #pragma hdrstop
1c005ff7
RR
20#endif
21
22#ifndef WX_PRECOMP
9f3362c4 23 #include "wx/wx.h"
1c005ff7
RR
24#endif
25
3372145d 26#if !defined( __WXMSW__ ) || defined( __WIN95__ )
4fabb575 27#include "wx/spinbutt.h"
3372145d 28#endif
1db8dc4a 29#include "wx/tglbtn.h"
53b28675 30#include "wx/notebook.h"
2cb21a45 31#include "wx/imaglist.h"
b8653fbf
VZ
32
33#if wxUSE_TOOLTIPS
34 #include "wx/tooltip.h"
35#endif
1c005ff7 36
4b5f3fe6 37#if defined(__WXGTK__) || defined(__WXMOTIF__)
73c700fd 38 #define USE_XPM
4fabb575
JS
39#endif
40
41#ifdef USE_XPM
73c700fd
VZ
42 #include "mondrian.xpm"
43 #include "icons/choice.xpm"
44 #include "icons/combo.xpm"
45 #include "icons/list.xpm"
46 #include "icons/radio.xpm"
47 #include "icons/text.xpm"
48 #include "icons/gauge.xpm"
47908e25
RR
49#endif
50
9726da4f
VZ
51#ifdef __WIN16__
52 // Win16 doesn't have them
ad556aa9 53 #ifdef wxUSE_SPINBTN
0e528b99 54 #undef wxUSE_SPINBTN
ad556aa9 55 #endif
0e528b99 56 #define wxUSE_SPINBTN 0
b782f2e0 57#else
ad556aa9
JS
58 #ifndef wxUSE_SPINBTN
59 #define wxUSE_SPINBTN 1
b782f2e0 60 #endif
9726da4f
VZ
61#endif // __WIN16__
62
63#include "wx/progdlg.h"
64
b782f2e0
VZ
65#if wxUSE_SPINCTRL
66 #include "wx/spinctrl.h"
67#endif // wxUSE_SPINCTRL
68
1c005ff7
RR
69//----------------------------------------------------------------------
70// class definitions
71//----------------------------------------------------------------------
72
73class MyApp: public wxApp
655822f3 74{
b8653fbf
VZ
75public:
76 bool OnInit();
1c005ff7
RR
77};
78
79class MyPanel: public wxPanel
80{
b8653fbf 81public:
1c005ff7 82 MyPanel(wxFrame *frame, int x, int y, int w, int h);
2cb21a45 83 virtual ~MyPanel();
16f6dfd8 84
1c005ff7
RR
85 void OnSize( wxSizeEvent& event );
86 void OnListBox( wxCommandEvent &event );
5b077d48 87 void OnListBoxDoubleClick( wxCommandEvent &event );
1c005ff7 88 void OnListBoxButtons( wxCommandEvent &event );
47908e25
RR
89 void OnChoice( wxCommandEvent &event );
90 void OnChoiceButtons( wxCommandEvent &event );
91 void OnCombo( wxCommandEvent &event );
f6bcfd97
BP
92 void OnComboTextChanged( wxCommandEvent &event );
93 void OnComboTextEnter( wxCommandEvent &event );
47908e25
RR
94 void OnComboButtons( wxCommandEvent &event );
95 void OnRadio( wxCommandEvent &event );
96 void OnRadioButtons( wxCommandEvent &event );
868a2826 97 void OnSetFont( wxCommandEvent &event );
cb43b372 98 void OnPageChanged( wxNotebookEvent &event );
4d0f3cd6 99 void OnPageChanging( wxNotebookEvent &event );
7bce6aec 100 void OnSliderUpdate( wxCommandEvent &event );
185fa6bf 101 void OnUpdateLabel( wxCommandEvent &event );
0e528b99 102#if wxUSE_SPINBTN
8c3c31d4
VZ
103 void OnSpinUp( wxSpinEvent &event );
104 void OnSpinDown( wxSpinEvent &event );
e380f72b 105 void OnSpinUpdate( wxSpinEvent &event );
9726da4f
VZ
106 void OnUpdateShowProgress( wxUpdateUIEvent& event );
107 void OnShowProgress( wxCommandEvent &event );
0e528b99 108#endif // wxUSE_SPINBTN
16f6dfd8 109
baccb514 110#if wxUSE_SPINCTRL
457e6c54 111 void OnSpinCtrl(wxSpinEvent& event);
baccb514
VZ
112#endif // wxUSE_SPINCTRL
113
87a1e308
VZ
114 void OnEnableAll(wxCommandEvent& event);
115 void OnChangeColour(wxCommandEvent& event);
3e2dd3db 116 void OnTestButton(wxCommandEvent& event);
9121bed2 117 void OnBmpButton(wxCommandEvent& event);
87a1e308 118
6c8a980f
VZ
119 wxListBox *m_listbox,
120 *m_listboxSorted;
b56c2246
VZ
121 wxChoice *m_choice,
122 *m_choiceSorted;
e380f72b
RR
123 wxComboBox *m_combo;
124 wxRadioBox *m_radio;
37ed3ae3
VZ
125 wxGauge *m_gauge,
126 *m_gaugeVert;
e380f72b
RR
127 wxSlider *m_slider;
128 wxButton *m_fontButton;
85eb36c2
RR
129 wxButton *m_lbSelectNum;
130 wxButton *m_lbSelectThis;
0e528b99 131#if wxUSE_SPINBTN
e380f72b 132 wxSpinButton *m_spinbutton;
9726da4f 133 wxButton *m_btnProgress;
0e528b99 134#endif // wxUSE_SPINBTN
b782f2e0
VZ
135
136#if wxUSE_SPINCTRL
137 wxSpinCtrl *m_spinctrl;
138#endif // wxUSE_SPINCTRL
139
e380f72b 140 wxTextCtrl *m_spintext;
ae0bdb01 141 wxCheckBox *m_checkbox;
16f6dfd8 142
e380f72b 143 wxTextCtrl *m_text;
655822f3
VZ
144 wxNotebook *m_notebook;
145
185fa6bf
VZ
146 wxStaticText *m_label;
147
b8653fbf 148private:
29e7e51a
VZ
149 wxLog *m_logTargetOld;
150
b8653fbf 151 DECLARE_EVENT_TABLE()
1c005ff7
RR
152};
153
154class MyFrame: public wxFrame
155{
b8653fbf 156public:
1c005ff7 157 MyFrame(wxFrame *frame, char *title, int x, int y, int w, int h);
655822f3 158
1c005ff7
RR
159 void OnQuit(wxCommandEvent& event);
160 void OnAbout(wxCommandEvent& event);
3e2dd3db 161 void OnClearLog(wxCommandEvent& event);
87a1e308 162
16f6dfd8
VZ
163#if wxUSE_TOOLTIPS
164 void OnSetTooltipDelay(wxCommandEvent& event);
165 void OnToggleTooltips(wxCommandEvent& event);
166#endif // wxUSE_TOOLTIPS
87a1e308
VZ
167
168 void OnEnableAll(wxCommandEvent& event);
169
9f3362c4 170 void OnIdle( wxIdleEvent& event );
5fb9fcfc 171 void OnSize( wxSizeEvent& event );
97206645 172 void OnMove( wxMoveEvent& event );
655822f3 173
f048e32f
VZ
174 MyPanel *GetPanel() const { return m_panel; }
175
b8653fbf 176private:
97206645
VZ
177 void UpdateStatusBar(const wxPoint& pos, const wxSize& size)
178 {
179 wxString msg;
a1f79c1e
VZ
180 wxSize sizeCl = GetClientSize();
181 msg.Printf(_("pos=(%d, %d), size=%dx%d (client=%dx%d)"),
182 pos.x, pos.y,
183 size.x, size.y,
184 sizeCl.x, sizeCl.y);
97206645
VZ
185 SetStatusText(msg, 1);
186 }
187
f048e32f 188 MyPanel *m_panel;
87a1e308 189
b8653fbf 190 DECLARE_EVENT_TABLE()
1c005ff7
RR
191};
192
f6bcfd97
BP
193// a button which intercepts double clicks (for testing...)
194class MyButton : public wxButton
195{
196public:
197 MyButton(wxWindow *parent,
198 wxWindowID id,
199 const wxString& label = wxEmptyString,
200 const wxPoint& pos = wxDefaultPosition,
201 const wxSize& size = wxDefaultSize)
202 : wxButton(parent, id, label, pos, size)
203 {
204 }
205
206 void OnDClick(wxMouseEvent& event)
207 {
208 wxLogMessage(_T("MyButton::OnDClick"));
209
210 event.Skip();
211 }
212
213private:
214 DECLARE_EVENT_TABLE()
215};
216
217// a combo which intercepts chars (to test Windows behaviour)
218class MyComboBox : public wxComboBox
219{
220public:
221 MyComboBox(wxWindow *parent, wxWindowID id,
222 const wxString& value = wxEmptyString,
223 const wxPoint& pos = wxDefaultPosition,
224 const wxSize& size = wxDefaultSize,
225 int n = 0, const wxString choices[] = NULL,
226 long style = 0,
227 const wxValidator& validator = wxDefaultValidator,
228 const wxString& name = wxComboBoxNameStr)
229 : wxComboBox(parent, id, value, pos, size, n, choices, style,
230 validator, name) { }
231
232protected:
233 void OnChar(wxKeyEvent& event);
234 void OnKeyDown(wxKeyEvent& event);
235 void OnKeyUp(wxKeyEvent& event);
236 void OnFocusGot(wxFocusEvent& event)
237 {
238 wxLogMessage(_T("MyComboBox::OnFocusGot"));
239
240 event.Skip();
241 }
242
243private:
244 DECLARE_EVENT_TABLE()
245};
246
247// a radiobox which handles focus set/kill (for testing)
248class MyRadioBox : public wxRadioBox
249{
250public:
251 MyRadioBox(wxWindow *parent,
252 wxWindowID id,
253 const wxString& title = wxEmptyString,
254 const wxPoint& pos = wxDefaultPosition,
255 const wxSize& size = wxDefaultSize,
256 int n = 0, const wxString choices[] = NULL,
257 int majorDim = 1,
258 long style = wxRA_HORIZONTAL,
259 const wxValidator& validator = wxDefaultValidator,
0bb62421 260 const wxString& name = wxRadioBoxNameStr)
f6bcfd97
BP
261 : wxRadioBox(parent, id, title, pos, size, n, choices, majorDim,
262 style, validator, name) { }
263
264protected:
265 void OnFocusGot(wxFocusEvent& event)
266 {
267 wxLogMessage(_T("MyRadioBox::OnFocusGot"));
268
269 event.Skip();
270 }
271
272 void OnFocusLost(wxFocusEvent& event)
273 {
274 wxLogMessage(_T("MyRadioBox::OnFocusLost"));
275
276 event.Skip();
277 }
278
279private:
280 DECLARE_EVENT_TABLE()
281};
282
1c005ff7 283//----------------------------------------------------------------------
6c8a980f 284// other
1c005ff7
RR
285//----------------------------------------------------------------------
286
6c8a980f
VZ
287static void SetControlClientData(const char *name,
288 wxControlWithItems *control);
289
d59051dd 290IMPLEMENT_APP(MyApp)
1c005ff7
RR
291
292//----------------------------------------------------------------------
293// MyApp
294//----------------------------------------------------------------------
295
16f6dfd8
VZ
296enum
297{
3e2dd3db
VZ
298 CONTROLS_QUIT = 100,
299 CONTROLS_TEXT,
300 CONTROLS_ABOUT,
301 CONTROLS_CLEAR_LOG,
16f6dfd8
VZ
302
303 // tooltip menu
3e2dd3db
VZ
304 CONTROLS_SET_TOOLTIP_DELAY = 200,
305 CONTROLS_ENABLE_TOOLTIPS,
87a1e308
VZ
306
307 // panel menu
3e2dd3db 308 CONTROLS_ENABLE_ALL
16f6dfd8 309};
1c005ff7 310
b8653fbf 311bool MyApp::OnInit()
1c005ff7 312{
e66ad5c6
VZ
313 // parse the cmd line
314 int x = 50,
315 y = 50;
3ca6a5f0 316 if ( argc == 3 )
e66ad5c6
VZ
317 {
318 wxSscanf(argv[1], "%d", &x);
319 wxSscanf(argv[2], "%d", &y);
320 }
321
ec9f7884
VZ
322 // Create the main frame window
323 MyFrame *frame = new MyFrame((wxFrame *) NULL,
324 "Controls wxWindows App",
fb5dc8a2 325 x, y, 540, 430);
29e7e51a 326
fb5dc8a2 327 frame->SetSizeHints( 500, 425 );
655822f3 328
ec9f7884
VZ
329 // Give it an icon
330 // The wxICON() macros loads an icon from a resource under Windows
331 // and uses an #included XPM image under GTK+ and Motif
655822f3 332
ec9f7884 333 frame->SetIcon( wxICON(mondrian) );
1c005ff7 334
6adaedf0
JS
335 wxMenu *file_menu = new wxMenu("", wxMENU_TEAROFF);
336
3e2dd3db 337 file_menu->Append(CONTROLS_CLEAR_LOG, "&Clear log\tCtrl-L");
87a1e308 338 file_menu->AppendSeparator();
3e2dd3db
VZ
339 file_menu->Append(CONTROLS_ABOUT, "&About\tF1");
340 file_menu->AppendSeparator();
341 file_menu->Append(CONTROLS_QUIT, "E&xit\tAlt-X", "Quit controls sample");
16f6dfd8 342
33caefb3 343 wxMenuBar *menu_bar = new wxMenuBar;
ec9f7884 344 menu_bar->Append(file_menu, "&File");
16f6dfd8
VZ
345
346#if wxUSE_TOOLTIPS
ec9f7884 347 wxMenu *tooltip_menu = new wxMenu;
3e2dd3db 348 tooltip_menu->Append(CONTROLS_SET_TOOLTIP_DELAY, "Set &delay\tCtrl-D");
ec9f7884 349 tooltip_menu->AppendSeparator();
3e2dd3db 350 tooltip_menu->Append(CONTROLS_ENABLE_TOOLTIPS, "&Toggle tooltips\tCtrl-T",
ec9f7884 351 "enable/disable tooltips", TRUE);
3e2dd3db 352 tooltip_menu->Check(CONTROLS_ENABLE_TOOLTIPS, TRUE);
ec9f7884 353 menu_bar->Append(tooltip_menu, "&Tooltips");
16f6dfd8
VZ
354#endif // wxUSE_TOOLTIPS
355
87a1e308 356 wxMenu *panel_menu = new wxMenu;
3e2dd3db 357 panel_menu->Append(CONTROLS_ENABLE_ALL, "&Disable all\tCtrl-E",
87a1e308
VZ
358 "Enable/disable all panel controls", TRUE);
359 menu_bar->Append(panel_menu, "&Panel");
360
ec9f7884 361 frame->SetMenuBar(menu_bar);
1c005ff7 362
ec9f7884 363 frame->Show(TRUE);
655822f3 364
ee6e1b1d 365 //frame->GetPanel()->m_notebook->SetSelection(6);
f048e32f 366
ec9f7884 367 SetTopWindow(frame);
1c005ff7 368
ec9f7884 369 return TRUE;
1c005ff7
RR
370}
371
372//----------------------------------------------------------------------
373// MyPanel
374//----------------------------------------------------------------------
375
4fabb575 376const int ID_NOTEBOOK = 1000;
1c005ff7 377
4fabb575
JS
378const int ID_LISTBOX = 130;
379const int ID_LISTBOX_SEL_NUM = 131;
380const int ID_LISTBOX_SEL_STR = 132;
381const int ID_LISTBOX_CLEAR = 133;
382const int ID_LISTBOX_APPEND = 134;
383const int ID_LISTBOX_DELETE = 135;
384const int ID_LISTBOX_FONT = 136;
385const int ID_LISTBOX_ENABLE = 137;
6c8a980f 386const int ID_LISTBOX_SORTED = 138;
1c005ff7 387
4fabb575
JS
388const int ID_CHOICE = 120;
389const int ID_CHOICE_SEL_NUM = 121;
390const int ID_CHOICE_SEL_STR = 122;
391const int ID_CHOICE_CLEAR = 123;
392const int ID_CHOICE_APPEND = 124;
393const int ID_CHOICE_DELETE = 125;
394const int ID_CHOICE_FONT = 126;
395const int ID_CHOICE_ENABLE = 127;
b56c2246 396const int ID_CHOICE_SORTED = 128;
53010e52 397
4fabb575
JS
398const int ID_COMBO = 140;
399const int ID_COMBO_SEL_NUM = 141;
400const int ID_COMBO_SEL_STR = 142;
401const int ID_COMBO_CLEAR = 143;
402const int ID_COMBO_APPEND = 144;
403const int ID_COMBO_DELETE = 145;
404const int ID_COMBO_FONT = 146;
405const int ID_COMBO_ENABLE = 147;
53010e52 406
4fabb575
JS
407const int ID_RADIOBOX = 160;
408const int ID_RADIOBOX_SEL_NUM = 161;
409const int ID_RADIOBOX_SEL_STR = 162;
410const int ID_RADIOBOX_FONT = 163;
411const int ID_RADIOBOX_ENABLE = 164;
868a2826 412
f5d29b39
RR
413const int ID_RADIOBUTTON_1 = 166;
414const int ID_RADIOBUTTON_2 = 167;
415
4fabb575 416const int ID_SET_FONT = 170;
47908e25 417
4fabb575
JS
418const int ID_GAUGE = 180;
419const int ID_SLIDER = 181;
58614078 420
4fabb575 421const int ID_SPIN = 182;
9726da4f 422const int ID_BTNPROGRESS = 183;
185fa6bf 423const int ID_BUTTON_LABEL = 184;
baccb514 424const int ID_SPINCTRL = 185;
e380f72b 425
3e2dd3db
VZ
426const int ID_BUTTON_TEST1 = 190;
427const int ID_BUTTON_TEST2 = 191;
9121bed2 428const int ID_BITMAP_BTN = 192;
3e2dd3db 429
87a1e308
VZ
430const int ID_CHANGE_COLOUR = 200;
431
1c005ff7 432BEGIN_EVENT_TABLE(MyPanel, wxPanel)
ec9f7884 433EVT_SIZE ( MyPanel::OnSize)
4d0f3cd6 434EVT_NOTEBOOK_PAGE_CHANGING(ID_NOTEBOOK, MyPanel::OnPageChanging)
ec9f7884
VZ
435EVT_NOTEBOOK_PAGE_CHANGED(ID_NOTEBOOK, MyPanel::OnPageChanged)
436EVT_LISTBOX (ID_LISTBOX, MyPanel::OnListBox)
6c8a980f 437EVT_LISTBOX (ID_LISTBOX_SORTED, MyPanel::OnListBox)
ec9f7884
VZ
438EVT_LISTBOX_DCLICK(ID_LISTBOX, MyPanel::OnListBoxDoubleClick)
439EVT_BUTTON (ID_LISTBOX_SEL_NUM, MyPanel::OnListBoxButtons)
440EVT_BUTTON (ID_LISTBOX_SEL_STR, MyPanel::OnListBoxButtons)
441EVT_BUTTON (ID_LISTBOX_CLEAR, MyPanel::OnListBoxButtons)
442EVT_BUTTON (ID_LISTBOX_APPEND, MyPanel::OnListBoxButtons)
443EVT_BUTTON (ID_LISTBOX_DELETE, MyPanel::OnListBoxButtons)
444EVT_BUTTON (ID_LISTBOX_FONT, MyPanel::OnListBoxButtons)
445EVT_CHECKBOX (ID_LISTBOX_ENABLE, MyPanel::OnListBoxButtons)
446EVT_CHOICE (ID_CHOICE, MyPanel::OnChoice)
b56c2246 447EVT_CHOICE (ID_CHOICE_SORTED, MyPanel::OnChoice)
ec9f7884
VZ
448EVT_BUTTON (ID_CHOICE_SEL_NUM, MyPanel::OnChoiceButtons)
449EVT_BUTTON (ID_CHOICE_SEL_STR, MyPanel::OnChoiceButtons)
450EVT_BUTTON (ID_CHOICE_CLEAR, MyPanel::OnChoiceButtons)
451EVT_BUTTON (ID_CHOICE_APPEND, MyPanel::OnChoiceButtons)
452EVT_BUTTON (ID_CHOICE_DELETE, MyPanel::OnChoiceButtons)
453EVT_BUTTON (ID_CHOICE_FONT, MyPanel::OnChoiceButtons)
454EVT_CHECKBOX (ID_CHOICE_ENABLE, MyPanel::OnChoiceButtons)
455EVT_COMBOBOX (ID_COMBO, MyPanel::OnCombo)
f6bcfd97
BP
456EVT_TEXT (ID_COMBO, MyPanel::OnComboTextChanged)
457EVT_TEXT_ENTER(ID_COMBO, MyPanel::OnComboTextEnter)
ec9f7884
VZ
458EVT_BUTTON (ID_COMBO_SEL_NUM, MyPanel::OnComboButtons)
459EVT_BUTTON (ID_COMBO_SEL_STR, MyPanel::OnComboButtons)
460EVT_BUTTON (ID_COMBO_CLEAR, MyPanel::OnComboButtons)
461EVT_BUTTON (ID_COMBO_APPEND, MyPanel::OnComboButtons)
462EVT_BUTTON (ID_COMBO_DELETE, MyPanel::OnComboButtons)
463EVT_BUTTON (ID_COMBO_FONT, MyPanel::OnComboButtons)
464EVT_CHECKBOX (ID_COMBO_ENABLE, MyPanel::OnComboButtons)
465EVT_RADIOBOX (ID_RADIOBOX, MyPanel::OnRadio)
466EVT_BUTTON (ID_RADIOBOX_SEL_NUM, MyPanel::OnRadioButtons)
467EVT_BUTTON (ID_RADIOBOX_SEL_STR, MyPanel::OnRadioButtons)
468EVT_BUTTON (ID_RADIOBOX_FONT, MyPanel::OnRadioButtons)
469EVT_CHECKBOX (ID_RADIOBOX_ENABLE, MyPanel::OnRadioButtons)
470EVT_BUTTON (ID_SET_FONT, MyPanel::OnSetFont)
471EVT_SLIDER (ID_SLIDER, MyPanel::OnSliderUpdate)
0e528b99 472#if wxUSE_SPINBTN
ec9f7884 473EVT_SPIN (ID_SPIN, MyPanel::OnSpinUpdate)
8c3c31d4
VZ
474EVT_SPIN_UP (ID_SPIN, MyPanel::OnSpinUp)
475EVT_SPIN_DOWN (ID_SPIN, MyPanel::OnSpinDown)
9726da4f
VZ
476EVT_UPDATE_UI (ID_BTNPROGRESS, MyPanel::OnUpdateShowProgress)
477EVT_BUTTON (ID_BTNPROGRESS, MyPanel::OnShowProgress)
0e528b99 478#endif // wxUSE_SPINBTN
baccb514 479#if wxUSE_SPINCTRL
57160afe 480EVT_SPINCTRL (ID_SPINCTRL, MyPanel::OnSpinCtrl)
baccb514 481#endif // wxUSE_SPINCTRL
4c36ca57 482#if wxUSE_TOGGLEBTN
1db8dc4a 483EVT_TOGGLEBUTTON(ID_BUTTON_LABEL, MyPanel::OnUpdateLabel)
4c36ca57 484#endif // wxUSE_TOGGLEBTN
87a1e308 485EVT_CHECKBOX (ID_CHANGE_COLOUR, MyPanel::OnChangeColour)
3e2dd3db
VZ
486EVT_BUTTON (ID_BUTTON_TEST1, MyPanel::OnTestButton)
487EVT_BUTTON (ID_BUTTON_TEST2, MyPanel::OnTestButton)
9121bed2 488EVT_BUTTON (ID_BITMAP_BTN, MyPanel::OnBmpButton)
1c005ff7
RR
489END_EVENT_TABLE()
490
f6bcfd97
BP
491BEGIN_EVENT_TABLE(MyButton, wxButton)
492 EVT_LEFT_DCLICK(MyButton::OnDClick)
493END_EVENT_TABLE()
494
495BEGIN_EVENT_TABLE(MyComboBox, wxComboBox)
496 EVT_CHAR(MyComboBox::OnChar)
497 EVT_KEY_DOWN(MyComboBox::OnKeyDown)
498 EVT_KEY_UP(MyComboBox::OnKeyUp)
499
500 EVT_SET_FOCUS(MyComboBox::OnFocusGot)
501END_EVENT_TABLE()
502
503BEGIN_EVENT_TABLE(MyRadioBox, wxRadioBox)
504 EVT_SET_FOCUS(MyRadioBox::OnFocusGot)
505 EVT_KILL_FOCUS(MyRadioBox::OnFocusLost)
506END_EVENT_TABLE()
507
508// ============================================================================
509// implementation
510// ============================================================================
511
5fb9fcfc 512MyPanel::MyPanel( wxFrame *frame, int x, int y, int w, int h )
0a772322
VZ
513 : wxPanel( frame, -1, wxPoint(x, y), wxSize(w, h) ),
514 m_text(NULL), m_notebook(NULL)
1c005ff7 515{
9d9b7755
VZ
516 wxLayoutConstraints *c;
517
3e2dd3db
VZ
518 m_text = new wxTextCtrl(this, -1, "This is the log window.\n",
519 wxPoint(0, 250), wxSize(100, 50), wxTE_MULTILINE);
103aab26 520 m_text->SetBackgroundColour("wheat");
655822f3 521
abceee76
VZ
522 if ( 0 )
523 wxLog::AddTraceMask(_T("focus"));
29e7e51a 524 m_logTargetOld = wxLog::SetActiveTarget(new wxLogTextCtrl(m_text));
0a772322 525
3e2dd3db 526 m_notebook = new wxNotebook(this, ID_NOTEBOOK);
655822f3 527
ec9f7884
VZ
528 wxString choices[] =
529 {
530 "This",
531 "is one of my",
532 "really",
533 "wonderful",
534 "examples."
535 };
655822f3 536
4fabb575 537#ifdef USE_XPM
ec9f7884
VZ
538 // image ids
539 enum
540 {
541 Image_List, Image_Choice, Image_Combo, Image_Text, Image_Radio, Image_Gauge, Image_Max
542 };
543
544 // fill the image list
545 wxImageList *imagelist = new wxImageList(32, 32);
546
547 imagelist-> Add( wxBitmap( list_xpm ));
548 imagelist-> Add( wxBitmap( choice_xpm ));
549 imagelist-> Add( wxBitmap( combo_xpm ));
550 imagelist-> Add( wxBitmap( text_xpm ));
551 imagelist-> Add( wxBitmap( radio_xpm ));
552 imagelist-> Add( wxBitmap( gauge_xpm ));
553 m_notebook->SetImageList(imagelist);
73c700fd 554#elif defined(__WXMSW__)
ec9f7884
VZ
555 // load images from resources
556 enum
557 {
558 Image_List, Image_Choice, Image_Combo, Image_Text, Image_Radio, Image_Gauge, Image_Max
559 };
560 wxImageList *imagelist = new wxImageList(16, 16, FALSE, Image_Max);
561
562 static const char *s_iconNames[Image_Max] =
563 {
564 "list", "choice", "combo", "text", "radio", "gauge"
565 };
566
567 for ( size_t n = 0; n < Image_Max; n++ )
568 {
569 wxBitmap bmp(s_iconNames[n]);
570 if ( !bmp.Ok() || (imagelist->Add(bmp) == -1) )
571 {
572 wxLogWarning("Couldn't load the image '%s' for the notebook page %d.",
573 s_iconNames[n], n);
574 }
575 }
576
577 m_notebook->SetImageList(imagelist);
4fabb575
JS
578#else
579
ec9f7884 580 // No images for now
4fabb575
JS
581#define Image_List -1
582#define Image_Choice -1
583#define Image_Combo -1
584#define Image_Text -1
585#define Image_Radio -1
586#define Image_Gauge -1
587#define Image_Max -1
588
fc54776e 589#endif
2cb21a45 590
6c8a980f
VZ
591 wxPanel *panel = new wxPanel(m_notebook);
592 m_listbox = new wxListBox( panel, ID_LISTBOX,
593 wxPoint(10,10), wxSize(120,70),
354aa1e3 594 5, choices, wxLB_ALWAYS_SB );
6c8a980f
VZ
595 m_listboxSorted = new wxListBox( panel, ID_LISTBOX_SORTED,
596 wxPoint(10,90), wxSize(120,70),
354aa1e3 597 5, choices, wxLB_SORT );
6c8a980f
VZ
598
599 SetControlClientData("listbox", m_listbox);
600 SetControlClientData("listbox", m_listboxSorted);
9838df2c 601
ec9f7884 602 m_listbox->SetCursor(*wxCROSS_CURSOR);
b8653fbf 603#if wxUSE_TOOLTIPS
ec9f7884 604 m_listbox->SetToolTip( "This is a list box" );
16f6dfd8 605#endif // wxUSE_TOOLTIPS
9f3362c4 606
3e2dd3db
VZ
607 m_lbSelectNum = new wxButton( panel, ID_LISTBOX_SEL_NUM, "Select #&2", wxPoint(180,30), wxSize(140,30) );
608 m_lbSelectThis = new wxButton( panel, ID_LISTBOX_SEL_STR, "&Select 'This'", wxPoint(340,30), wxSize(140,30) );
609 (void)new wxButton( panel, ID_LISTBOX_CLEAR, "&Clear", wxPoint(180,80), wxSize(140,30) );
f6bcfd97 610 (void)new MyButton( panel, ID_LISTBOX_APPEND, "&Append 'Hi!'", wxPoint(340,80), wxSize(140,30) );
3e2dd3db 611 (void)new wxButton( panel, ID_LISTBOX_DELETE, "D&elete selected item", wxPoint(180,130), wxSize(140,30) );
f6bcfd97 612 wxButton *button = new MyButton( panel, ID_LISTBOX_FONT, "Set &Italic font", wxPoint(340,130), wxSize(140,30) );
57160afe
VZ
613
614 button->SetDefault();
615
616 button->SetForegroundColour(*wxBLUE);
617
b8653fbf 618#if wxUSE_TOOLTIPS
ec9f7884 619 button->SetToolTip( "Press here to set italic font" );
16f6dfd8 620#endif // wxUSE_TOOLTIPS
b1170810 621
6c8a980f 622 m_checkbox = new wxCheckBox( panel, ID_LISTBOX_ENABLE, "&Disable", wxPoint(20,170) );
ec9f7884 623 m_checkbox->SetValue(FALSE);
b8653fbf 624#if wxUSE_TOOLTIPS
ec9f7884 625 m_checkbox->SetToolTip( "Click here to disable the listbox" );
16f6dfd8 626#endif // wxUSE_TOOLTIPS
87a1e308
VZ
627 (void)new wxCheckBox( panel, ID_CHANGE_COLOUR, "&Toggle colour",
628 wxPoint(110,170) );
9121bed2 629 panel->SetCursor(wxCursor(wxCURSOR_HAND));
ec9f7884
VZ
630 m_notebook->AddPage(panel, "wxListBox", TRUE, Image_List);
631
632 panel = new wxPanel(m_notebook);
633 m_choice = new wxChoice( panel, ID_CHOICE, wxPoint(10,10), wxSize(120,-1), 5, choices );
b56c2246
VZ
634 m_choiceSorted = new wxChoice( panel, ID_CHOICE_SORTED, wxPoint(10,70), wxSize(120,-1),
635 5, choices, wxCB_SORT );
6c8a980f
VZ
636
637 SetControlClientData("choice", m_choice);
638 SetControlClientData("choice", m_choiceSorted);
639
ddc8c2e3 640 m_choice->SetSelection(2);
2b07d713 641 m_choice->SetBackgroundColour( "red" );
3e2dd3db
VZ
642 (void)new wxButton( panel, ID_CHOICE_SEL_NUM, "Select #&2", wxPoint(180,30), wxSize(140,30) );
643 (void)new wxButton( panel, ID_CHOICE_SEL_STR, "&Select 'This'", wxPoint(340,30), wxSize(140,30) );
644 (void)new wxButton( panel, ID_CHOICE_CLEAR, "&Clear", wxPoint(180,80), wxSize(140,30) );
645 (void)new wxButton( panel, ID_CHOICE_APPEND, "&Append 'Hi!'", wxPoint(340,80), wxSize(140,30) );
646 (void)new wxButton( panel, ID_CHOICE_DELETE, "D&elete selected item", wxPoint(180,130), wxSize(140,30) );
647 (void)new wxButton( panel, ID_CHOICE_FONT, "Set &Italic font", wxPoint(340,130), wxSize(140,30) );
648 (void)new wxCheckBox( panel, ID_CHOICE_ENABLE, "&Disable", wxPoint(20,130), wxSize(140,30) );
1fad4c3e 649
ec9f7884
VZ
650 m_notebook->AddPage(panel, "wxChoice", FALSE, Image_Choice);
651
652 panel = new wxPanel(m_notebook);
3e2dd3db 653 (void)new wxStaticBox( panel, -1, "&Box around combobox",
f048e32f 654 wxPoint(5, 5), wxSize(150, 100));
f6bcfd97
BP
655 m_combo = new MyComboBox( panel, ID_COMBO, "This",
656 wxPoint(20,25), wxSize(120, -1),
657 5, choices,
658 /* wxCB_READONLY | */ wxPROCESS_ENTER);
659
3e2dd3db
VZ
660 (void)new wxButton( panel, ID_COMBO_SEL_NUM, "Select #&2", wxPoint(180,30), wxSize(140,30) );
661 (void)new wxButton( panel, ID_COMBO_SEL_STR, "&Select 'This'", wxPoint(340,30), wxSize(140,30) );
662 (void)new wxButton( panel, ID_COMBO_CLEAR, "&Clear", wxPoint(180,80), wxSize(140,30) );
663 (void)new wxButton( panel, ID_COMBO_APPEND, "&Append 'Hi!'", wxPoint(340,80), wxSize(140,30) );
664 (void)new wxButton( panel, ID_COMBO_DELETE, "D&elete selected item", wxPoint(180,130), wxSize(140,30) );
665 (void)new wxButton( panel, ID_COMBO_FONT, "Set &Italic font", wxPoint(340,130), wxSize(140,30) );
666 (void)new wxCheckBox( panel, ID_COMBO_ENABLE, "&Disable", wxPoint(20,130), wxSize(140,30) );
ec9f7884
VZ
667 m_notebook->AddPage(panel, "wxComboBox", FALSE, Image_Combo);
668
ec9f7884
VZ
669 wxString choices2[] =
670 {
17867d61 671 "First", "Second",
0a772322 672 /* "Third",
17867d61
RR
673 "Fourth", "Fifth", "Sixth",
674 "Seventh", "Eighth", "Nineth", "Tenth" */
ec9f7884
VZ
675 };
676
677 panel = new wxPanel(m_notebook);
f6bcfd97 678 (void)new MyRadioBox( panel, ID_RADIOBOX, "&That", wxPoint(10,160), wxSize(-1,-1), WXSIZEOF(choices2), choices2, 1, wxRA_SPECIFY_ROWS );
3e2dd3db 679 m_radio = new wxRadioBox( panel, ID_RADIOBOX, "T&his", wxPoint(10,10), wxSize(-1,-1), WXSIZEOF(choices), choices, 1, wxRA_SPECIFY_COLS );
f048e32f
VZ
680
681#if wxUSE_TOOLTIPS
3e2dd3db 682 m_combo->SetToolTip("This is a natural\ncombobox - can you believe me?");
f048e32f
VZ
683 m_radio->SetToolTip("Ever seen a radiobox?");
684#endif // wxUSE_TOOLTIPS
685
3e2dd3db
VZ
686 (void)new wxButton( panel, ID_RADIOBOX_SEL_NUM, "Select #&2", wxPoint(180,30), wxSize(140,30) );
687 (void)new wxButton( panel, ID_RADIOBOX_SEL_STR, "&Select 'This'", wxPoint(180,80), wxSize(140,30) );
688 m_fontButton = new wxButton( panel, ID_SET_FONT, "Set &more Italic font", wxPoint(340,30), wxSize(140,30) );
689 (void)new wxButton( panel, ID_RADIOBOX_FONT, "Set &Italic font", wxPoint(340,80), wxSize(140,30) );
690 (void)new wxCheckBox( panel, ID_RADIOBOX_ENABLE, "&Disable", wxPoint(340,130), wxDefaultSize );
7e2b55cd 691 wxRadioButton *rb = new wxRadioButton( panel, ID_RADIOBUTTON_1, "Radiobutton1", wxPoint(210,170), wxDefaultSize, wxRB_GROUP );
ec9f7884 692 rb->SetValue( FALSE );
3e2dd3db 693 (void)new wxRadioButton( panel, ID_RADIOBUTTON_2, "&Radiobutton2", wxPoint(340,170), wxDefaultSize );
ec9f7884
VZ
694 m_notebook->AddPage(panel, "wxRadioBox", FALSE, Image_Radio);
695
696 panel = new wxPanel(m_notebook);
0bb62421 697 (void)new wxStaticBox( panel, -1, "&wxGauge and wxSlider", wxPoint(10,10), wxSize(222,130) );
f6bcfd97
BP
698 m_gauge = new wxGauge( panel, -1, 200, wxPoint(18,50), wxSize(155, 30), wxGA_HORIZONTAL|wxNO_BORDER );
699 m_gauge->SetBackgroundColour(*wxGREEN);
700 m_gauge->SetForegroundColour(*wxRED);
37ed3ae3 701 m_gaugeVert = new wxGauge( panel, -1, 100,
0bb62421 702 wxPoint(195,35), wxSize(30, 90),
1724ca8b 703 wxGA_VERTICAL | wxGA_SMOOTH | wxNO_BORDER );
7ba4fbeb
VZ
704 m_slider = new wxSlider( panel, ID_SLIDER, 0, 0, 200, wxPoint(18,90), wxSize(155,-1),
705 wxSL_AUTOTICKS | wxSL_LABELS );
706 m_slider->SetTickFreq(40, 0);
0bb62421 707 (void)new wxStaticBox( panel, -1, "&Explanation", wxPoint(230,10), wxSize(270,130) );
9838df2c 708#ifdef __WXMOTIF__
ec9f7884
VZ
709 // No wrapping text in wxStaticText yet :-(
710 (void)new wxStaticText( panel, -1,
711 "Drag the slider!",
37ed3ae3 712 wxPoint(250,30),
e65cc56a 713 wxSize(240, -1)
ec9f7884 714 );
9838df2c 715#else
ec9f7884
VZ
716 (void)new wxStaticText( panel, -1,
717 "In order see the gauge (aka progress bar)\n"
718 "control do something you have to drag the\n"
719 "handle of the slider to the right.\n"
720 "\n"
721 "This is also supposed to demonstrate how\n"
722 "to use static controls.\n",
37ed3ae3 723 wxPoint(250,25),
8c3c31d4 724 wxSize(240, 110)
ec9f7884 725 );
9838df2c 726#endif
8c3c31d4
VZ
727 int initialSpinValue = -5;
728 wxString s;
729 s << initialSpinValue;
730 m_spintext = new wxTextCtrl( panel, -1, s, wxPoint(20,160), wxSize(80,-1) );
0e528b99 731#if wxUSE_SPINBTN
738f9e5a 732 m_spinbutton = new wxSpinButton( panel, ID_SPIN, wxPoint(103,160), wxSize(80, -1) );
6380910c 733 m_spinbutton->SetRange(-10,30);
8c3c31d4 734 m_spinbutton->SetValue(initialSpinValue);
9726da4f 735
3e2dd3db 736 m_btnProgress = new wxButton( panel, ID_BTNPROGRESS, "&Show progress dialog",
738f9e5a 737 wxPoint(300, 160) );
0e528b99 738#endif // wxUSE_SPINBTN
b782f2e0
VZ
739
740#if wxUSE_SPINCTRL
678cd6de 741 m_spinctrl = new wxSpinCtrl( panel, ID_SPINCTRL, "", wxPoint(200, 160), wxSize(80, -1) );
b782f2e0
VZ
742 m_spinctrl->SetRange(10,30);
743 m_spinctrl->SetValue(15);
744#endif // wxUSE_SPINCTRL
745
ec9f7884 746 m_notebook->AddPage(panel, "wxGauge", FALSE, Image_Gauge);
45e41c05
VZ
747
748 panel = new wxPanel(m_notebook);
b782f2e0 749
3dec57ad 750#if !defined(__WXMOTIF__) && !defined(__WIN16__) // wxStaticBitmap not working under Motif yet; and icons not allowed under WIN16.
45e41c05 751 wxIcon icon = wxTheApp->GetStdIcon(wxICON_INFORMATION);
f048e32f
VZ
752 wxStaticBitmap *bmpStatic = new wxStaticBitmap(panel, -1, icon,
753 wxPoint(10, 10));
45e41c05
VZ
754
755 bmpStatic = new wxStaticBitmap(panel, -1, wxNullIcon, wxPoint(50, 10));
756 bmpStatic->SetIcon(wxTheApp->GetStdIcon(wxICON_QUESTION));
b782f2e0
VZ
757#endif // !Motif
758
45e41c05
VZ
759 wxBitmap bitmap( 100, 100 );
760 wxMemoryDC dc;
761 dc.SelectObject( bitmap );
762 dc.SetPen(*wxGREEN_PEN);
f048e32f 763 dc.Clear();
45e41c05 764 dc.DrawEllipse(5, 5, 90, 90);
f048e32f 765 dc.DrawText("Bitmap", 30, 40);
45e41c05
VZ
766 dc.SelectObject( wxNullBitmap );
767
9121bed2 768 (void)new wxBitmapButton(panel, ID_BITMAP_BTN, bitmap, wxPoint(100, 20));
f048e32f 769
80a58c99 770#ifdef __WXMSW__
3e2dd3db
VZ
771 // test for masked bitmap display
772 bitmap = wxBitmap("test2.bmp", wxBITMAP_TYPE_BMP);
9bb3479c
JS
773 if (bitmap.Ok())
774 {
775 bitmap.SetMask(new wxMask(bitmap, *wxBLUE));
669f7a11 776
9bb3479c
JS
777 (void)new wxStaticBitmap /* wxBitmapButton */ (panel, -1, bitmap, wxPoint(300, 120));
778 }
57160afe 779#endif
5ef2e633 780
f048e32f
VZ
781 wxBitmap bmp1(wxTheApp->GetStdIcon(wxICON_INFORMATION)),
782 bmp2(wxTheApp->GetStdIcon(wxICON_WARNING)),
783 bmp3(wxTheApp->GetStdIcon(wxICON_QUESTION));
784 wxBitmapButton *bmpBtn = new wxBitmapButton
785 (
786 panel, -1,
787 bmp1,
1db8dc4a 788 wxPoint(30, 70)
f048e32f
VZ
789 );
790 bmpBtn->SetBitmapSelected(bmp2);
791 bmpBtn->SetBitmapFocus(bmp3);
792
4c36ca57 793#if wxUSE_TOGGLEBTN
1db8dc4a
VZ
794 (void)new wxToggleButton(panel, ID_BUTTON_LABEL,
795 "&Toggle label", wxPoint(250, 20));
4c36ca57 796#endif // wxUSE_TOGGLEBTN
bedaf53e 797
185fa6bf
VZ
798 m_label = new wxStaticText(panel, -1, "Label with some long text",
799 wxPoint(250, 60), wxDefaultSize,
f6bcfd97 800 wxALIGN_RIGHT /*| wxST_NO_AUTORESIZE*/);
103aab26 801 m_label->SetForegroundColour( *wxBLUE );
2ac1b69a 802
45e41c05 803 m_notebook->AddPage(panel, "wxBitmapXXX");
dcc71398 804
9d9b7755 805 // layout constraints
dcc71398 806
9d9b7755
VZ
807 panel = new wxPanel(m_notebook);
808 panel->SetAutoLayout( TRUE );
d7928388 809
9d9b7755
VZ
810 c = new wxLayoutConstraints;
811 c->top.SameAs( panel, wxTop, 10 );
812 c->height.AsIs( );
813 c->left.SameAs( panel, wxLeft, 10 );
814 c->width.PercentOf( panel, wxWidth, 40 );
d7928388 815
3e2dd3db 816 wxButton *pMyButton = new wxButton(panel, ID_BUTTON_TEST1, "Test Button &1" );
9d9b7755 817 pMyButton->SetConstraints( c );
d7928388 818
9d9b7755
VZ
819 c = new wxLayoutConstraints;
820 c->top.SameAs( panel, wxTop, 10 );
821 c->bottom.SameAs( panel, wxBottom, 10 );
822 c->right.SameAs( panel, wxRight, 10 );
823 c->width.PercentOf( panel, wxWidth, 40 );
185fa6bf 824
3e2dd3db 825 wxButton *pMyButton2 = new wxButton(panel, ID_BUTTON_TEST2, "Test Button &2" );
9d9b7755 826 pMyButton2->SetConstraints( c );
185fa6bf 827
9d9b7755 828 m_notebook->AddPage(panel, "wxLayoutConstraint");
d7928388 829
9d9b7755 830 // sizer
dcc71398 831
9d9b7755
VZ
832 panel = new wxPanel(m_notebook);
833 panel->SetAutoLayout( TRUE );
dcc71398 834
9d9b7755
VZ
835 wxBoxSizer *sizer = new wxBoxSizer( wxHORIZONTAL );
836
3e2dd3db 837 sizer->Add( new wxButton(panel, -1, "Test Button &1" ), 3, wxALL, 10 );
9d9b7755 838 sizer->Add( 20,20, 1 );
3e2dd3db 839 sizer->Add( new wxButton(panel, -1, "Test Button &2" ), 3, wxGROW|wxALL, 10 );
9d9b7755
VZ
840
841 panel->SetSizer( sizer );
842
843 m_notebook->AddPage(panel, "wxSizer");
1c005ff7
RR
844}
845
846void MyPanel::OnSize( wxSizeEvent& WXUNUSED(event) )
847{
ec9f7884
VZ
848 int x = 0;
849 int y = 0;
850 GetClientSize( &x, &y );
655822f3 851
ec9f7884
VZ
852 if (m_notebook) m_notebook->SetSize( 2, 2, x-4, y*2/3-4 );
853 if (m_text) m_text->SetSize( 2, y*2/3+2, x-4, y/3-4 );
1c005ff7
RR
854}
855
4d0f3cd6
VZ
856void MyPanel::OnPageChanging( wxNotebookEvent &event )
857{
45e41c05
VZ
858 int selOld = event.GetOldSelection();
859 if ( selOld == 2 )
4d0f3cd6 860 {
65045edd
RR
861 if ( wxMessageBox("This demonstrates how a program may prevent the\n"
862 "page change from taking place - if you select\n"
863 "[No] the current page will stay the third one\n",
8c3c31d4 864 "Control sample",
f6bcfd97 865 wxICON_QUESTION | wxYES_NO, this) != wxYES )
8c3c31d4
VZ
866 {
867 event.Veto();
45e41c05 868
8c3c31d4
VZ
869 return;
870 }
4d0f3cd6 871 }
45e41c05 872
36202885
VZ
873 *m_text << "Notebook selection is being changed from " << selOld
874 << " to " << event.GetSelection()
875 << " (current page from notebook is "
876 << m_notebook->GetSelection() << ")\n";
4d0f3cd6
VZ
877}
878
cb43b372
RR
879void MyPanel::OnPageChanged( wxNotebookEvent &event )
880{
36202885
VZ
881 *m_text << "Notebook selection is now " << event.GetSelection()
882 << " (from notebook: " << m_notebook->GetSelection() << ")\n";
cb43b372
RR
883}
884
3e2dd3db
VZ
885void MyPanel::OnTestButton(wxCommandEvent& event)
886{
887 wxLogMessage(_T("Button %c clicked."),
888 event.GetId() == ID_BUTTON_TEST1 ? _T('1') : _T('2'));
889}
890
9121bed2
VZ
891void MyPanel::OnBmpButton(wxCommandEvent& event)
892{
893 wxLogMessage(_T("Bitmap button clicked."));
894}
895
87a1e308
VZ
896void MyPanel::OnChangeColour(wxCommandEvent& WXUNUSED(event))
897{
898 static wxColour s_colOld;
899
900 // test panel colour changing and propagation to the subcontrols
901 if ( s_colOld.Ok() )
902 {
903 SetBackgroundColour(s_colOld);
904 s_colOld = wxNullColour;
905
103aab26
RR
906 m_lbSelectThis->SetForegroundColour("red");
907 m_lbSelectThis->SetBackgroundColour("white");
87a1e308
VZ
908 }
909 else
910 {
103aab26
RR
911 s_colOld = wxColour("red");
912 SetBackgroundColour("white");
87a1e308 913
57160afe 914 m_lbSelectThis->SetForegroundColour("white");
87a1e308
VZ
915 m_lbSelectThis->SetBackgroundColour("red");
916 }
917
918 m_lbSelectThis->Refresh();
919 Refresh();
920}
921
1c005ff7
RR
922void MyPanel::OnListBox( wxCommandEvent &event )
923{
2e0e025e 924// GetParent()->Move(100, 100);
e66ad5c6 925
846e1424
RR
926 if (event.GetInt() == -1)
927 {
928 m_text->AppendText( "ListBox has no selections anymore\n" );
929 return;
930 }
931
6c8a980f
VZ
932 wxListBox *listbox = event.GetId() == ID_LISTBOX ? m_listbox
933 : m_listboxSorted;
934
935 m_text->AppendText( "ListBox event selection string is: '" );
ec9f7884 936 m_text->AppendText( event.GetString() );
6c8a980f
VZ
937 m_text->AppendText( "'\n" );
938 m_text->AppendText( "ListBox control selection string is: '" );
939 m_text->AppendText( listbox->GetStringSelection() );
940 m_text->AppendText( "'\n" );
941
942 wxStringClientData *obj = ((wxStringClientData *)event.GetClientObject());
943 m_text->AppendText( "ListBox event client data string is: '" );
6e47faf1 944 if (obj) // BC++ doesn't like use of '? .. : .. ' in this context
74a533f7 945 m_text->AppendText( obj->GetData() );
6e47faf1 946 else
74a533f7 947 m_text->AppendText( wxString("none") );
6e47faf1 948
6c8a980f
VZ
949 m_text->AppendText( "'\n" );
950 m_text->AppendText( "ListBox control client data string is: '" );
951 obj = (wxStringClientData *)listbox->GetClientObject(listbox->GetSelection());
6e47faf1 952 if (obj)
74a533f7 953 m_text->AppendText( obj->GetData() );
6e47faf1 954 else
74a533f7 955 m_text->AppendText( wxString("none") );
6c8a980f 956 m_text->AppendText( "'\n" );
1c005ff7
RR
957}
958
5b077d48
RR
959void MyPanel::OnListBoxDoubleClick( wxCommandEvent &event )
960{
ec9f7884
VZ
961 m_text->AppendText( "ListBox double click string is: " );
962 m_text->AppendText( event.GetString() );
963 m_text->AppendText( "\n" );
5b077d48
RR
964}
965
47908e25
RR
966void MyPanel::OnListBoxButtons( wxCommandEvent &event )
967{
ec9f7884 968 switch (event.GetId())
d3904ceb 969 {
ec9f7884
VZ
970 case ID_LISTBOX_ENABLE:
971 {
972 m_text->AppendText("Checkbox clicked.\n");
973 wxCheckBox *cb = (wxCheckBox*)event.GetEventObject();
b8653fbf 974#if wxUSE_TOOLTIPS
ec9f7884
VZ
975 if (event.GetInt())
976 cb->SetToolTip( "Click to enable listbox" );
977 else
978 cb->SetToolTip( "Click to disable listbox" );
16f6dfd8 979#endif // wxUSE_TOOLTIPS
ec9f7884 980 m_listbox->Enable( event.GetInt() == 0 );
57160afe
VZ
981 m_lbSelectThis->Enable( event.GetInt() == 0 );
982 m_lbSelectNum->Enable( event.GetInt() == 0 );
6c8a980f 983 m_listboxSorted->Enable( event.GetInt() == 0 );
ee6e1b1d 984 FindWindow(ID_CHANGE_COLOUR)->Enable( event.GetInt() == 0 );
ec9f7884
VZ
985 break;
986 }
987 case ID_LISTBOX_SEL_NUM:
988 {
989 m_listbox->SetSelection( 2 );
6c8a980f 990 m_listboxSorted->SetSelection( 2 );
8c3c31d4 991 m_lbSelectThis->WarpPointer( 40, 14 );
ec9f7884
VZ
992 break;
993 }
994 case ID_LISTBOX_SEL_STR:
995 {
996 m_listbox->SetStringSelection( "This" );
6c8a980f 997 m_listboxSorted->SetStringSelection( "This" );
8c3c31d4 998 m_lbSelectNum->WarpPointer( 40, 14 );
ec9f7884
VZ
999 break;
1000 }
1001 case ID_LISTBOX_CLEAR:
1002 {
1003 m_listbox->Clear();
6c8a980f 1004 m_listboxSorted->Clear();
ec9f7884
VZ
1005 break;
1006 }
1007 case ID_LISTBOX_APPEND:
1008 {
1009 m_listbox->Append( "Hi!" );
6c8a980f 1010 m_listboxSorted->Append( "Hi!" );
ec9f7884
VZ
1011 break;
1012 }
1013 case ID_LISTBOX_DELETE:
1014 {
6c8a980f
VZ
1015 int idx;
1016 idx = m_listbox->GetSelection();
f6bcfd97
BP
1017 if ( idx != wxNOT_FOUND )
1018 m_listbox->Delete( idx );
6c8a980f 1019 idx = m_listboxSorted->GetSelection();
f6bcfd97
BP
1020 if ( idx != wxNOT_FOUND )
1021 m_listboxSorted->Delete( idx );
ec9f7884
VZ
1022 break;
1023 }
1024 case ID_LISTBOX_FONT:
1025 {
1026 m_listbox->SetFont( *wxITALIC_FONT );
6c8a980f 1027 m_listboxSorted->SetFont( *wxITALIC_FONT );
ec9f7884
VZ
1028 m_checkbox->SetFont( *wxITALIC_FONT );
1029 break;
1030 }
868a2826 1031 }
47908e25
RR
1032}
1033
1034void MyPanel::OnChoice( wxCommandEvent &event )
1035{
6c8a980f
VZ
1036 wxChoice *choice = event.GetId() == ID_CHOICE ? m_choice
1037 : m_choiceSorted;
1038
1039 m_text->AppendText( "Choice event selection string is: '" );
ec9f7884 1040 m_text->AppendText( event.GetString() );
6c8a980f 1041 m_text->AppendText( "'\n" );
b56c2246 1042 m_text->AppendText( "Choice control selection string is: '" );
6c8a980f
VZ
1043 m_text->AppendText( choice->GetStringSelection() );
1044 m_text->AppendText( "'\n" );
1045
1046 wxStringClientData *obj = ((wxStringClientData *)event.GetClientObject());
1047 m_text->AppendText( "Choice event client data string is: '" );
6e47faf1
JS
1048
1049 if (obj)
1050 m_text->AppendText( obj->GetData() );
1051 else
1052 m_text->AppendText( wxString("none") );
1053
6c8a980f
VZ
1054 m_text->AppendText( "'\n" );
1055 m_text->AppendText( "Choice control client data string is: '" );
1056 obj = (wxStringClientData *)choice->GetClientObject(choice->GetSelection());
6e47faf1
JS
1057
1058 if (obj)
1059 m_text->AppendText( obj->GetData() );
1060 else
1061 m_text->AppendText( wxString("none") );
6c8a980f 1062 m_text->AppendText( "'\n" );
47908e25
RR
1063}
1064
1065void MyPanel::OnChoiceButtons( wxCommandEvent &event )
1066{
ec9f7884 1067 switch (event.GetId())
47908e25 1068 {
ec9f7884
VZ
1069 case ID_CHOICE_ENABLE:
1070 {
1071 m_choice->Enable( event.GetInt() == 0 );
b56c2246 1072 m_choiceSorted->Enable( event.GetInt() == 0 );
ec9f7884
VZ
1073 break;
1074 }
1075 case ID_CHOICE_SEL_NUM:
1076 {
1077 m_choice->SetSelection( 2 );
b56c2246 1078 m_choiceSorted->SetSelection( 2 );
ec9f7884
VZ
1079 break;
1080 }
1081 case ID_CHOICE_SEL_STR:
1082 {
1083 m_choice->SetStringSelection( "This" );
b56c2246 1084 m_choiceSorted->SetStringSelection( "This" );
ec9f7884
VZ
1085 break;
1086 }
1087 case ID_CHOICE_CLEAR:
1088 {
1089 m_choice->Clear();
b56c2246 1090 m_choiceSorted->Clear();
ec9f7884
VZ
1091 break;
1092 }
1093 case ID_CHOICE_APPEND:
1094 {
1095 m_choice->Append( "Hi!" );
b56c2246 1096 m_choiceSorted->Append( "Hi!" );
ec9f7884
VZ
1097 break;
1098 }
1099 case ID_CHOICE_DELETE:
1100 {
1101 int idx = m_choice->GetSelection();
f6bcfd97
BP
1102 if ( idx != wxNOT_FOUND )
1103 m_choice->Delete( idx );
b56c2246 1104 idx = m_choiceSorted->GetSelection();
f6bcfd97
BP
1105 if ( idx != wxNOT_FOUND )
1106 m_choiceSorted->Delete( idx );
ec9f7884
VZ
1107 break;
1108 }
1109 case ID_CHOICE_FONT:
1110 {
1111 m_choice->SetFont( *wxITALIC_FONT );
b56c2246 1112 m_choiceSorted->SetFont( *wxITALIC_FONT );
ec9f7884
VZ
1113 break;
1114 }
868a2826 1115 }
47908e25
RR
1116}
1117
1118void MyPanel::OnCombo( wxCommandEvent &event )
1119{
19da4326 1120 m_text->AppendText( "ComboBox event selection string is: " );
ec9f7884
VZ
1121 m_text->AppendText( event.GetString() );
1122 m_text->AppendText( "\n" );
19da4326
RR
1123 m_text->AppendText( "ComboBox control selection string is: " );
1124 m_text->AppendText( m_combo->GetStringSelection() );
1125 m_text->AppendText( "\n" );
47908e25
RR
1126}
1127
f6bcfd97
BP
1128void MyPanel::OnComboTextChanged(wxCommandEvent& WXUNUSED(event))
1129{
1130 wxLogMessage(_T("Text in the combobox changed: now is '%s'."),
1131 m_combo->GetValue().c_str());
1132}
1133
1134void MyPanel::OnComboTextEnter(wxCommandEvent& WXUNUSED(event))
1135{
1136 wxLogMessage(_T("Enter pressed in the combobox: value is '%s'."),
1137 m_combo->GetValue().c_str());
1138}
1139
47908e25 1140void MyPanel::OnComboButtons( wxCommandEvent &event )
1c005ff7 1141{
ec9f7884 1142 switch (event.GetId())
2f6407b9 1143 {
ec9f7884
VZ
1144 case ID_COMBO_ENABLE:
1145 {
1146 m_combo->Enable( event.GetInt() == 0 );
1147 break;
1148 }
1149 case ID_COMBO_SEL_NUM:
1150 {
1151 m_combo->SetSelection( 2 );
1152 break;
1153 }
1154 case ID_COMBO_SEL_STR:
1155 {
1156 m_combo->SetStringSelection( "This" );
1157 break;
1158 }
1159 case ID_COMBO_CLEAR:
1160 {
1161 m_combo->Clear();
1162 break;
1163 }
1164 case ID_COMBO_APPEND:
1165 {
1166 m_combo->Append( "Hi!" );
1167 break;
1168 }
1169 case ID_COMBO_DELETE:
1170 {
1171 int idx = m_combo->GetSelection();
1172 m_combo->Delete( idx );
1173 break;
1174 }
1175 case ID_COMBO_FONT:
1176 {
1177 m_combo->SetFont( *wxITALIC_FONT );
1178 break;
1179 }
868a2826 1180 }
47908e25
RR
1181}
1182
1183void MyPanel::OnRadio( wxCommandEvent &event )
1184{
ec9f7884
VZ
1185 m_text->AppendText( "RadioBox selection string is: " );
1186 m_text->AppendText( event.GetString() );
1187 m_text->AppendText( "\n" );
47908e25
RR
1188}
1189
1190void MyPanel::OnRadioButtons( wxCommandEvent &event )
1191{
ec9f7884 1192 switch (event.GetId())
d3904ceb 1193 {
ec9f7884
VZ
1194 case ID_RADIOBOX_ENABLE:
1195 {
1196 m_radio->Enable( event.GetInt() == 0 );
1197 break;
1198 }
1199 case ID_RADIOBOX_SEL_NUM:
1200 {
1201 m_radio->SetSelection( 2 );
1202 break;
1203 }
1204 case ID_RADIOBOX_SEL_STR:
1205 {
1206 m_radio->SetStringSelection( "This" );
1207 break;
1208 }
1209 case ID_RADIOBOX_FONT:
1210 {
1211 m_radio->SetFont( *wxITALIC_FONT );
1212 break;
1213 }
868a2826 1214 }
1c005ff7
RR
1215}
1216
868a2826
RR
1217void MyPanel::OnSetFont( wxCommandEvent &WXUNUSED(event) )
1218{
ec9f7884
VZ
1219 m_fontButton->SetFont( *wxITALIC_FONT );
1220 m_text->SetFont( *wxITALIC_FONT );
868a2826
RR
1221}
1222
1db8dc4a 1223void MyPanel::OnUpdateLabel( wxCommandEvent &event )
185fa6bf 1224{
1db8dc4a
VZ
1225 m_label->SetLabel(event.GetInt() ? "Very very very very very long text."
1226 : "Shorter text.");
185fa6bf
VZ
1227}
1228
7bce6aec
RR
1229void MyPanel::OnSliderUpdate( wxCommandEvent &WXUNUSED(event) )
1230{
ec9f7884 1231 m_gauge->SetValue( m_slider->GetValue() );
37ed3ae3 1232 m_gaugeVert->SetValue( m_slider->GetValue() / 2 );
7bce6aec
RR
1233}
1234
baccb514
VZ
1235#if wxUSE_SPINCTRL
1236
457e6c54 1237void MyPanel::OnSpinCtrl(wxSpinEvent& event)
baccb514
VZ
1238{
1239 wxString s;
57160afe
VZ
1240 s.Printf(_T("Spin ctrl changed: now %d (from event: %d)\n"),
1241 m_spinctrl->GetValue(), event.GetInt());
baccb514
VZ
1242 m_text->AppendText(s);
1243}
1244
1245#endif // wxUSE_SPINCTRL
1246
0e528b99 1247#if wxUSE_SPINBTN
8c3c31d4
VZ
1248void MyPanel::OnSpinUp( wxSpinEvent &event )
1249{
1250 wxString value;
1251 value.Printf( _T("Spin control up: current = %d\n"),
1252 m_spinbutton->GetValue());
1253
1254 if ( m_spinbutton->GetValue() > 17 )
1255 {
1256 value += _T("Preventing the spin button from going above 17.\n");
1257
1258 event.Veto();
1259 }
1260
1261 m_text->AppendText(value);
1262}
1263
1264void MyPanel::OnSpinDown( wxSpinEvent &event )
1265{
1266 wxString value;
1267 value.Printf( _T("Spin control down: current = %d\n"),
1268 m_spinbutton->GetValue());
1269
1270 if ( m_spinbutton->GetValue() < -17 )
1271 {
1272 value += _T("Preventing the spin button from going below -17.\n");
1273
1274 event.Veto();
1275 }
1276
1277 m_text->AppendText(value);
1278}
1279
e380f72b
RR
1280void MyPanel::OnSpinUpdate( wxSpinEvent &event )
1281{
ec9f7884 1282 wxString value;
f70d5829 1283 value.Printf( _T("%d"), event.GetPosition() );
ec9f7884 1284 m_spintext->SetValue( value );
6380910c 1285
f70d5829 1286 value.Printf( _T("Spin control range: (%d, %d), current = %d\n"),
6380910c
VZ
1287 m_spinbutton->GetMin(), m_spinbutton->GetMax(),
1288 m_spinbutton->GetValue());
1289
1290 m_text->AppendText(value);
e380f72b 1291}
9726da4f
VZ
1292
1293void MyPanel::OnUpdateShowProgress( wxUpdateUIEvent& event )
1294{
1295 event.Enable( m_spinbutton->GetValue() > 0 );
1296}
1297
1298void MyPanel::OnShowProgress( wxCommandEvent& WXUNUSED(event) )
1299{
1300 int max = m_spinbutton->GetValue();
1301 wxProgressDialog dialog("Progress dialog example",
1302 "An informative message",
1303 max, // range
1304 this, // parent
8c3c31d4 1305 wxPD_CAN_ABORT |
2c8e4738 1306 wxPD_AUTO_HIDE |
8c3c31d4
VZ
1307 wxPD_APP_MODAL |
1308 wxPD_ELAPSED_TIME |
1309 wxPD_ESTIMATED_TIME |
1310 wxPD_REMAINING_TIME);
2ac1b69a 1311
9726da4f
VZ
1312
1313 bool cont = TRUE;
abceee76 1314 for ( int i = 0; i <= max && cont; i++ )
9726da4f
VZ
1315 {
1316 wxSleep(1);
abceee76 1317 if ( i == max )
be9abe3f
VZ
1318 {
1319 cont = dialog.Update(i, "That's all, folks!");
1320 }
1321 else if ( i == max / 2 )
9726da4f 1322 {
abceee76 1323 cont = dialog.Update(i, "Only a half left (very long message)!");
9726da4f
VZ
1324 }
1325 else
1326 {
1327 cont = dialog.Update(i);
1328 }
1329 }
1330
1331 if ( !cont )
1332 {
1333 *m_text << "Progress dialog aborted!\n";
1334 }
1335 else
1336 {
1337 *m_text << "Countdown from " << max << " finished.\n";
1338 }
1339}
1340
0e528b99 1341#endif // wxUSE_SPINBTN
e380f72b 1342
2cb21a45
VZ
1343MyPanel::~MyPanel()
1344{
29e7e51a
VZ
1345 //wxLog::RemoveTraceMask(_T("focus"));
1346 delete wxLog::SetActiveTarget(m_logTargetOld);
1347
ec9f7884 1348 delete m_notebook->GetImageList();
2cb21a45
VZ
1349}
1350
1c005ff7
RR
1351//----------------------------------------------------------------------
1352// MyFrame
1353//----------------------------------------------------------------------
1354
1355BEGIN_EVENT_TABLE(MyFrame, wxFrame)
3e2dd3db
VZ
1356 EVT_MENU(CONTROLS_QUIT, MyFrame::OnQuit)
1357 EVT_MENU(CONTROLS_ABOUT, MyFrame::OnAbout)
1358 EVT_MENU(CONTROLS_CLEAR_LOG, MyFrame::OnClearLog)
16f6dfd8 1359#if wxUSE_TOOLTIPS
3e2dd3db
VZ
1360 EVT_MENU(CONTROLS_SET_TOOLTIP_DELAY, MyFrame::OnSetTooltipDelay)
1361 EVT_MENU(CONTROLS_ENABLE_TOOLTIPS, MyFrame::OnToggleTooltips)
16f6dfd8 1362#endif // wxUSE_TOOLTIPS
87a1e308 1363
3e2dd3db 1364 EVT_MENU(CONTROLS_ENABLE_ALL, MyFrame::OnEnableAll)
87a1e308
VZ
1365
1366 EVT_SIZE(MyFrame::OnSize)
97206645
VZ
1367 EVT_MOVE(MyFrame::OnMove)
1368
87a1e308 1369 EVT_IDLE(MyFrame::OnIdle)
1c005ff7
RR
1370END_EVENT_TABLE()
1371
9f3362c4 1372MyFrame::MyFrame(wxFrame *frame, char *title, int x, int y, int w, int h)
ec9f7884 1373: wxFrame(frame, -1, title, wxPoint(x, y), wxSize(w, h))
1c005ff7 1374{
5fb9fcfc 1375 CreateStatusBar(2);
9f3362c4 1376
87a1e308 1377 m_panel = new MyPanel( this, 10, 10, 300, 100 );
1c005ff7
RR
1378}
1379
1380void MyFrame::OnQuit (wxCommandEvent& WXUNUSED(event) )
1381{
ec9f7884 1382 Close(TRUE);
1c005ff7
RR
1383}
1384
1385void MyFrame::OnAbout( wxCommandEvent& WXUNUSED(event) )
1386{
abceee76
VZ
1387 wxBusyCursor bc;
1388
ec9f7884
VZ
1389 wxMessageDialog dialog(this, "This is a control sample", "About Controls", wxOK );
1390 dialog.ShowModal();
1c005ff7 1391}
9f3362c4 1392
3e2dd3db
VZ
1393void MyFrame::OnClearLog(wxCommandEvent& WXUNUSED(event))
1394{
1395 m_panel->m_text->Clear();
1396}
1397
16f6dfd8
VZ
1398#if wxUSE_TOOLTIPS
1399void MyFrame::OnSetTooltipDelay(wxCommandEvent& event)
1400{
1401 static long s_delay = 5000;
1402
1403 wxString delay;
f70d5829 1404 delay.Printf( _T("%ld"), s_delay);
16f6dfd8
VZ
1405
1406 delay = wxGetTextFromUser("Enter delay (in milliseconds)",
ec9f7884
VZ
1407 "Set tooltip delay",
1408 delay,
1409 this);
16f6dfd8
VZ
1410 if ( !delay )
1411 return; // cancelled
1412
f70d5829 1413 wxSscanf(delay, _T("%ld"), &s_delay);
16f6dfd8
VZ
1414
1415 wxToolTip::SetDelay(s_delay);
1416
f70d5829 1417 wxLogStatus(this, _T("Tooltip delay set to %ld milliseconds"), s_delay);
16f6dfd8
VZ
1418}
1419
1420void MyFrame::OnToggleTooltips(wxCommandEvent& event)
1421{
1422 static bool s_enabled = TRUE;
1423
1424 s_enabled = !s_enabled;
1425
1426 wxToolTip::Enable(s_enabled);
1427
f70d5829 1428 wxLogStatus(this, _T("Tooltips %sabled"), s_enabled ? _T("en") : _T("dis") );
16f6dfd8
VZ
1429}
1430#endif // tooltips
1431
87a1e308
VZ
1432void MyFrame::OnEnableAll(wxCommandEvent& WXUNUSED(event))
1433{
1434 static bool s_enable = TRUE;
1435
1436 s_enable = !s_enable;
1437 m_panel->Enable(s_enable);
1438}
1439
97206645
VZ
1440void MyFrame::OnMove( wxMoveEvent& event )
1441{
1442 UpdateStatusBar(event.GetPosition(), GetSize());
1443
1444 event.Skip();
1445}
1446
5fb9fcfc
VZ
1447void MyFrame::OnSize( wxSizeEvent& event )
1448{
97206645 1449 UpdateStatusBar(GetPosition(), event.GetSize());
5fb9fcfc
VZ
1450
1451 event.Skip();
1452}
1453
9f3362c4
VZ
1454void MyFrame::OnIdle( wxIdleEvent& WXUNUSED(event) )
1455{
1456 // track the window which has the focus in the status bar
1457 static wxWindow *s_windowFocus = (wxWindow *)NULL;
1458 wxWindow *focus = wxWindow::FindFocus();
1459 if ( focus && (focus != s_windowFocus) )
1460 {
1461 s_windowFocus = focus;
1462
1463 wxString msg;
f70d5829 1464 msg.Printf(
9f3362c4 1465#ifdef __WXMSW__
29e7e51a 1466 _T("Focus: %s, HWND = %08x"),
f70d5829 1467#else
29e7e51a 1468 _T("Focus: %s"),
f70d5829 1469#endif
29e7e51a 1470 s_windowFocus->GetClassInfo()->GetClassName()
9f3362c4 1471#ifdef __WXMSW__
ec9f7884 1472 , s_windowFocus->GetHWND()
f70d5829 1473#endif
9f3362c4
VZ
1474 );
1475
1476 SetStatusText(msg);
1477 }
341c92a8 1478}
6c8a980f 1479
f6bcfd97
BP
1480void MyComboBox::OnChar(wxKeyEvent& event)
1481{
1482 wxLogMessage(_T("MyComboBox::OnChar"));
1483
1484 if ( event.KeyCode() == 'w' )
1485 wxLogMessage(_T("MyComboBox: 'w' will be ignored."));
1486 else
1487 event.Skip();
1488}
1489
1490void MyComboBox::OnKeyDown(wxKeyEvent& event)
1491{
1492 wxLogMessage(_T("MyComboBox::OnKeyDown"));
1493
1494 if ( event.KeyCode() == 'w' )
1495 wxLogMessage(_T("MyComboBox: 'w' will be ignored."));
1496 else
1497 event.Skip();
1498}
1499
1500void MyComboBox::OnKeyUp(wxKeyEvent& event)
1501{
1502 wxLogMessage(_T("MyComboBox::OnKeyUp"));
1503
1504 event.Skip();
1505}
1506
6c8a980f
VZ
1507static void SetControlClientData(const char *name,
1508 wxControlWithItems *control)
1509{
1510 size_t count = control->GetCount();
1511 for ( size_t n = 0; n < count; n++ )
1512 {
1513 wxString s;
1514 s.Printf("%s client data for '%s'",
1515 name, control->GetString(n).c_str());
1516
1517 control->SetClientObject(n, new wxStringClientData(s));
1518 }
1519}