samples/listbox/lboxtest.cpp

   1 /////////////////////////////////////////////////////////////////////////////
   2 // Name:        lboxtest.cpp
   3 // Purpose:     wxListBox sample
   4 // Author:      Vadim Zeitlin
   5 // Id:          $Id$
   6 // Copyright:   (c) 2000 Vadim Zeitlin
   7 // Licence:     wxWindows licence
   8 /////////////////////////////////////////////////////////////////////////////
   9
  10 /*
  11    Current bugs:
  12
  13   +1. horz scrollbar doesn't appear in listbox
  14   +2. truncating text ctrl doesn't update display
  15   +3. deleting last listbox item doesn't update display
  16    4. text ctrl background corrupted after resize
  17  */
  18
  19 // ============================================================================
  20 // declarations
  21 // ============================================================================
  22
  23 // ----------------------------------------------------------------------------
  24 // headers
  25 // ----------------------------------------------------------------------------
  26
  27 // for compilers that support precompilation, includes "wx/wx.h".
  28 #include "wx/wxprec.h"
  29
  30 #ifdef __BORLANDC__
  31     #pragma hdrstop
  32 #endif
  33
  34 // for all others, include the necessary headers
  35 #ifndef WX_PRECOMP
  36     #include "wx/wx.h"
  37     #include "wx/app.h"
  38     #include "wx/frame.h"
  39     #include "wx/dcclient.h"
  40
  41     #include "wx/button.h"
  42     #include "wx/checkbox.h"
  43     #include "wx/checklst.h"
  44     #include "wx/listbox.h"
  45     #include "wx/radiobox.h"
  46     #include "wx/radiobut.h"
  47     #include "wx/statbox.h"
  48     #include "wx/stattext.h"
  49     #include "wx/textctrl.h"
  50 #endif
  51
  52 #include "wx/sizer.h"
  53
  54 #ifdef __WXUNIVERSAL__
  55     #include "wx/univ/theme.h"
  56 #endif // __WXUNIVERSAL__
  57
  58 // ----------------------------------------------------------------------------
  59 // constants
  60 // ----------------------------------------------------------------------------
  61
  62 // control ids
  63 enum
  64 {
  65     LboxTest_Reset = 100,
  66     LboxTest_Create,
  67     LboxTest_Add,
  68     LboxTest_AddText,
  69     LboxTest_AddSeveral,
  70     LboxTest_AddMany,
  71     LboxTest_Clear,
  72 #if wxUSE_LOG
  73     LboxTest_ClearLog,
  74 #endif // wxUSE_LOG
  75     LboxTest_Change,
  76     LboxTest_ChangeText,
  77     LboxTest_Delete,
  78     LboxTest_DeleteText,
  79     LboxTest_DeleteSel,
  80     LboxTest_Listbox,
  81     LboxTest_Quit
  82 };
  83
  84 // ----------------------------------------------------------------------------
  85 // our classes
  86 // ----------------------------------------------------------------------------
  87
  88 // Define a new application type, each program should derive a class from wxApp
  89 class LboxTestApp : public wxApp
  90 {
  91 public:
  92     // override base class virtuals
  93     // ----------------------------
  94
  95     // this one is called on application startup and is a good place for the app
  96     // initialization (doing it here and not in the ctor allows to have an error
  97     // return: if OnInit() returns false, the application terminates)
  98     virtual bool OnInit();
  99 };
 100
 101 // Define a new frame type: this is going to be our main frame
 102 class LboxTestFrame : public wxFrame
 103 {
 104 public:
 105     // ctor(s) and dtor
 106     LboxTestFrame(const wxString& title);
 107     virtual ~LboxTestFrame();
 108
 109 protected:
 110     // event handlers
 111     void OnButtonReset(wxCommandEvent& event);
 112     void OnButtonCreate(wxCommandEvent& event);
 113     void OnButtonChange(wxCommandEvent& event);
 114     void OnButtonDelete(wxCommandEvent& event);
 115     void OnButtonDeleteSel(wxCommandEvent& event);
 116     void OnButtonClear(wxCommandEvent& event);
 117 #if wxUSE_LOG
 118     void OnButtonClearLog(wxCommandEvent& event);
 119 #endif // wxUSE_LOG
 120     void OnButtonAdd(wxCommandEvent& event);
 121     void OnButtonAddSeveral(wxCommandEvent& event);
 122     void OnButtonAddMany(wxCommandEvent& event);
 123     void OnButtonQuit(wxCommandEvent& event);
 124
 125     void OnListbox(wxCommandEvent& event);
 126     void OnListboxDClick(wxCommandEvent& event);
 127
 128     void OnCheckOrRadioBox(wxCommandEvent& event);
 129
 130     void OnUpdateUIAddSeveral(wxUpdateUIEvent& event);
 131     void OnUpdateUICreateButton(wxUpdateUIEvent& event);
 132     void OnUpdateUIClearButton(wxUpdateUIEvent& event);
 133     void OnUpdateUIDeleteButton(wxUpdateUIEvent& event);
 134     void OnUpdateUIDeleteSelButton(wxUpdateUIEvent& event);
 135
 136     // reset the listbox parameters
 137     void Reset();
 138
 139     // (re)create the listbox
 140     void CreateLbox();
 141
 142     // listbox parameters
 143     // ------------------
 144
 145     // the selection mode
 146     enum LboxSelection
 147     {
 148         LboxSel_Single,
 149         LboxSel_Extended,
 150         LboxSel_Multiple
 151     } m_lboxSelMode;
 152
 153     // should it be sorted?
 154     bool m_sorted;
 155
 156     // should it have horz scroll/vert scrollbar permanently shown?
 157     bool m_horzScroll,
 158          m_vertScrollAlways;
 159
 160     // should the recreate button be enabled?
 161     bool m_dirty;
 162
 163     // the controls
 164     // ------------
 165
 166     // the sel mode radiobox
 167     wxRadioBox *m_radioSelMode;
 168
 169     // the checkboxes
 170     wxCheckBox *m_chkSort,
 171                *m_chkHScroll,
 172                *m_chkVScroll;
 173
 174     // the listbox itself and the sizer it is in
 175     wxListBox *m_lbox;
 176     wxSizer *m_sizerLbox;
 177
 178 #if wxUSE_LOG
 179     // the listbox for logging messages
 180     wxListBox *m_lboxLog;
 181 #endif // wxUSE_LOG
 182
 183     // the text entries for "Add/change string" and "Delete" buttons
 184     wxTextCtrl *m_textAdd,
 185                *m_textChange,
 186                *m_textDelete;
 187
 188 private:
 189 #if wxUSE_LOG
 190     // the log target we use to redirect messages to the listbox
 191     wxLog *m_logTarget;
 192 #endif // wxUSE_LOG
 193
 194     // any class wishing to process wxWidgets events must use this macro
 195     DECLARE_EVENT_TABLE()
 196 };
 197
 198 #if wxUSE_LOG
 199 // A log target which just redirects the messages to a listbox
 200 class LboxLogger : public wxLog
 201 {
 202 public:
 203     LboxLogger(wxListBox *lbox, wxLog *logOld)
 204     {
 205         m_lbox = lbox;
 206         //m_lbox->Disable(); -- looks ugly under MSW
 207         m_logOld = logOld;
 208     }
 209
 210     virtual ~LboxLogger()
 211     {
 212         wxLog::SetActiveTarget(m_logOld);
 213     }
 214
 215 private:
 216     // implement sink functions
 217     virtual void DoLog(wxLogLevel level, const wxChar *szString, time_t t)
 218     {
 219         // don't put trace messages into listbox or we can get into infinite
 220         // recursion
 221         if ( level == wxLOG_Trace )
 222         {
 223             if ( m_logOld )
 224             {
 225                 // cast is needed to call protected method
 226                 ((LboxLogger *)m_logOld)->DoLog(level, szString, t);
 227             }
 228         }
 229         else
 230         {
 231             wxLog::DoLog(level, szString, t);
 232         }
 233     }
 234
 235     virtual void DoLogString(const wxChar *szString, time_t WXUNUSED(t))
 236     {
 237         wxString msg;
 238         TimeStamp(&msg);
 239         msg += szString;
 240         #ifdef __WXUNIVERSAL__
 241             m_lbox->AppendAndEnsureVisible(msg);
 242         #else // other ports don't have this method yet
 243             m_lbox->Append(msg);
 244
 245             // SetFirstItem() isn't implemented in wxGTK
 246             #ifndef __WXGTK__
 247                 m_lbox->SetFirstItem(m_lbox->GetCount() - 1);
 248             #endif
 249         #endif
 250     }
 251
 252     // the control we use
 253     wxListBox *m_lbox;
 254
 255     // the old log target
 256     wxLog *m_logOld;
 257 };
 258 #endif // wxUSE_LOG
 259
 260 // ----------------------------------------------------------------------------
 261 // misc macros
 262 // ----------------------------------------------------------------------------
 263
 264 IMPLEMENT_APP(LboxTestApp)
 265
 266 // ----------------------------------------------------------------------------
 267 // event tables
 268 // ----------------------------------------------------------------------------
 269
 270 BEGIN_EVENT_TABLE(LboxTestFrame, wxFrame)
 271     EVT_BUTTON(LboxTest_Reset, LboxTestFrame::OnButtonReset)
 272     EVT_BUTTON(LboxTest_Create, LboxTestFrame::OnButtonCreate)
 273     EVT_BUTTON(LboxTest_Change, LboxTestFrame::OnButtonChange)
 274     EVT_BUTTON(LboxTest_Delete, LboxTestFrame::OnButtonDelete)
 275     EVT_BUTTON(LboxTest_DeleteSel, LboxTestFrame::OnButtonDeleteSel)
 276     EVT_BUTTON(LboxTest_Clear, LboxTestFrame::OnButtonClear)
 277 #if wxUSE_LOG
 278     EVT_BUTTON(LboxTest_ClearLog, LboxTestFrame::OnButtonClearLog)
 279 #endif // wxUSE_LOG
 280     EVT_BUTTON(LboxTest_Add, LboxTestFrame::OnButtonAdd)
 281     EVT_BUTTON(LboxTest_AddSeveral, LboxTestFrame::OnButtonAddSeveral)
 282     EVT_BUTTON(LboxTest_AddMany, LboxTestFrame::OnButtonAddMany)
 283     EVT_BUTTON(LboxTest_Quit, LboxTestFrame::OnButtonQuit)
 284
 285     EVT_TEXT_ENTER(LboxTest_AddText, LboxTestFrame::OnButtonAdd)
 286     EVT_TEXT_ENTER(LboxTest_DeleteText, LboxTestFrame::OnButtonDelete)
 287
 288     EVT_UPDATE_UI_RANGE(LboxTest_Reset, LboxTest_Create,
 289                         LboxTestFrame::OnUpdateUICreateButton)
 290
 291     EVT_UPDATE_UI(LboxTest_AddSeveral, LboxTestFrame::OnUpdateUIAddSeveral)
 292     EVT_UPDATE_UI(LboxTest_Clear, LboxTestFrame::OnUpdateUIClearButton)
 293     EVT_UPDATE_UI(LboxTest_DeleteText, LboxTestFrame::OnUpdateUIClearButton)
 294     EVT_UPDATE_UI(LboxTest_Delete, LboxTestFrame::OnUpdateUIDeleteButton)
 295     EVT_UPDATE_UI(LboxTest_Change, LboxTestFrame::OnUpdateUIDeleteSelButton)
 296     EVT_UPDATE_UI(LboxTest_ChangeText, LboxTestFrame::OnUpdateUIDeleteSelButton)
 297     EVT_UPDATE_UI(LboxTest_DeleteSel, LboxTestFrame::OnUpdateUIDeleteSelButton)
 298
 299     EVT_LISTBOX(LboxTest_Listbox, LboxTestFrame::OnListbox)
 300     EVT_LISTBOX_DCLICK(wxID_ANY, LboxTestFrame::OnListboxDClick)
 301     EVT_CHECKBOX(wxID_ANY, LboxTestFrame::OnCheckOrRadioBox)
 302     EVT_RADIOBOX(wxID_ANY, LboxTestFrame::OnCheckOrRadioBox)
 303 END_EVENT_TABLE()
 304
 305 // ============================================================================
 306 // implementation
 307 // ============================================================================
 308
 309 // ----------------------------------------------------------------------------
 310 // app class
 311 // ----------------------------------------------------------------------------
 312
 313 bool LboxTestApp::OnInit()
 314 {
 315     wxFrame *frame = new LboxTestFrame(_T("wxListBox sample"));
 316     frame->Show();
 317
 318 #if wxUSE_LOG
 319     //wxLog::AddTraceMask(_T("listbox"));
 320     wxLog::AddTraceMask(_T("scrollbar"));
 321 #endif // wxUSE_LOG
 322
 323     return true;
 324 }
 325
 326 // ----------------------------------------------------------------------------
 327 // top level frame class
 328 // ----------------------------------------------------------------------------
 329
 330 LboxTestFrame::LboxTestFrame(const wxString& title)
 331              : wxFrame(NULL, wxID_ANY, title, wxPoint(100, 100))
 332 {
 333     // init everything
 334     m_dirty = false;
 335     m_radioSelMode = (wxRadioBox *)NULL;
 336
 337     m_chkVScroll =
 338     m_chkHScroll =
 339     m_chkSort = (wxCheckBox *)NULL;
 340
 341     m_lbox = (wxListBox *)NULL;
 342 #if wxUSE_LOG
 343     m_lboxLog = (wxListBox *)NULL;
 344 #endif // wxUSE_LOG
 345     m_sizerLbox = (wxSizer *)NULL;
 346
 347 #if wxUSE_LOG
 348     m_logTarget = (wxLog *)NULL;
 349 #endif // wxUSE_LOG
 350
 351     wxPanel *panel = new wxPanel(this, wxID_ANY);
 352
 353     /*
 354        What we create here is a frame having 3 panes: the explanatory pane to
 355        the left allowing to set the listbox styles and recreate the control,
 356        the pane containing the listbox itself and the lower pane containing
 357        the buttons which allow to add/change/delete strings to/from it.
 358     */
 359     wxSizer *sizerTop = new wxBoxSizer(wxVERTICAL),
 360             *sizerUp = new wxBoxSizer(wxHORIZONTAL),
 361             *sizerLeft,
 362             *sizerRight = new wxBoxSizer(wxVERTICAL);
 363
 364     // upper left pane
 365     static const wxString modes[] =
 366     {
 367         _T("single"),
 368         _T("extended"),
 369         _T("multiple"),
 370     };
 371
 372     wxStaticBox *box = new wxStaticBox(panel, wxID_ANY, _T("&Set listbox parameters"));
 373     m_radioSelMode = new wxRadioBox(panel, wxID_ANY, _T("Selection &mode:"),
 374                                     wxDefaultPosition, wxDefaultSize,
 375                                     WXSIZEOF(modes), modes,
 376                                     1, wxRA_SPECIFY_COLS);
 377
 378     m_chkVScroll = new wxCheckBox(panel, wxID_ANY, _T("Always show &vertical scrollbar"));
 379     m_chkHScroll = new wxCheckBox(panel, wxID_ANY, _T("Show &horizontal scrollbar"));
 380     m_chkSort = new wxCheckBox(panel, wxID_ANY, _T("&Sort items"));
 381
 382     sizerLeft = new wxStaticBoxSizer(box, wxVERTICAL);
 383
 384     sizerLeft->Add(m_chkVScroll, 0, wxLEFT | wxRIGHT, 5);
 385     sizerLeft->Add(m_chkHScroll, 0, wxLEFT | wxRIGHT, 5);
 386     sizerLeft->Add(m_chkSort, 0, wxLEFT | wxRIGHT, 5);
 387     sizerLeft->Add(5, 5, 0, wxGROW | wxALL, 5); // spacer
 388     sizerLeft->Add(m_radioSelMode, 0, wxGROW | wxALL, 5);
 389
 390     wxSizer *sizerBtn = new wxBoxSizer(wxHORIZONTAL);
 391     wxButton *btn = new wxButton(panel, LboxTest_Reset, _T("&Reset"));
 392     sizerBtn->Add(btn, 0, wxLEFT | wxRIGHT, 5);
 393     btn = new wxButton(panel, LboxTest_Create, _T("&Create"));
 394     sizerBtn->Add(btn, 0, wxLEFT | wxRIGHT, 5);
 395     sizerLeft->Add(sizerBtn, 0, wxALIGN_CENTRE_HORIZONTAL | wxALL, 15);
 396
 397     // middle pane
 398     wxStaticBox *box2 = new wxStaticBox(panel, wxID_ANY, _T("&Change listbox contents"));
 399     wxSizer *sizerMiddle = new wxStaticBoxSizer(box2, wxVERTICAL);
 400
 401     wxSizer *sizerRow = new wxBoxSizer(wxHORIZONTAL);
 402     btn = new wxButton(panel, LboxTest_Add, _T("&Add this string"));
 403     m_textAdd = new wxTextCtrl(panel, LboxTest_AddText, _T("test item 0"));
 404     sizerRow->Add(btn, 0, wxRIGHT, 5);
 405     sizerRow->Add(m_textAdd, 1, wxLEFT, 5);
 406     sizerMiddle->Add(sizerRow, 0, wxALL | wxGROW, 5);
 407
 408     btn = new wxButton(panel, LboxTest_AddSeveral, _T("&Insert a few strings"));
 409     sizerMiddle->Add(btn, 0, wxALL | wxGROW, 5);
 410
 411     btn = new wxButton(panel, LboxTest_AddMany, _T("Add &many strings"));
 412     sizerMiddle->Add(btn, 0, wxALL | wxGROW, 5);
 413
 414     sizerRow = new wxBoxSizer(wxHORIZONTAL);
 415     btn = new wxButton(panel, LboxTest_Change, _T("C&hange current"));
 416     m_textChange = new wxTextCtrl(panel, LboxTest_ChangeText, wxEmptyString);
 417     sizerRow->Add(btn, 0, wxRIGHT, 5);
 418     sizerRow->Add(m_textChange, 1, wxLEFT, 5);
 419     sizerMiddle->Add(sizerRow, 0, wxALL | wxGROW, 5);
 420
 421     sizerRow = new wxBoxSizer(wxHORIZONTAL);
 422     btn = new wxButton(panel, LboxTest_Delete, _T("&Delete this item"));
 423     m_textDelete = new wxTextCtrl(panel, LboxTest_DeleteText, wxEmptyString);
 424     sizerRow->Add(btn, 0, wxRIGHT, 5);
 425     sizerRow->Add(m_textDelete, 1, wxLEFT, 5);
 426     sizerMiddle->Add(sizerRow, 0, wxALL | wxGROW, 5);
 427
 428     btn = new wxButton(panel, LboxTest_DeleteSel, _T("Delete &selection"));
 429     sizerMiddle->Add(btn, 0, wxALL | wxGROW, 5);
 430
 431     btn = new wxButton(panel, LboxTest_Clear, _T("&Clear"));
 432     sizerMiddle->Add(btn, 0, wxALL | wxGROW, 5);
 433
 434     // right pane
 435     m_lbox = new wxListBox(panel, LboxTest_Listbox,
 436                            wxDefaultPosition, wxDefaultSize,
 437                            0, NULL,
 438                            wxLB_HSCROLL);
 439     sizerRight->Add(m_lbox, 1, wxGROW | wxALL, 5);
 440     sizerRight->SetMinSize(250, 0);
 441     m_sizerLbox = sizerRight; // save it to modify it later
 442
 443     // the 3 panes panes compose the upper part of the window
 444     sizerUp->Add(sizerLeft, 0, wxGROW | (wxALL & ~wxLEFT), 10);
 445     sizerUp->Add(sizerMiddle, 1, wxGROW | wxALL, 10);
 446     sizerUp->Add(sizerRight, 1, wxGROW | (wxALL & ~wxRIGHT), 10);
 447
 448     // the lower one only has the log listbox and a button to clear it
 449 #if wxUSE_LOG
 450     wxSizer *sizerDown = new wxStaticBoxSizer
 451                              (
 452                                new wxStaticBox(panel, wxID_ANY, _T("&Log window")),
 453                                wxVERTICAL
 454                              );
 455     m_lboxLog = new wxListBox(panel, wxID_ANY);
 456     sizerDown->Add(m_lboxLog, 1, wxGROW | wxALL, 5);
 457 #else
 458     wxSizer *sizerDown = new wxBoxSizer(wxVERTICAL);
 459 #endif // wxUSE_LOG
 460     wxBoxSizer *sizerBtns = new wxBoxSizer(wxHORIZONTAL);
 461 #if wxUSE_LOG
 462     btn = new wxButton(panel, LboxTest_ClearLog, _T("Clear &log"));
 463     sizerBtns->Add(btn);
 464     sizerBtns->Add(10, 0); // spacer
 465 #endif // wxUSE_LOG
 466     btn = new wxButton(panel, LboxTest_Quit, _T("E&xit"));
 467     sizerBtns->Add(btn);
 468     sizerDown->Add(sizerBtns, 0, wxALL | wxALIGN_RIGHT, 5);
 469
 470     // put everything together
 471     sizerTop->Add(sizerUp, 1, wxGROW | (wxALL & ~wxBOTTOM), 10);
 472     sizerTop->Add(0, 5, 0, wxGROW); // spacer in between
 473     sizerTop->Add(sizerDown, 0,  wxGROW | (wxALL & ~wxTOP), 10);
 474
 475     // final initialization
 476     Reset();
 477     m_dirty = false;
 478
 479     panel->SetSizer(sizerTop);
 480
 481     sizerTop->Fit(this);
 482     sizerTop->SetSizeHints(this);
 483
 484 #if wxUSE_LOG
 485     // now that everything is created we can redirect the log messages to the
 486     // listbox
 487     m_logTarget = new LboxLogger(m_lboxLog, wxLog::GetActiveTarget());
 488     wxLog::SetActiveTarget(m_logTarget);
 489 #endif // wxUSE_LOG
 490 }
 491
 492 LboxTestFrame::~LboxTestFrame()
 493 {
 494 #if wxUSE_LOG
 495     delete m_logTarget;
 496 #endif // wxUSE_LOG
 497 }
 498
 499 // ----------------------------------------------------------------------------
 500 // operations
 501 // ----------------------------------------------------------------------------
 502
 503 void LboxTestFrame::Reset()
 504 {
 505     if ( m_radioSelMode->GetSelection() == LboxSel_Single &&
 506          !m_chkSort->GetValue() &&
 507          m_chkHScroll->GetValue() &&
 508          !m_chkVScroll->GetValue() )
 509     {
 510         // nothing to do
 511         return;
 512     }
 513
 514     m_radioSelMode->SetSelection(LboxSel_Single);
 515     m_chkSort->SetValue(false);
 516     m_chkHScroll->SetValue(true);
 517     m_chkVScroll->SetValue(false);
 518
 519     m_dirty = true;
 520 }
 521
 522 void LboxTestFrame::CreateLbox()
 523 {
 524     int flags = 0;
 525     switch ( m_radioSelMode->GetSelection() )
 526     {
 527         default:
 528             wxFAIL_MSG( _T("unexpected radio box selection") );
 529
 530         case LboxSel_Single:    flags |= wxLB_SINGLE; break;
 531         case LboxSel_Extended:  flags |= wxLB_EXTENDED; break;
 532         case LboxSel_Multiple:  flags |= wxLB_MULTIPLE; break;
 533     }
 534
 535     if ( m_chkVScroll->GetValue() )
 536         flags |= wxLB_ALWAYS_SB;
 537     if ( m_chkHScroll->GetValue() )
 538         flags |= wxLB_HSCROLL;
 539     if ( m_chkSort->GetValue() )
 540         flags |= wxLB_SORT;
 541
 542     wxArrayString items;
 543     if ( m_lbox )
 544     {
 545         int count = m_lbox->GetCount();
 546         for ( int n = 0; n < count; n++ )
 547         {
 548             items.Add(m_lbox->GetString(n));
 549         }
 550
 551         m_sizerLbox->Detach(m_lbox);
 552         delete m_lbox;
 553     }
 554
 555     m_lbox = new wxListBox(this, wxID_ANY,
 556                            wxDefaultPosition, wxDefaultSize,
 557                            0, NULL,
 558                            flags);
 559     m_lbox->Set(items);
 560     m_sizerLbox->Add(m_lbox, 1, wxGROW | wxALL, 5);
 561     m_sizerLbox->Layout();
 562
 563     m_dirty = false;
 564 }
 565
 566 // ----------------------------------------------------------------------------
 567 // event handlers
 568 // ----------------------------------------------------------------------------
 569
 570 void LboxTestFrame::OnButtonQuit(wxCommandEvent& WXUNUSED(event))
 571 {
 572     Close();
 573 }
 574
 575 void LboxTestFrame::OnButtonReset(wxCommandEvent& WXUNUSED(event))
 576 {
 577     Reset();
 578 }
 579
 580 void LboxTestFrame::OnButtonCreate(wxCommandEvent& WXUNUSED(event))
 581 {
 582     CreateLbox();
 583 }
 584
 585 void LboxTestFrame::OnButtonChange(wxCommandEvent& WXUNUSED(event))
 586 {
 587     wxArrayInt selections;
 588     int count = m_lbox->GetSelections(selections);
 589     wxString s = m_textChange->GetValue();
 590     for ( int n = 0; n < count; n++ )
 591     {
 592         m_lbox->SetString(selections[n], s);
 593     }
 594 }
 595
 596 void LboxTestFrame::OnButtonDelete(wxCommandEvent& WXUNUSED(event))
 597 {
 598     unsigned long n;
 599     if ( !m_textDelete->GetValue().ToULong(&n) ||
 600             (n >= (unsigned)m_lbox->GetCount()) )
 601     {
 602         return;
 603     }
 604
 605     m_lbox->Delete(n);
 606 }
 607
 608 void LboxTestFrame::OnButtonDeleteSel(wxCommandEvent& WXUNUSED(event))
 609 {
 610     wxArrayInt selections;
 611     int n = m_lbox->GetSelections(selections);
 612     while ( n > 0 )
 613     {
 614         m_lbox->Delete(selections[--n]);
 615     }
 616 }
 617
 618 void LboxTestFrame::OnButtonClear(wxCommandEvent& WXUNUSED(event))
 619 {
 620     m_lbox->Clear();
 621 }
 622
 623 #if wxUSE_LOG
 624 void LboxTestFrame::OnButtonClearLog(wxCommandEvent& WXUNUSED(event))
 625 {
 626     m_lboxLog->Clear();
 627 }
 628 #endif // wxUSE_LOG
 629
 630 void LboxTestFrame::OnButtonAdd(wxCommandEvent& WXUNUSED(event))
 631 {
 632     static size_t s_item = 0;
 633
 634     wxString s = m_textAdd->GetValue();
 635     if ( !m_textAdd->IsModified() )
 636     {
 637         // update the default string
 638         m_textAdd->SetValue(wxString::Format(_T("test item %u"), ++s_item));
 639     }
 640
 641     m_lbox->Append(s);
 642 }
 643
 644 void LboxTestFrame::OnButtonAddMany(wxCommandEvent& WXUNUSED(event))
 645 {
 646     // "many" means 1000 here
 647     for ( size_t n = 0; n < 1000; n++ )
 648     {
 649         m_lbox->Append(wxString::Format(_T("item #%u"), n));
 650     }
 651 }
 652
 653 void LboxTestFrame::OnButtonAddSeveral(wxCommandEvent& WXUNUSED(event))
 654 {
 655     wxArrayString items;
 656     items.Add(_T("First"));
 657     items.Add(_T("another one"));
 658     items.Add(_T("and the last (very very very very very very very very very very long) one"));
 659     m_lbox->InsertItems(items, 0);
 660 }
 661
 662 void LboxTestFrame::OnUpdateUICreateButton(wxUpdateUIEvent& event)
 663 {
 664     event.Enable(m_dirty);
 665 }
 666
 667 void LboxTestFrame::OnUpdateUIDeleteButton(wxUpdateUIEvent& event)
 668 {
 669     unsigned long n;
 670     event.Enable(m_textDelete->GetValue().ToULong(&n) &&
 671                     (n < (unsigned)m_lbox->GetCount()));
 672 }
 673
 674 void LboxTestFrame::OnUpdateUIDeleteSelButton(wxUpdateUIEvent& event)
 675 {
 676     wxArrayInt selections;
 677     event.Enable(m_lbox->GetSelections(selections) != 0);
 678 }
 679
 680 void LboxTestFrame::OnUpdateUIClearButton(wxUpdateUIEvent& event)
 681 {
 682     event.Enable(m_lbox->GetCount() != 0);
 683 }
 684
 685 void LboxTestFrame::OnUpdateUIAddSeveral(wxUpdateUIEvent& event)
 686 {
 687     event.Enable(!(m_lbox->GetWindowStyle() & wxLB_SORT));
 688 }
 689
 690 void LboxTestFrame::OnListbox(wxCommandEvent& event)
 691 {
 692     int sel = event.GetInt();
 693     m_textDelete->SetValue(wxString::Format(_T("%d"), sel));
 694
 695     wxLogMessage(_T("Listbox item %d selected"), sel);
 696 }
 697
 698 void LboxTestFrame::OnListboxDClick(wxCommandEvent& event)
 699 {
 700     int sel = event.GetInt();
 701     wxLogMessage(_T("Listbox item %d double clicked"), sel);
 702 }
 703
 704 void LboxTestFrame::OnCheckOrRadioBox(wxCommandEvent& WXUNUSED(event))
 705 {
 706     m_dirty = true;
 707 }
 708