samples/checklst/checklst.cpp

   1 ///////////////////////////////////////////////////////////////////////////////
   2 // Name:        checklst.cpp
   3 // Purpose:     wxCheckListBox sample
   4 // Author:      Vadim Zeitlin
   5 // Modified by:
   6 // Created:     13.11.97
   7 // RCS-ID:      $Id$
   8 // Copyright:   (c) 1998 Vadim Zeitlin <zeitlin@dptmaths.ens-cachan.fr>
   9 // Licence:     wxWindows license
  10 ///////////////////////////////////////////////////////////////////////////////
  11
  12 // For compilers that support precompilation, includes "wx.h".
  13 #include "wx/wxprec.h"
  14
  15 #ifdef __BORLANDC__
  16     #pragma hdrstop
  17 #endif
  18
  19 #ifndef WX_PRECOMP
  20 #include "wx/wx.h"
  21 #endif
  22
  23 #ifdef __WXMSW__
  24     #include  "wx/ownerdrw.h"
  25 #endif
  26
  27 #include  "wx/log.h"
  28
  29 #include  "wx/sizer.h"
  30 #include  "wx/menuitem.h"
  31 #include  "wx/checklst.h"
  32
  33 #if !wxUSE_CHECKLISTBOX
  34     #error "This sample can't be built without wxUSE_CHECKLISTBOX"
  35 #endif // wxUSE_CHECKLISTBOX
  36
  37 // Define a new application type
  38 class CheckListBoxApp: public wxApp
  39 {
  40 public:
  41     bool OnInit();
  42 };
  43
  44 // Define a new frame type
  45 class CheckListBoxFrame : public wxFrame
  46 {
  47 public:
  48     // ctor & dtor
  49     CheckListBoxFrame(wxFrame *frame, const wxChar *title);
  50     virtual ~CheckListBoxFrame(){};
  51
  52     // notifications
  53     void OnQuit(wxCommandEvent& event);
  54     void OnAbout(wxCommandEvent& event);
  55
  56     void OnCheckFirstItem(wxCommandEvent& event);
  57     void OnUncheckFirstItem(wxCommandEvent& event);
  58     void OnToggleFirstItem(wxCommandEvent& event);
  59     void OnToggleSelection(wxCommandEvent& event);
  60     void OnAddItems(wxCommandEvent& event);
  61
  62     void OnListboxSelect(wxCommandEvent& event);
  63     void OnCheckboxToggle(wxCommandEvent& event);
  64     void OnListboxDblClick(wxCommandEvent& event);
  65
  66     void OnButtonUp(wxCommandEvent& event);
  67     void OnButtonDown(wxCommandEvent& event);
  68
  69 private:
  70     void CreateCheckListbox(long flags = 0);
  71
  72     void OnButtonMove(bool up);
  73
  74     void AdjustColour(size_t index);
  75
  76     wxPanel *m_panel;
  77
  78     wxCheckListBox *m_pListBox;
  79
  80     DECLARE_EVENT_TABLE()
  81 };
  82
  83 enum
  84 {
  85     Menu_About = wxID_ABOUT,
  86     Menu_Quit = wxID_EXIT,
  87
  88     Menu_CheckFirst = wxID_HIGHEST,
  89     Menu_UncheckFirst,
  90     Menu_ToggleFirst,
  91     Menu_Selection,
  92     Menu_AddItems,
  93
  94     Control_First,
  95     Control_Listbox,
  96
  97     Btn_Up = wxID_UP,
  98     Btn_Down = wxID_DOWN
  99 };
 100
 101 BEGIN_EVENT_TABLE(CheckListBoxFrame, wxFrame)
 102     EVT_MENU(Menu_About, CheckListBoxFrame::OnAbout)
 103     EVT_MENU(Menu_Quit, CheckListBoxFrame::OnQuit)
 104
 105     EVT_MENU(Menu_CheckFirst, CheckListBoxFrame::OnCheckFirstItem)
 106     EVT_MENU(Menu_UncheckFirst, CheckListBoxFrame::OnUncheckFirstItem)
 107     EVT_MENU(Menu_ToggleFirst, CheckListBoxFrame::OnToggleFirstItem)
 108     EVT_MENU(Menu_Selection, CheckListBoxFrame::OnToggleSelection)
 109     EVT_MENU(Menu_AddItems, CheckListBoxFrame::OnAddItems)
 110
 111     EVT_LISTBOX(Control_Listbox, CheckListBoxFrame::OnListboxSelect)
 112     EVT_CHECKLISTBOX(Control_Listbox, CheckListBoxFrame::OnCheckboxToggle)
 113     EVT_LISTBOX_DCLICK(Control_Listbox, CheckListBoxFrame::OnListboxDblClick)
 114
 115     EVT_BUTTON(Btn_Up, CheckListBoxFrame::OnButtonUp)
 116     EVT_BUTTON(Btn_Down, CheckListBoxFrame::OnButtonDown)
 117 END_EVENT_TABLE()
 118
 119 IMPLEMENT_APP(CheckListBoxApp);
 120
 121 // init our app: create windows
 122 bool CheckListBoxApp::OnInit(void)
 123 {
 124     CheckListBoxFrame *pFrame = new CheckListBoxFrame
 125                                     (
 126                                      NULL,
 127                                      _T("wxWidgets Checklistbox Sample")
 128                                     );
 129     SetTopWindow(pFrame);
 130
 131     return true;
 132 }
 133
 134 // main frame constructor
 135 CheckListBoxFrame::CheckListBoxFrame(wxFrame *frame,
 136                                      const wxChar *title)
 137                  : wxFrame(frame, wxID_ANY, title)
 138 {
 139 #if wxUSE_STATUSBAR
 140     // create the status line
 141     const int widths[] = { -1, 60 };
 142     CreateStatusBar(2);
 143     SetStatusWidths(2, widths);
 144 #endif // wxUSE_STATUSBAR
 145
 146     // Make a menubar
 147     // --------------
 148
 149     // file submenu
 150     wxMenu *menuFile = new wxMenu;
 151     menuFile->Append(Menu_About, _T("&About...\tF1"));
 152     menuFile->AppendSeparator();
 153     menuFile->Append(Menu_Quit, _T("E&xit\tAlt-X"));
 154
 155     // listbox submenu
 156     wxMenu *menuList = new wxMenu;
 157     menuList->Append(Menu_CheckFirst, _T("Check the first item\tCtrl-C"));
 158     menuList->Append(Menu_UncheckFirst, _T("Uncheck the first item\tCtrl-U"));
 159     menuList->Append(Menu_ToggleFirst, _T("Toggle the first item\tCtrl-T"));
 160     menuList->AppendSeparator();
 161     menuList->Append(Menu_AddItems, _T("Add more items\tCtrl-A"));
 162     menuList->AppendSeparator();
 163     menuList->AppendCheckItem(Menu_Selection, _T("Multiple selection\tCtrl-M"));
 164
 165     // put it all together
 166     wxMenuBar *menu_bar = new wxMenuBar;
 167     menu_bar->Append(menuFile, _T("&File"));
 168     menu_bar->Append(menuList, _T("&List"));
 169     SetMenuBar(menu_bar);
 170
 171     // make a panel with some controls
 172     m_panel = new wxPanel(this, wxID_ANY, wxDefaultPosition, wxDefaultSize, wxTAB_TRAVERSAL);
 173
 174     CreateCheckListbox();
 175
 176     // create buttons for moving the items around
 177     wxButton *button1 = new wxButton(m_panel, Btn_Up);
 178     wxButton *button2 = new wxButton(m_panel, Btn_Down);
 179
 180
 181     wxBoxSizer *mainsizer = new wxBoxSizer( wxVERTICAL );
 182
 183     mainsizer->Add( m_pListBox, 1, wxGROW|wxALL, 10 );
 184
 185     wxBoxSizer *bottomsizer = new wxBoxSizer( wxHORIZONTAL );
 186
 187     bottomsizer->Add( button1, 0, wxALL, 10 );
 188     bottomsizer->Add( button2, 0, wxALL, 10 );
 189
 190     mainsizer->Add( bottomsizer, 0, wxCENTER );
 191
 192     // tell frame to make use of sizer (or constraints, if any)
 193     m_panel->SetAutoLayout( true );
 194     m_panel->SetSizer( mainsizer );
 195
 196 #ifndef __WXWINCE__
 197     // don't allow frame to get smaller than what the sizers tell ye
 198     mainsizer->SetSizeHints( this );
 199 #endif
 200
 201     Show(true);
 202 }
 203
 204 void CheckListBoxFrame::CreateCheckListbox(long flags)
 205 {
 206     // check list box
 207     static const wxChar *aszChoices[] =
 208     {
 209         _T("Zeroth"),
 210         _T("First"), _T("Second"), _T("Third"),
 211         _T("Fourth"), _T("Fifth"), _T("Sixth"),
 212         _T("Seventh"), _T("Eighth"), _T("Nineth")
 213     };
 214
 215     wxString *astrChoices = new wxString[WXSIZEOF(aszChoices)];
 216     unsigned int ui;
 217     for ( ui = 0; ui < WXSIZEOF(aszChoices); ui++ )
 218         astrChoices[ui] = aszChoices[ui];
 219
 220     m_pListBox = new wxCheckListBox
 221         (
 222          m_panel,               // parent
 223          Control_Listbox,       // control id
 224          wxPoint(10, 10),       // listbox poistion
 225          wxSize(400, 100),      // listbox size
 226          WXSIZEOF(aszChoices),  // number of strings
 227          astrChoices,           // array of strings
 228          flags
 229         );
 230
 231     //m_pListBox->SetBackgroundColour(*wxGREEN);
 232
 233     delete [] astrChoices;
 234
 235     // set grey background for every second entry
 236     for ( ui = 0; ui < WXSIZEOF(aszChoices); ui += 2 ) {
 237         AdjustColour(ui);
 238     }
 239
 240     m_pListBox->Check(2);
 241     m_pListBox->Select(3);
 242 }
 243
 244 void CheckListBoxFrame::OnQuit(wxCommandEvent& WXUNUSED(event))
 245 {
 246     Close(true);
 247 }
 248
 249 void CheckListBoxFrame::OnAbout(wxCommandEvent& WXUNUSED(event))
 250 {
 251     wxMessageBox(wxT("Demo of wxCheckListBox control\n(c) Vadim Zeitlin 1998-2002"),
 252                  wxT("About wxCheckListBox"),
 253                  wxICON_INFORMATION, this);
 254 }
 255
 256 void CheckListBoxFrame::OnCheckFirstItem(wxCommandEvent& WXUNUSED(event))
 257 {
 258     if ( !m_pListBox->IsEmpty() )
 259         m_pListBox->Check(0);
 260 }
 261
 262 void CheckListBoxFrame::OnUncheckFirstItem(wxCommandEvent& WXUNUSED(event))
 263 {
 264     if ( !m_pListBox->IsEmpty() )
 265         m_pListBox->Check(0, false);
 266 }
 267
 268 void CheckListBoxFrame::OnToggleFirstItem(wxCommandEvent& WXUNUSED(event))
 269 {
 270     if ( !m_pListBox->IsEmpty() )
 271         m_pListBox->Check(0, !m_pListBox->IsChecked(0));
 272 }
 273
 274 void CheckListBoxFrame::OnAddItems(wxCommandEvent& WXUNUSED(event))
 275 {
 276     static size_t s_nItem = 0;
 277     wxArrayString items;
 278     items.Add(wxString::Format(_T("New item %lu"), (unsigned long)++s_nItem));
 279     items.Add(wxString::Format(_T("New item %lu"), (unsigned long)++s_nItem));
 280     items.Add(wxString::Format(_T("New item %lu"), (unsigned long)++s_nItem));
 281
 282     m_pListBox->InsertItems(items, 0);//m_pListBox->GetCount());
 283 }
 284
 285 void CheckListBoxFrame::OnToggleSelection(wxCommandEvent& event)
 286 {
 287     wxSizer *sizer = m_panel->GetSizer();
 288
 289     sizer->Detach( m_pListBox );
 290     delete m_pListBox;
 291
 292     CreateCheckListbox(event.IsChecked() ? wxLB_EXTENDED : 0);
 293
 294     sizer->Insert(0, m_pListBox, 1, wxGROW | wxALL, 10);
 295
 296     m_panel->Layout();
 297 }
 298
 299 void CheckListBoxFrame::OnListboxSelect(wxCommandEvent& event)
 300 {
 301     int nSel = event.GetSelection();
 302     wxLogStatus(this, wxT("Item %d selected (%schecked)"), nSel,
 303                       m_pListBox->IsChecked(nSel) ? wxT("") : wxT("not "));
 304 }
 305
 306 void CheckListBoxFrame::OnListboxDblClick(wxCommandEvent& WXUNUSED(event))
 307 {
 308     int selection = -1;
 309     if(m_pListBox->GetWindowStyle() & wxLB_EXTENDED)
 310     {
 311         wxArrayInt list;
 312         m_pListBox->GetSelections(list);
 313         if(list.Count()==1)
 314         {
 315             selection = list.Item(0);
 316         }
 317     }
 318     else
 319     {
 320         selection = m_pListBox->GetSelection();
 321     }
 322
 323     wxString strSelection;
 324     if ( selection != -1 )
 325     {
 326         strSelection.Printf(wxT("Item %d double clicked"), selection);
 327     }
 328     else
 329     {
 330         strSelection = wxT("List double clicked in multiple selection mode");
 331     }
 332     wxMessageDialog dialog(this, strSelection, wxT("wxCheckListBox message"), wxICON_INFORMATION);
 333     dialog.ShowModal();
 334 }
 335
 336 void CheckListBoxFrame::OnCheckboxToggle(wxCommandEvent& event)
 337 {
 338     unsigned int nItem = event.GetInt();
 339
 340     wxLogStatus(this, wxT("item %d was %schecked"), nItem,
 341                       m_pListBox->IsChecked(nItem) ? wxT("") : wxT("un"));
 342 }
 343
 344 void CheckListBoxFrame::OnButtonUp(wxCommandEvent& WXUNUSED(event))
 345 {
 346     OnButtonMove(true);
 347 }
 348
 349 void CheckListBoxFrame::OnButtonDown(wxCommandEvent& WXUNUSED(event))
 350 {
 351     OnButtonMove(false);
 352 }
 353
 354 void CheckListBoxFrame::OnButtonMove(bool up)
 355 {
 356     int selection = -1;
 357     if(m_pListBox->GetWindowStyle() & wxLB_EXTENDED)
 358     {
 359         wxArrayInt list;
 360         m_pListBox->GetSelections(list);
 361         if(list.Count()==1)
 362         {
 363             selection = list.Item(0);
 364         }
 365     }
 366     else
 367     {
 368         selection = m_pListBox->GetSelection();
 369     }
 370     if ( selection != wxNOT_FOUND )
 371     {
 372         wxString label = m_pListBox->GetString(selection);
 373
 374         int positionNew = up ? selection - 1 : selection + 2;
 375         if ( positionNew < 0 || positionNew > m_pListBox->GetCount() )
 376         {
 377             wxLogStatus(this, wxT("Can't move this item %s"), up ? wxT("up") : wxT("down"));
 378         }
 379         else
 380         {
 381             bool wasChecked = m_pListBox->IsChecked(selection);
 382
 383             int positionOld = up ? selection + 1 : selection;
 384
 385             // insert the item
 386             m_pListBox->InsertItems(1, &label, positionNew);
 387
 388             // and delete the old one
 389             m_pListBox->Delete(positionOld);
 390
 391             int selectionNew = up ? positionNew : positionNew - 1;
 392             m_pListBox->Check(selectionNew, wasChecked);
 393             m_pListBox->SetSelection(selectionNew);
 394             m_pListBox->SetFocus();
 395
 396             AdjustColour(selection);
 397             AdjustColour(selectionNew);
 398
 399             wxLogStatus(this, wxT("Item moved %s"), up ? wxT("up") : wxT("down"));
 400         }
 401     }
 402     else
 403     {
 404         wxLogStatus(this, wxT("Please select single item"));
 405     }
 406 }
 407
 408 // not implemented in ports other than (native) MSW yet
 409 #if defined(__WXMSW__) && !defined(__WXUNIVERSAL__) && !defined(__WXWINCE__)
 410 void CheckListBoxFrame::AdjustColour(size_t index)
 411 {
 412     // even items have grey backround, odd ones - white
 413     unsigned char c = index % 2 ? 255 : 200;
 414     m_pListBox->GetItem(index)->SetBackgroundColour(wxColor(c, c, c));
 415 }
 416 #else
 417 void CheckListBoxFrame::AdjustColour(size_t WXUNUSED(index))
 418 {
 419 }
 420 #endif // wxMSW