samples/controls/controls.cpp

   1 /////////////////////////////////////////////////////////////////////////////
   2 // Name:        controls.cpp
   3 // Purpose:     Controls wxWindows sample
   4 // Author:      Robert Roebling
   5 // Modified by:
   6 // RCS-ID:      $Id$
   7 // Copyright:   (c) Robert Roebling, Julian Smart
   8 // Licence:     wxWindows license
   9 /////////////////////////////////////////////////////////////////////////////
  10
  11 #ifdef __GNUG__
  12     #pragma implementation "controls.h"
  13 #endif
  14
  15 // For compilers that support precompilation, includes "wx/wx.h".
  16 #include "wx/wxprec.h"
  17
  18 #ifdef __BORLANDC__
  19     #pragma hdrstop
  20 #endif
  21
  22 #ifndef WX_PRECOMP
  23     #include "wx/wx.h"
  24 #endif
  25
  26 #include "wx/spinbutt.h"
  27 #include "wx/notebook.h"
  28 #include "wx/imaglist.h"
  29 #include "wx/spinbutt.h"
  30
  31 #if wxUSE_CLIPBOARD
  32     #include "wx/dataobj.h"
  33     #include "wx/clipbrd.h"
  34 #endif
  35
  36 #if wxUSE_TOOLTIPS
  37     #include "wx/tooltip.h"
  38 #endif
  39
  40 #if defined(__WXGTK__) || defined(__WXMOTIF__)
  41     #define USE_XPM
  42 #endif
  43
  44 #ifdef USE_XPM
  45     #include "mondrian.xpm"
  46     #include "icons/choice.xpm"
  47     #include "icons/combo.xpm"
  48     #include "icons/list.xpm"
  49     #include "icons/radio.xpm"
  50     #include "icons/text.xpm"
  51     #include "icons/gauge.xpm"
  52 #endif
  53
  54 //----------------------------------------------------------------------
  55 // class definitions
  56 //----------------------------------------------------------------------
  57
  58 class MyApp: public wxApp
  59 {
  60 public:
  61     bool OnInit();
  62 };
  63
  64 // a text ctrl which allows to call different wxTextCtrl functions
  65 // interactively by pressing function keys in it
  66 class MyTextCtrl : public wxTextCtrl
  67 {
  68 public:
  69     MyTextCtrl(wxWindow *parent, wxWindowID id, const wxString &value,
  70                const wxPoint &pos, const wxSize &size, int style = 0)
  71         : wxTextCtrl(parent, id, value, pos, size, style) { }
  72
  73     void OnKeyDown(wxKeyEvent& event);
  74     void OnChar(wxKeyEvent& event);
  75
  76 private:
  77     DECLARE_EVENT_TABLE()
  78 };
  79
  80 class MyPanel: public wxPanel
  81 {
  82 public:
  83     MyPanel(wxFrame *frame, int x, int y, int w, int h);
  84     virtual ~MyPanel();
  85
  86     void OnSize( wxSizeEvent& event );
  87     void OnListBox( wxCommandEvent &event );
  88     void OnListBoxDoubleClick( wxCommandEvent &event );
  89     void OnListBoxButtons( wxCommandEvent &event );
  90     void OnChoice( wxCommandEvent &event );
  91     void OnChoiceButtons( wxCommandEvent &event );
  92     void OnCombo( wxCommandEvent &event );
  93     void OnComboButtons( wxCommandEvent &event );
  94     void OnRadio( wxCommandEvent &event );
  95     void OnRadioButtons( wxCommandEvent &event );
  96     void OnSetFont( wxCommandEvent &event );
  97     void OnPageChanged( wxNotebookEvent &event );
  98     void OnSliderUpdate( wxCommandEvent &event );
  99 #ifndef __WIN16__
 100     void OnSpinUpdate( wxSpinEvent &event );
 101 #endif
 102     void OnPasteFromClipboard( wxCommandEvent &event );
 103     void OnCopyToClipboard( wxCommandEvent &event );
 104     void OnMoveToEndOfText( wxCommandEvent &event );
 105     void OnMoveToEndOfEntry( wxCommandEvent &event );
 106
 107     wxListBox     *m_listbox;
 108     wxChoice      *m_choice;
 109     wxComboBox    *m_combo;
 110     wxRadioBox    *m_radio;
 111     wxGauge       *m_gauge;
 112     wxSlider      *m_slider;
 113     wxButton      *m_fontButton;
 114 #ifndef __WIN16__
 115     wxSpinButton  *m_spinbutton;
 116 #endif
 117     wxTextCtrl    *m_spintext;
 118     MyTextCtrl    *m_multitext;
 119     MyTextCtrl    *m_textentry;
 120     wxCheckBox    *m_checkbox;
 121
 122     wxTextCtrl    *m_text;
 123     wxNotebook    *m_notebook;
 124
 125 private:
 126     DECLARE_EVENT_TABLE()
 127 };
 128
 129 class MyFrame: public wxFrame
 130 {
 131 public:
 132     MyFrame(wxFrame *frame, char *title, int x, int y, int w, int h);
 133
 134     void OnQuit(wxCommandEvent& event);
 135     void OnAbout(wxCommandEvent& event);
 136 #if wxUSE_TOOLTIPS
 137     void OnSetTooltipDelay(wxCommandEvent& event);
 138     void OnToggleTooltips(wxCommandEvent& event);
 139 #endif // wxUSE_TOOLTIPS
 140     void OnIdle( wxIdleEvent& event );
 141     void OnSize( wxSizeEvent& event );
 142
 143 private:
 144     DECLARE_EVENT_TABLE()
 145 };
 146
 147 //----------------------------------------------------------------------
 148 // main()
 149 //----------------------------------------------------------------------
 150
 151 IMPLEMENT_APP(MyApp)
 152
 153 //----------------------------------------------------------------------
 154 // MyApp
 155 //----------------------------------------------------------------------
 156
 157 enum
 158 {
 159     MINIMAL_QUIT   = 100,
 160     MINIMAL_TEXT,
 161     MINIMAL_ABOUT,
 162
 163     // tooltip menu
 164     MINIMAL_SET_TOOLTIP_DELAY = 200,
 165     MINIMAL_ENABLE_TOOLTIPS
 166 };
 167
 168 bool MyApp::OnInit()
 169 {
 170     // Create the main frame window
 171     MyFrame *frame = new MyFrame((wxFrame *) NULL,
 172             "Controls wxWindows App",
 173             50, 50, 530, 420);
 174
 175     // Give it an icon
 176     // The wxICON() macros loads an icon from a resource under Windows
 177     // and uses an #included XPM image under GTK+ and Motif
 178
 179     frame->SetIcon( wxICON(mondrian) );
 180
 181     wxMenu *file_menu = new wxMenu;
 182     file_menu->Append(MINIMAL_ABOUT, "&About");
 183     file_menu->Append(MINIMAL_QUIT, "E&xit");
 184
 185     wxMenuBar *menu_bar = new wxMenuBar;
 186     menu_bar->Append(file_menu, "&File");
 187
 188 #if wxUSE_TOOLTIPS
 189     wxMenu *tooltip_menu = new wxMenu;
 190     tooltip_menu->Append(MINIMAL_SET_TOOLTIP_DELAY, "Set &delay");
 191     tooltip_menu->AppendSeparator();
 192     tooltip_menu->Append(MINIMAL_ENABLE_TOOLTIPS, "&Toggle tooltips",
 193             "enable/disable tooltips", TRUE);
 194     tooltip_menu->Check(MINIMAL_ENABLE_TOOLTIPS, TRUE);
 195     menu_bar->Append(tooltip_menu, "&Tooltips");
 196 #endif // wxUSE_TOOLTIPS
 197
 198     frame->SetMenuBar(menu_bar);
 199
 200     frame->Show(TRUE);
 201     frame->SetCursor(wxCursor(wxCURSOR_HAND));
 202
 203     SetTopWindow(frame);
 204
 205     return TRUE;
 206 }
 207
 208 //----------------------------------------------------------------------
 209 // MyTextCtrl
 210 //----------------------------------------------------------------------
 211
 212 BEGIN_EVENT_TABLE(MyTextCtrl, wxTextCtrl)
 213     EVT_KEY_DOWN(MyTextCtrl::OnKeyDown)
 214     EVT_CHAR(MyTextCtrl::OnChar)
 215 END_EVENT_TABLE()
 216
 217 void MyTextCtrl::OnChar(wxKeyEvent& event)
 218 {
 219     static int s_keycode = 0;
 220     static size_t s_repeatCount = 0;
 221
 222     int keycode = event.KeyCode();
 223     if ( keycode == s_keycode )
 224         s_repeatCount++;
 225     else
 226     {
 227         s_keycode = keycode;
 228         s_repeatCount = 1;
 229     }
 230
 231     wxLogStatus("Key event: %d (x%u), at position %ld",
 232                 s_keycode, s_repeatCount, GetInsertionPoint());
 233
 234     event.Skip();
 235 }
 236
 237 void MyTextCtrl::OnKeyDown(wxKeyEvent& event)
 238 {
 239     switch ( event.KeyCode() )
 240     {
 241         case WXK_F1:
 242             // show current position and text length
 243             {
 244                 long line, column, pos = GetInsertionPoint();
 245                 PositionToXY(pos, &column, &line);
 246
 247                 wxLogMessage("Current position: %ld\n"
 248                         "Current line, column: (%ld, %ld)\n"
 249                         "Number of lines: %ld\n"
 250                         "Current line length: %ld\n"
 251                         "Total text length: %ld",
 252                         pos,
 253                         line, column,
 254                         GetNumberOfLines(),
 255                         GetLineLength(line),
 256                         GetLastPosition());
 257             }
 258             break;
 259
 260         case WXK_F2:
 261             // go to the end
 262             SetInsertionPointEnd();
 263             break;
 264
 265         case WXK_F3:
 266             // go to position 10
 267             SetInsertionPoint(10);
 268             break;
 269
 270         default:
 271             event.Skip();
 272     }
 273 }
 274
 275 //----------------------------------------------------------------------
 276 // MyPanel
 277 //----------------------------------------------------------------------
 278
 279 const int  ID_NOTEBOOK          = 1000;
 280
 281 const int  ID_LISTBOX           = 130;
 282 const int  ID_LISTBOX_SEL_NUM   = 131;
 283 const int  ID_LISTBOX_SEL_STR   = 132;
 284 const int  ID_LISTBOX_CLEAR     = 133;
 285 const int  ID_LISTBOX_APPEND    = 134;
 286 const int  ID_LISTBOX_DELETE    = 135;
 287 const int  ID_LISTBOX_FONT      = 136;
 288 const int  ID_LISTBOX_ENABLE    = 137;
 289
 290 const int  ID_CHOICE            = 120;
 291 const int  ID_CHOICE_SEL_NUM    = 121;
 292 const int  ID_CHOICE_SEL_STR    = 122;
 293 const int  ID_CHOICE_CLEAR      = 123;
 294 const int  ID_CHOICE_APPEND     = 124;
 295 const int  ID_CHOICE_DELETE     = 125;
 296 const int  ID_CHOICE_FONT       = 126;
 297 const int  ID_CHOICE_ENABLE     = 127;
 298
 299 const int  ID_COMBO             = 140;
 300 const int  ID_COMBO_SEL_NUM     = 141;
 301 const int  ID_COMBO_SEL_STR     = 142;
 302 const int  ID_COMBO_CLEAR       = 143;
 303 const int  ID_COMBO_APPEND      = 144;
 304 const int  ID_COMBO_DELETE      = 145;
 305 const int  ID_COMBO_FONT        = 146;
 306 const int  ID_COMBO_ENABLE      = 147;
 307
 308 const int  ID_TEXT              = 150;
 309 const int  ID_PASTE_TEXT        = 151;
 310 const int  ID_COPY_TEXT         = 152;
 311 const int  ID_MOVE_END_ENTRY    = 153;
 312 const int  ID_MOVE_END_ZONE     = 154;
 313
 314 const int  ID_RADIOBOX          = 160;
 315 const int  ID_RADIOBOX_SEL_NUM  = 161;
 316 const int  ID_RADIOBOX_SEL_STR  = 162;
 317 const int  ID_RADIOBOX_FONT     = 163;
 318 const int  ID_RADIOBOX_ENABLE   = 164;
 319
 320 const int  ID_RADIOBUTTON_1     = 166;
 321 const int  ID_RADIOBUTTON_2     = 167;
 322
 323 const int  ID_SET_FONT          = 170;
 324
 325 const int  ID_GAUGE             = 180;
 326 const int  ID_SLIDER            = 181;
 327
 328 const int  ID_SPIN              = 182;
 329
 330 BEGIN_EVENT_TABLE(MyPanel, wxPanel)
 331 EVT_SIZE      (                         MyPanel::OnSize)
 332 EVT_NOTEBOOK_PAGE_CHANGED(ID_NOTEBOOK,  MyPanel::OnPageChanged)
 333 EVT_LISTBOX   (ID_LISTBOX,              MyPanel::OnListBox)
 334 EVT_LISTBOX_DCLICK(ID_LISTBOX,          MyPanel::OnListBoxDoubleClick)
 335 EVT_BUTTON    (ID_LISTBOX_SEL_NUM,      MyPanel::OnListBoxButtons)
 336 EVT_BUTTON    (ID_LISTBOX_SEL_STR,      MyPanel::OnListBoxButtons)
 337 EVT_BUTTON    (ID_LISTBOX_CLEAR,        MyPanel::OnListBoxButtons)
 338 EVT_BUTTON    (ID_LISTBOX_APPEND,       MyPanel::OnListBoxButtons)
 339 EVT_BUTTON    (ID_LISTBOX_DELETE,       MyPanel::OnListBoxButtons)
 340 EVT_BUTTON    (ID_LISTBOX_FONT,         MyPanel::OnListBoxButtons)
 341 EVT_CHECKBOX  (ID_LISTBOX_ENABLE,       MyPanel::OnListBoxButtons)
 342 EVT_CHOICE    (ID_CHOICE,               MyPanel::OnChoice)
 343 EVT_BUTTON    (ID_CHOICE_SEL_NUM,       MyPanel::OnChoiceButtons)
 344 EVT_BUTTON    (ID_CHOICE_SEL_STR,       MyPanel::OnChoiceButtons)
 345 EVT_BUTTON    (ID_CHOICE_CLEAR,         MyPanel::OnChoiceButtons)
 346 EVT_BUTTON    (ID_CHOICE_APPEND,        MyPanel::OnChoiceButtons)
 347 EVT_BUTTON    (ID_CHOICE_DELETE,        MyPanel::OnChoiceButtons)
 348 EVT_BUTTON    (ID_CHOICE_FONT,          MyPanel::OnChoiceButtons)
 349 EVT_CHECKBOX  (ID_CHOICE_ENABLE,        MyPanel::OnChoiceButtons)
 350 EVT_COMBOBOX  (ID_COMBO,                MyPanel::OnCombo)
 351 EVT_BUTTON    (ID_COMBO_SEL_NUM,        MyPanel::OnComboButtons)
 352 EVT_BUTTON    (ID_COMBO_SEL_STR,        MyPanel::OnComboButtons)
 353 EVT_BUTTON    (ID_COMBO_CLEAR,          MyPanel::OnComboButtons)
 354 EVT_BUTTON    (ID_COMBO_APPEND,         MyPanel::OnComboButtons)
 355 EVT_BUTTON    (ID_COMBO_DELETE,         MyPanel::OnComboButtons)
 356 EVT_BUTTON    (ID_COMBO_FONT,           MyPanel::OnComboButtons)
 357 EVT_CHECKBOX  (ID_COMBO_ENABLE,         MyPanel::OnComboButtons)
 358 EVT_RADIOBOX  (ID_RADIOBOX,             MyPanel::OnRadio)
 359 EVT_BUTTON    (ID_RADIOBOX_SEL_NUM,     MyPanel::OnRadioButtons)
 360 EVT_BUTTON    (ID_RADIOBOX_SEL_STR,     MyPanel::OnRadioButtons)
 361 EVT_BUTTON    (ID_RADIOBOX_FONT,        MyPanel::OnRadioButtons)
 362 EVT_CHECKBOX  (ID_RADIOBOX_ENABLE,      MyPanel::OnRadioButtons)
 363 EVT_BUTTON    (ID_SET_FONT,             MyPanel::OnSetFont)
 364 EVT_SLIDER    (ID_SLIDER,               MyPanel::OnSliderUpdate)
 365 #ifndef __WIN16__
 366 EVT_SPIN      (ID_SPIN,                 MyPanel::OnSpinUpdate)
 367 #endif
 368 EVT_BUTTON    (ID_PASTE_TEXT,           MyPanel::OnPasteFromClipboard)
 369 EVT_BUTTON    (ID_COPY_TEXT,            MyPanel::OnCopyToClipboard)
 370 EVT_BUTTON    (ID_MOVE_END_ZONE,        MyPanel::OnMoveToEndOfText)
 371 EVT_BUTTON    (ID_MOVE_END_ENTRY,       MyPanel::OnMoveToEndOfEntry)
 372 END_EVENT_TABLE()
 373
 374 MyPanel::MyPanel( wxFrame *frame, int x, int y, int w, int h )
 375 : wxPanel( frame, -1, wxPoint(x, y), wxSize(w, h) ),
 376 m_text(NULL), m_notebook(NULL)
 377 {
 378     //  SetBackgroundColour("cadet blue");
 379
 380     m_text = new wxTextCtrl( this, -1, "This is the log window.\n", wxPoint(0,50), wxSize(100,50), wxTE_MULTILINE );
 381     //  m_text->SetBackgroundColour("wheat");
 382
 383     m_notebook = new wxNotebook( this, ID_NOTEBOOK, wxPoint(0,0), wxSize(200,150) );
 384
 385     wxString choices[] =
 386     {
 387         "This",
 388         "is one of my",
 389         "really",
 390         "wonderful",
 391         "examples."
 392     };
 393
 394 #ifdef USE_XPM
 395     // image ids
 396     enum
 397     {
 398         Image_List, Image_Choice, Image_Combo, Image_Text, Image_Radio, Image_Gauge, Image_Max
 399     };
 400
 401     // fill the image list
 402     wxImageList *imagelist = new wxImageList(32, 32);
 403
 404     imagelist-> Add( wxBitmap( list_xpm ));
 405     imagelist-> Add( wxBitmap( choice_xpm ));
 406     imagelist-> Add( wxBitmap( combo_xpm ));
 407     imagelist-> Add( wxBitmap( text_xpm ));
 408     imagelist-> Add( wxBitmap( radio_xpm ));
 409     imagelist-> Add( wxBitmap( gauge_xpm ));
 410     m_notebook->SetImageList(imagelist);
 411 #elif defined(__WXMSW__)
 412     // load images from resources
 413     enum
 414     {
 415         Image_List, Image_Choice, Image_Combo, Image_Text, Image_Radio, Image_Gauge, Image_Max
 416     };
 417     wxImageList *imagelist = new wxImageList(16, 16, FALSE, Image_Max);
 418
 419     static const char *s_iconNames[Image_Max] =
 420     {
 421         "list", "choice", "combo", "text", "radio", "gauge"
 422     };
 423
 424     for ( size_t n = 0; n < Image_Max; n++ )
 425     {
 426         wxBitmap bmp(s_iconNames[n]);
 427         if ( !bmp.Ok() || (imagelist->Add(bmp) == -1) )
 428         {
 429             wxLogWarning("Couldn't load the image '%s' for the notebook page %d.",
 430                     s_iconNames[n], n);
 431         }
 432     }
 433
 434     m_notebook->SetImageList(imagelist);
 435 #else
 436
 437     // No images for now
 438 #define    Image_List -1
 439 #define    Image_Choice -1
 440 #define    Image_Combo -1
 441 #define    Image_Text -1
 442 #define    Image_Radio -1
 443 #define    Image_Gauge -1
 444 #define    Image_Max -1
 445
 446 #endif
 447
 448     wxButton *button = (wxButton*) NULL;  /* who did this ? */
 449     wxPanel *panel = (wxPanel*) NULL;
 450
 451     panel = new wxPanel(m_notebook);
 452     m_listbox = new wxListBox( panel, ID_LISTBOX, wxPoint(10,10), wxSize(120,70), 5, choices, wxLB_ALWAYS_SB );
 453     m_listbox->SetCursor(*wxCROSS_CURSOR);
 454 #if wxUSE_TOOLTIPS
 455     m_listbox->SetToolTip( "This is a list box" );
 456 #endif // wxUSE_TOOLTIPS
 457
 458     (void)new wxButton( panel, ID_LISTBOX_SEL_NUM, "Select #2", wxPoint(180,30), wxSize(140,30) );
 459     (void)new wxButton( panel, ID_LISTBOX_SEL_STR, "Select 'This'", wxPoint(340,30), wxSize(140,30) );
 460     (void)new wxButton( panel, ID_LISTBOX_CLEAR, "Clear", wxPoint(180,80), wxSize(140,30) );
 461     (void)new wxButton( panel, ID_LISTBOX_APPEND, "Append 'Hi!'", wxPoint(340,80), wxSize(140,30) );
 462     (void)new wxButton( panel, ID_LISTBOX_DELETE, "Delete selected item", wxPoint(180,130), wxSize(140,30) );
 463     button = new wxButton( panel, ID_LISTBOX_FONT, "Set &Italic font", wxPoint(340,130), wxSize(140,30) );
 464 #if wxUSE_TOOLTIPS
 465     button->SetToolTip( "Press here to set italic font" );
 466 #endif // wxUSE_TOOLTIPS
 467
 468     m_checkbox = new wxCheckBox( panel, ID_LISTBOX_ENABLE, "Disable", wxPoint(20,130), wxSize(140,30) );
 469     m_checkbox->SetValue(FALSE);
 470 #if wxUSE_TOOLTIPS
 471     m_checkbox->SetToolTip( "Click here to disable the listbox" );
 472 #endif // wxUSE_TOOLTIPS
 473     m_notebook->AddPage(panel, "wxListBox", TRUE, Image_List);
 474
 475     panel = new wxPanel(m_notebook);
 476     m_choice = new wxChoice( panel, ID_CHOICE, wxPoint(10,10), wxSize(120,-1), 5, choices );
 477     (void)new wxButton( panel, ID_CHOICE_SEL_NUM, "Select #2", wxPoint(180,30), wxSize(140,30) );
 478     (void)new wxButton( panel, ID_CHOICE_SEL_STR, "Select 'This'", wxPoint(340,30), wxSize(140,30) );
 479     (void)new wxButton( panel, ID_CHOICE_CLEAR, "Clear", wxPoint(180,80), wxSize(140,30) );
 480     (void)new wxButton( panel, ID_CHOICE_APPEND, "Append 'Hi!'", wxPoint(340,80), wxSize(140,30) );
 481     (void)new wxButton( panel, ID_CHOICE_DELETE, "Delete selected item", wxPoint(180,130), wxSize(140,30) );
 482     (void)new wxButton( panel, ID_CHOICE_FONT, "Set Italic font", wxPoint(340,130), wxSize(140,30) );
 483     (void)new wxCheckBox( panel, ID_CHOICE_ENABLE, "Disable", wxPoint(20,130), wxSize(140,30) );
 484     m_notebook->AddPage(panel, "wxChoice", FALSE, Image_Choice);
 485
 486     panel = new wxPanel(m_notebook);
 487     m_combo = new wxComboBox( panel, ID_COMBO, "This", wxPoint(10,10), wxSize(120,-1), 5, choices, wxCB_READONLY );
 488     (void)new wxButton( panel, ID_COMBO_SEL_NUM, "Select #2", wxPoint(180,30), wxSize(140,30) );
 489     (void)new wxButton( panel, ID_COMBO_SEL_STR, "Select 'This'", wxPoint(340,30), wxSize(140,30) );
 490     (void)new wxButton( panel, ID_COMBO_CLEAR, "Clear", wxPoint(180,80), wxSize(140,30) );
 491     (void)new wxButton( panel, ID_COMBO_APPEND, "Append 'Hi!'", wxPoint(340,80), wxSize(140,30) );
 492     (void)new wxButton( panel, ID_COMBO_DELETE, "Delete selected item", wxPoint(180,130), wxSize(140,30) );
 493     (void)new wxButton( panel, ID_COMBO_FONT, "Set Italic font", wxPoint(340,130), wxSize(140,30) );
 494     (void)new wxCheckBox( panel, ID_COMBO_ENABLE, "Disable", wxPoint(20,130), wxSize(140,30) );
 495     m_notebook->AddPage(panel, "wxComboBox", FALSE, Image_Combo);
 496
 497     panel = new wxPanel(m_notebook);
 498     m_textentry = new MyTextCtrl( panel, -1, "Some text.", wxPoint(10,10), wxSize(320,28), //0);
 499     wxTE_PROCESS_ENTER);
 500     (*m_textentry) << " Appended.";
 501     m_textentry->SetInsertionPoint(0);
 502     m_textentry->WriteText( "Prepended. " );
 503
 504     m_multitext = new MyTextCtrl( panel, ID_TEXT, "Some text.", wxPoint(10,50), wxSize(320,70), wxTE_MULTILINE );
 505     (*m_multitext) << " Appended.";
 506     m_multitext->SetInsertionPoint(0);
 507     m_multitext->WriteText( "Prepended. " );
 508     m_multitext->AppendText( "\nPress function keys to test different wxTextCtrl functions." );
 509
 510     (*m_multitext) << "\nDoes it have cross cursor?";
 511     m_multitext->SetCursor(*wxCROSS_CURSOR);
 512
 513     new MyTextCtrl( panel, -1, "This one is with wxTE_PROCESS_TAB style.", wxPoint(10,120), wxSize(320,70), wxTE_MULTILINE | wxTE_PROCESS_TAB);
 514 #if wxUSE_TOOLTIPS
 515     m_multitext->AppendText( "\nThis ctrl has a tooltip. " );
 516     m_multitext->SetToolTip("Press F1 here.");
 517 #endif // wxUSE_TOOLTIPS
 518
 519     (void)new wxStaticBox( panel, -1, "&Move cursor to the end of:", wxPoint(345, 0), wxSize(160, 100) );
 520     (void)new wxButton( panel, ID_MOVE_END_ENTRY, "Text &entry", wxPoint(370, 20), wxSize(110, 30) );
 521     (void)new wxButton( panel, ID_MOVE_END_ZONE, "Text &zone", wxPoint(370, 60), wxSize(110, 30) );
 522     (void)new wxStaticBox( panel, -1, "wx&Clipboard", wxPoint(345,100), wxSize(160,100) );
 523     (void)new wxButton( panel, ID_COPY_TEXT, "C&opy line 1", wxPoint(370,120), wxSize(110,30) );
 524     (void)new wxButton( panel, ID_PASTE_TEXT, "&Paste text", wxPoint(370,160), wxSize(110,30) );
 525     m_notebook->AddPage( panel, "wxTextCtrl" , FALSE, Image_Text );
 526
 527     wxString choices2[] =
 528     {
 529         "First", "Second",
 530         /* "Third",
 531         "Fourth", "Fifth", "Sixth",
 532         "Seventh", "Eighth", "Nineth", "Tenth" */
 533     };
 534
 535     panel = new wxPanel(m_notebook);
 536     (void)new wxRadioBox( panel, ID_RADIOBOX, "That", wxPoint(10,160), wxSize(-1,-1), WXSIZEOF(choices2), choices2, 1, wxRA_SPECIFY_ROWS );
 537     m_radio = new wxRadioBox( panel, ID_RADIOBOX, "This", wxPoint(10,10), wxSize(-1,-1), WXSIZEOF(choices), choices, 1, wxRA_SPECIFY_COLS );
 538     (void)new wxButton( panel, ID_RADIOBOX_SEL_NUM, "Select #2", wxPoint(180,30), wxSize(140,30) );
 539     (void)new wxButton( panel, ID_RADIOBOX_SEL_STR, "Select 'This'", wxPoint(180,80), wxSize(140,30) );
 540     m_fontButton = new wxButton( panel, ID_SET_FONT, "Set more Italic font", wxPoint(340,30), wxSize(140,30) );
 541     (void)new wxButton( panel, ID_RADIOBOX_FONT, "Set Italic font", wxPoint(340,80), wxSize(140,30) );
 542     (void)new wxCheckBox( panel, ID_RADIOBOX_ENABLE, "Disable", wxPoint(340,130), wxSize(140,30) );
 543     wxRadioButton *rb = new wxRadioButton( panel, ID_RADIOBUTTON_1, "Radiobutton1", wxPoint(210,170), wxSize(110,30) );
 544     rb->SetValue( FALSE );
 545     (void)new wxRadioButton( panel, ID_RADIOBUTTON_2, "Radiobutton2", wxPoint(340,170), wxSize(110,30) );
 546     m_notebook->AddPage(panel, "wxRadioBox", FALSE, Image_Radio);
 547
 548     panel = new wxPanel(m_notebook);
 549     (void)new wxStaticBox( panel, -1, "wxGauge and wxSlider", wxPoint(10,10), wxSize(180,130) );
 550     m_gauge = new wxGauge( panel, -1, 200, wxPoint(18,50), wxSize(155, 30) );
 551     m_slider = new wxSlider( panel, ID_SLIDER, 0, 0, 200, wxPoint(18,90), wxSize(155,-1) );
 552     (void)new wxStaticBox( panel, -1, "Explanation", wxPoint(200,10), wxSize(290,130) );
 553 #ifdef __WXMOTIF__
 554     // No wrapping text in wxStaticText yet :-(
 555     (void)new wxStaticText( panel, -1,
 556                             "Drag the slider!",
 557                             wxPoint(208,30),
 558                             wxSize(210, -1)
 559                           );
 560 #else
 561     (void)new wxStaticText( panel, -1,
 562                             "In order see the gauge (aka progress bar)\n"
 563                             "control do something you have to drag the\n"
 564                             "handle of the slider to the right.\n"
 565                             "\n"
 566                             "This is also supposed to demonstrate how\n"
 567                             "to use static controls.\n",
 568                             wxPoint(208,25),
 569                             wxSize(250, 110)
 570                           );
 571 #endif
 572     m_spintext = new wxTextCtrl( panel, -1, "0", wxPoint(20,160), wxSize(80,-1) );
 573 #ifndef __WIN16__
 574     m_spinbutton = new wxSpinButton( panel, ID_SPIN, wxPoint(103,159), wxSize(-1,-1) );
 575     m_spinbutton->SetRange(-10,30);
 576     m_spinbutton->SetValue(-5);
 577 #endif
 578     m_notebook->AddPage(panel, "wxGauge", FALSE, Image_Gauge);
 579 }
 580
 581 void MyPanel::OnPasteFromClipboard( wxCommandEvent &WXUNUSED(event) )
 582 {
 583     // We test for wxUSE_DRAG_AND_DROP also, because data objects
 584     // may not be implemented for compilers that can't cope with the OLE
 585     // parts in wxUSE_DRAG_AND_DROP.
 586
 587 #if wxUSE_CLIPBOARD && wxUSE_DRAG_AND_DROP
 588     if (!wxTheClipboard->Open())
 589     {
 590         *m_text << "Error opening the clipboard.\n";
 591
 592         return;
 593     }
 594     else
 595     {
 596         *m_text << "Successfully opened the clipboard.\n";
 597     }
 598
 599     wxTextDataObject data;
 600
 601     if (wxTheClipboard->IsSupported( data.GetFormat() ))
 602     {
 603         *m_text << "Clipboard supports requested format.\n";
 604
 605         if (wxTheClipboard->GetData( &data ))
 606         {
 607             *m_text << "Successfully retrieved data from the clipboard.\n";
 608             *m_multitext << data.GetText() << "\n";
 609         }
 610         else
 611         {
 612             *m_text << "Error getting data from the clipboard.\n";
 613         }
 614     }
 615     else
 616     {
 617         *m_text << "Clipboard doesn't support requested format.\n";
 618     }
 619
 620     wxTheClipboard->Close();
 621
 622     *m_text << "Closed the clipboard.\n";
 623 #else
 624     wxLogError("Your version of wxWindows is compiled without clipboard support.");
 625 #endif
 626 }
 627
 628 void MyPanel::OnCopyToClipboard( wxCommandEvent &WXUNUSED(event) )
 629 {
 630 #if wxUSE_CLIPBOARD && wxUSE_DRAG_AND_DROP
 631     wxString text( m_multitext->GetLineText(0) );
 632
 633     if (text.IsEmpty())
 634     {
 635         *m_text << "No text to copy.\n";
 636
 637         return;
 638     }
 639
 640     if (!wxTheClipboard->Open())
 641     {
 642         *m_text << "Error opening the clipboard.\n";
 643
 644         return;
 645     }
 646     else
 647     {
 648         *m_text << "Successfully opened the clipboard.\n";
 649     }
 650
 651     wxTextDataObject *data = new wxTextDataObject( text );
 652
 653     if (!wxTheClipboard->SetData( data ))
 654     {
 655         *m_text << "Error while copying to the clipboard.\n";
 656     }
 657     else
 658     {
 659         *m_text << "Successfully copied data to the clipboard.\n";
 660     }
 661
 662     wxTheClipboard->Close();
 663
 664     *m_text << "Closed the clipboard.\n";
 665 #else
 666     wxLogError("Your version of wxWindows is compiled without clipboard support.");
 667 #endif
 668 }
 669
 670 void MyPanel::OnMoveToEndOfText( wxCommandEvent &event )
 671 {
 672     m_multitext->SetInsertionPointEnd();
 673     m_multitext->SetFocus();
 674 }
 675
 676 void MyPanel::OnMoveToEndOfEntry( wxCommandEvent &event )
 677 {
 678     m_textentry->SetInsertionPointEnd();
 679     m_textentry->SetFocus();
 680 }
 681
 682 void MyPanel::OnSize( wxSizeEvent& WXUNUSED(event) )
 683 {
 684     int x = 0;
 685     int y = 0;
 686     GetClientSize( &x, &y );
 687
 688     if (m_notebook) m_notebook->SetSize( 2, 2, x-4, y*2/3-4 );
 689     if (m_text) m_text->SetSize( 2, y*2/3+2, x-4, y/3-4 );
 690 }
 691
 692 void MyPanel::OnPageChanged( wxNotebookEvent &event )
 693 {
 694     *m_text << "Notebook selection is " << event.GetSelection() << "\n";
 695 }
 696
 697 void MyPanel::OnListBox( wxCommandEvent &event )
 698 {
 699     m_text->AppendText( "ListBox selection string is: " );
 700     m_text->AppendText( event.GetString() );
 701     m_text->AppendText( "\n" );
 702 }
 703
 704 void MyPanel::OnListBoxDoubleClick( wxCommandEvent &event )
 705 {
 706     m_text->AppendText( "ListBox double click string is: " );
 707     m_text->AppendText( event.GetString() );
 708     m_text->AppendText( "\n" );
 709 }
 710
 711 void MyPanel::OnListBoxButtons( wxCommandEvent &event )
 712 {
 713     switch (event.GetId())
 714     {
 715         case ID_LISTBOX_ENABLE:
 716             {
 717                 m_text->AppendText("Checkbox clicked.\n");
 718                 wxCheckBox *cb = (wxCheckBox*)event.GetEventObject();
 719 #if wxUSE_TOOLTIPS
 720                 if (event.GetInt())
 721                     cb->SetToolTip( "Click to enable listbox" );
 722                 else
 723                     cb->SetToolTip( "Click to disable listbox" );
 724 #endif // wxUSE_TOOLTIPS
 725                 m_listbox->Enable( event.GetInt() == 0 );
 726                 break;
 727             }
 728         case ID_LISTBOX_SEL_NUM:
 729             {
 730                 m_listbox->SetSelection( 2 );
 731                 break;
 732             }
 733         case ID_LISTBOX_SEL_STR:
 734             {
 735                 m_listbox->SetStringSelection( "This" );
 736                 break;
 737             }
 738         case ID_LISTBOX_CLEAR:
 739             {
 740                 m_listbox->Clear();
 741                 break;
 742             }
 743         case ID_LISTBOX_APPEND:
 744             {
 745                 m_listbox->Append( "Hi!" );
 746                 break;
 747             }
 748         case ID_LISTBOX_DELETE:
 749             {
 750                 int idx = m_listbox->GetSelection();
 751                 m_listbox->Delete( idx );
 752                 break;
 753             }
 754         case ID_LISTBOX_FONT:
 755             {
 756                 m_listbox->SetFont( *wxITALIC_FONT );
 757                 m_checkbox->SetFont( *wxITALIC_FONT );
 758                 break;
 759             }
 760     }
 761 }
 762
 763 void MyPanel::OnChoice( wxCommandEvent &event )
 764 {
 765     m_text->AppendText( "Choice selection string is: " );
 766     m_text->AppendText( event.GetString() );
 767     m_text->AppendText( "\n" );
 768 }
 769
 770 void MyPanel::OnChoiceButtons( wxCommandEvent &event )
 771 {
 772     switch (event.GetId())
 773     {
 774         case ID_CHOICE_ENABLE:
 775             {
 776                 m_choice->Enable( event.GetInt() == 0 );
 777                 break;
 778             }
 779         case ID_CHOICE_SEL_NUM:
 780             {
 781                 m_choice->SetSelection( 2 );
 782                 break;
 783             }
 784         case ID_CHOICE_SEL_STR:
 785             {
 786                 m_choice->SetStringSelection( "This" );
 787                 break;
 788             }
 789         case ID_CHOICE_CLEAR:
 790             {
 791                 m_choice->Clear();
 792                 break;
 793             }
 794         case ID_CHOICE_APPEND:
 795             {
 796                 m_choice->Append( "Hi!" );
 797                 break;
 798             }
 799         case ID_CHOICE_DELETE:
 800             {
 801                 int idx = m_choice->GetSelection();
 802                 m_choice->Delete( idx );
 803                 break;
 804             }
 805         case ID_CHOICE_FONT:
 806             {
 807                 m_choice->SetFont( *wxITALIC_FONT );
 808                 break;
 809             }
 810     }
 811 }
 812
 813 void MyPanel::OnCombo( wxCommandEvent &event )
 814 {
 815     m_text->AppendText( "ComboBox selection string is: " );
 816     m_text->AppendText( event.GetString() );
 817     m_text->AppendText( "\n" );
 818 }
 819
 820 void MyPanel::OnComboButtons( wxCommandEvent &event )
 821 {
 822     switch (event.GetId())
 823     {
 824         case ID_COMBO_ENABLE:
 825             {
 826                 m_combo->Enable( event.GetInt() == 0 );
 827                 break;
 828             }
 829         case ID_COMBO_SEL_NUM:
 830             {
 831                 m_combo->SetSelection( 2 );
 832                 break;
 833             }
 834         case ID_COMBO_SEL_STR:
 835             {
 836                 m_combo->SetStringSelection( "This" );
 837                 break;
 838             }
 839         case ID_COMBO_CLEAR:
 840             {
 841                 m_combo->Clear();
 842                 break;
 843             }
 844         case ID_COMBO_APPEND:
 845             {
 846                 m_combo->Append( "Hi!" );
 847                 break;
 848             }
 849         case ID_COMBO_DELETE:
 850             {
 851                 int idx = m_combo->GetSelection();
 852                 m_combo->Delete( idx );
 853                 break;
 854             }
 855         case ID_COMBO_FONT:
 856             {
 857                 m_combo->SetFont( *wxITALIC_FONT );
 858                 break;
 859             }
 860     }
 861 }
 862
 863 void MyPanel::OnRadio( wxCommandEvent &event )
 864 {
 865     m_text->AppendText( "RadioBox selection string is: " );
 866     m_text->AppendText( event.GetString() );
 867     m_text->AppendText( "\n" );
 868 }
 869
 870 void MyPanel::OnRadioButtons( wxCommandEvent &event )
 871 {
 872     switch (event.GetId())
 873     {
 874         case ID_RADIOBOX_ENABLE:
 875             {
 876                 m_radio->Enable( event.GetInt() == 0 );
 877                 break;
 878             }
 879         case ID_RADIOBOX_SEL_NUM:
 880             {
 881                 m_radio->SetSelection( 2 );
 882                 break;
 883             }
 884         case ID_RADIOBOX_SEL_STR:
 885             {
 886                 m_radio->SetStringSelection( "This" );
 887                 break;
 888             }
 889         case ID_RADIOBOX_FONT:
 890             {
 891                 m_radio->SetFont( *wxITALIC_FONT );
 892                 break;
 893             }
 894     }
 895 }
 896
 897 void MyPanel::OnSetFont( wxCommandEvent &WXUNUSED(event) )
 898 {
 899     m_fontButton->SetFont( *wxITALIC_FONT );
 900     m_text->SetFont( *wxITALIC_FONT );
 901 }
 902
 903 void MyPanel::OnSliderUpdate( wxCommandEvent &WXUNUSED(event) )
 904 {
 905     m_gauge->SetValue( m_slider->GetValue() );
 906 }
 907
 908 #ifndef __WIN16__
 909 void MyPanel::OnSpinUpdate( wxSpinEvent &event )
 910 {
 911     wxString value;
 912     value.Printf( "%d", event.GetPosition() );
 913     m_spintext->SetValue( value );
 914
 915     value.Printf("Spin control range: (%d, %d), current = %d\n",
 916                  m_spinbutton->GetMin(), m_spinbutton->GetMax(),
 917                  m_spinbutton->GetValue());
 918
 919     m_text->AppendText(value);
 920 }
 921 #endif
 922
 923 MyPanel::~MyPanel()
 924 {
 925     delete m_notebook->GetImageList();
 926 }
 927
 928 //----------------------------------------------------------------------
 929 // MyFrame
 930 //----------------------------------------------------------------------
 931
 932 BEGIN_EVENT_TABLE(MyFrame, wxFrame)
 933 EVT_MENU(MINIMAL_QUIT,   MyFrame::OnQuit)
 934 EVT_MENU(MINIMAL_ABOUT,  MyFrame::OnAbout)
 935 #if wxUSE_TOOLTIPS
 936 EVT_MENU(MINIMAL_SET_TOOLTIP_DELAY,  MyFrame::OnSetTooltipDelay)
 937 EVT_MENU(MINIMAL_ENABLE_TOOLTIPS,  MyFrame::OnToggleTooltips)
 938 #endif // wxUSE_TOOLTIPS
 939 EVT_SIZE(MyFrame::OnSize)
 940 EVT_IDLE(MyFrame::OnIdle)
 941 END_EVENT_TABLE()
 942
 943 MyFrame::MyFrame(wxFrame *frame, char *title, int x, int y, int w, int h)
 944 : wxFrame(frame, -1, title, wxPoint(x, y), wxSize(w, h))
 945 {
 946     CreateStatusBar(2);
 947
 948     (void)new MyPanel( this, 10, 10, 300, 100 );
 949 }
 950
 951 void MyFrame::OnQuit (wxCommandEvent& WXUNUSED(event) )
 952 {
 953     Close(TRUE);
 954 }
 955
 956 void MyFrame::OnAbout( wxCommandEvent& WXUNUSED(event) )
 957 {
 958     wxBeginBusyCursor();
 959
 960     wxMessageDialog dialog(this, "This is a control sample", "About Controls", wxOK );
 961     dialog.ShowModal();
 962
 963     wxEndBusyCursor();
 964 }
 965
 966 #if wxUSE_TOOLTIPS
 967 void MyFrame::OnSetTooltipDelay(wxCommandEvent& event)
 968 {
 969     static long s_delay = 5000;
 970
 971     wxString delay;
 972     delay.Printf("%ld", s_delay);
 973
 974     delay = wxGetTextFromUser("Enter delay (in milliseconds)",
 975             "Set tooltip delay",
 976             delay,
 977             this);
 978     if ( !delay )
 979         return; // cancelled
 980
 981     sscanf(delay, "%ld", &s_delay);
 982
 983     wxToolTip::SetDelay(s_delay);
 984
 985     wxLogStatus(this, "Tooltip delay set to %ld milliseconds", s_delay);
 986 }
 987
 988 void MyFrame::OnToggleTooltips(wxCommandEvent& event)
 989 {
 990     static bool s_enabled = TRUE;
 991
 992     s_enabled = !s_enabled;
 993
 994     wxToolTip::Enable(s_enabled);
 995
 996     wxLogStatus(this, "Tooltips %sabled", s_enabled ? "en" : "dis");
 997 }
 998 #endif // tooltips
 999
1000 void MyFrame::OnSize( wxSizeEvent& event )
1001 {
1002     wxString msg;
1003     msg.Printf("%dx%d", event.GetSize().x, event.GetSize().y);
1004     SetStatusText(msg, 1);
1005
1006     event.Skip();
1007 }
1008
1009 void MyFrame::OnIdle( wxIdleEvent& WXUNUSED(event) )
1010 {
1011     // track the window which has the focus in the status bar
1012     static wxWindow *s_windowFocus = (wxWindow *)NULL;
1013     wxWindow *focus = wxWindow::FindFocus();
1014     if ( focus && (focus != s_windowFocus) )
1015     {
1016         s_windowFocus = focus;
1017
1018         wxString msg;
1019         msg.Printf("Focus: wxWindow = %p"
1020 #ifdef __WXMSW__
1021                 ", HWND = %08x"
1022 #endif // wxMSW
1023                 , s_windowFocus
1024 #ifdef __WXMSW__
1025                 , s_windowFocus->GetHWND()
1026 #endif // wxMSW
1027                   );
1028
1029         SetStatusText(msg);
1030     }
1031 }