samples/listctrl/listtest.cpp

   1 /////////////////////////////////////////////////////////////////////////////
   2 // Name:        listctrl.cpp
   3 // Purpose:     wxListCtrl sample
   4 // Author:      Julian Smart
   5 // Modified by:
   6 // Created:     04/01/98
   7 // RCS-ID:      $Id$
   8 // Copyright:   (c) Julian Smart
   9 // Licence:     wxWindows license
  10 /////////////////////////////////////////////////////////////////////////////
  11
  12 #ifdef __GNUG__
  13 #pragma implementation
  14 #pragma interface
  15 #endif
  16
  17 // For compilers that support precompilation, includes "wx/wx.h".
  18 #include "wx/wxprec.h"
  19
  20 #ifdef __BORLANDC__
  21 #pragma hdrstop
  22 #endif
  23
  24 #ifndef WX_PRECOMP
  25 #include "wx/wx.h"
  26 #endif
  27
  28 #ifndef __WXMSW__
  29     #include "mondrian.xpm"
  30
  31     #include "bitmaps/toolbrai.xpm"
  32     #include "bitmaps/toolchar.xpm"
  33     #include "bitmaps/tooldata.xpm"
  34     #include "bitmaps/toolnote.xpm"
  35     #include "bitmaps/tooltodo.xpm"
  36     #include "bitmaps/toolchec.xpm"
  37     #include "bitmaps/toolgame.xpm"
  38     #include "bitmaps/tooltime.xpm"
  39     #include "bitmaps/toolword.xpm"
  40     #include "bitmaps/small1.xpm"
  41 #endif
  42
  43 #include "wx/imaglist.h"
  44 #include "wx/listctrl.h"
  45 #include "wx/timer.h"           // for wxStopWatch
  46 #include "wx/colordlg.h"        // for wxGetColourFromUser
  47
  48 #include "listtest.h"
  49
  50 const wxChar *SMALL_VIRTUAL_VIEW_ITEMS[][2] =
  51 {
  52     { _T("Cat"), _T("meow") },
  53     { _T("Cow"), _T("moo") },
  54     { _T("Crow"), _T("caw") },
  55     { _T("Dog"), _T("woof") },
  56     { _T("Duck"), _T("quack") },
  57     { _T("Mouse"), _T("squeak") },
  58     { _T("Owl"), _T("hoo") },
  59     { _T("Pig"), _T("oink") },
  60     { _T("Pigeon"), _T("coo") },
  61     { _T("Sheep"), _T("baaah") },
  62 };
  63
  64
  65 BEGIN_EVENT_TABLE(MyFrame, wxFrame)
  66     EVT_SIZE(MyFrame::OnSize)
  67
  68     EVT_MENU(LIST_QUIT, MyFrame::OnQuit)
  69     EVT_MENU(LIST_ABOUT, MyFrame::OnAbout)
  70     EVT_MENU(LIST_LIST_VIEW, MyFrame::OnListView)
  71     EVT_MENU(LIST_REPORT_VIEW, MyFrame::OnReportView)
  72     EVT_MENU(LIST_ICON_VIEW, MyFrame::OnIconView)
  73     EVT_MENU(LIST_ICON_TEXT_VIEW, MyFrame::OnIconTextView)
  74     EVT_MENU(LIST_SMALL_ICON_VIEW, MyFrame::OnSmallIconView)
  75     EVT_MENU(LIST_SMALL_ICON_TEXT_VIEW, MyFrame::OnSmallIconTextView)
  76     EVT_MENU(LIST_VIRTUAL_VIEW, MyFrame::OnVirtualView)
  77     EVT_MENU(LIST_SMALL_VIRTUAL_VIEW, MyFrame::OnSmallVirtualView)
  78
  79     EVT_MENU(LIST_FOCUS_LAST, MyFrame::OnFocusLast)
  80     EVT_MENU(LIST_TOGGLE_FIRST, MyFrame::OnToggleFirstSel)
  81     EVT_MENU(LIST_DESELECT_ALL, MyFrame::OnDeselectAll)
  82     EVT_MENU(LIST_SELECT_ALL, MyFrame::OnSelectAll)
  83     EVT_MENU(LIST_DELETE, MyFrame::OnDelete)
  84     EVT_MENU(LIST_ADD, MyFrame::OnAdd)
  85     EVT_MENU(LIST_EDIT, MyFrame::OnEdit)
  86     EVT_MENU(LIST_DELETE_ALL, MyFrame::OnDeleteAll)
  87     EVT_MENU(LIST_SORT, MyFrame::OnSort)
  88     EVT_MENU(LIST_SET_FG_COL, MyFrame::OnSetFgColour)
  89     EVT_MENU(LIST_SET_BG_COL, MyFrame::OnSetBgColour)
  90     EVT_MENU(LIST_TOGGLE_MULTI_SEL, MyFrame::OnToggleMultiSel)
  91     EVT_MENU(LIST_SHOW_COL_INFO, MyFrame::OnShowColInfo)
  92     EVT_MENU(LIST_SHOW_SEL_INFO, MyFrame::OnShowSelInfo)
  93     EVT_MENU(LIST_FREEZE, MyFrame::OnFreeze)
  94     EVT_MENU(LIST_THAW, MyFrame::OnThaw)
  95     EVT_MENU(LIST_TOGGLE_LINES, MyFrame::OnToggleLines)
  96
  97     EVT_UPDATE_UI(LIST_SHOW_COL_INFO, MyFrame::OnUpdateShowColInfo)
  98     EVT_UPDATE_UI(LIST_TOGGLE_MULTI_SEL, MyFrame::OnUpdateToggleMultiSel)
  99 END_EVENT_TABLE()
 100
 101 BEGIN_EVENT_TABLE(MyListCtrl, wxListCtrl)
 102     EVT_LIST_BEGIN_DRAG(LIST_CTRL, MyListCtrl::OnBeginDrag)
 103     EVT_LIST_BEGIN_RDRAG(LIST_CTRL, MyListCtrl::OnBeginRDrag)
 104     EVT_LIST_BEGIN_LABEL_EDIT(LIST_CTRL, MyListCtrl::OnBeginLabelEdit)
 105     EVT_LIST_END_LABEL_EDIT(LIST_CTRL, MyListCtrl::OnEndLabelEdit)
 106     EVT_LIST_DELETE_ITEM(LIST_CTRL, MyListCtrl::OnDeleteItem)
 107     EVT_LIST_DELETE_ALL_ITEMS(LIST_CTRL, MyListCtrl::OnDeleteAllItems)
 108 #if WXWIN_COMPATIBILITY_2_4
 109     EVT_LIST_GET_INFO(LIST_CTRL, MyListCtrl::OnGetInfo)
 110     EVT_LIST_SET_INFO(LIST_CTRL, MyListCtrl::OnSetInfo)
 111 #endif
 112     EVT_LIST_ITEM_SELECTED(LIST_CTRL, MyListCtrl::OnSelected)
 113     EVT_LIST_ITEM_DESELECTED(LIST_CTRL, MyListCtrl::OnDeselected)
 114     EVT_LIST_KEY_DOWN(LIST_CTRL, MyListCtrl::OnListKeyDown)
 115     EVT_LIST_ITEM_ACTIVATED(LIST_CTRL, MyListCtrl::OnActivated)
 116     EVT_LIST_ITEM_FOCUSED(LIST_CTRL, MyListCtrl::OnFocused)
 117
 118     EVT_LIST_COL_CLICK(LIST_CTRL, MyListCtrl::OnColClick)
 119     EVT_LIST_COL_RIGHT_CLICK(LIST_CTRL, MyListCtrl::OnColRightClick)
 120     EVT_LIST_COL_BEGIN_DRAG(LIST_CTRL, MyListCtrl::OnColBeginDrag)
 121     EVT_LIST_COL_DRAGGING(LIST_CTRL, MyListCtrl::OnColDragging)
 122     EVT_LIST_COL_END_DRAG(LIST_CTRL, MyListCtrl::OnColEndDrag)
 123
 124     EVT_LIST_CACHE_HINT(LIST_CTRL, MyListCtrl::OnCacheHint)
 125
 126     EVT_CHAR(MyListCtrl::OnChar)
 127 END_EVENT_TABLE()
 128
 129 IMPLEMENT_APP(MyApp)
 130
 131 // number of items in list/report view
 132 static const int NUM_ITEMS = 30;
 133
 134 // number of items in icon/small icon view
 135 static const int NUM_ICONS = 9;
 136
 137 int wxCALLBACK MyCompareFunction(long item1, long item2, long WXUNUSED(sortData))
 138 {
 139     // inverse the order
 140     if (item1 < item2)
 141         return -1;
 142     if (item1 > item2)
 143         return 1;
 144
 145     return 0;
 146 }
 147
 148 // `Main program' equivalent, creating windows and returning main app frame
 149 bool MyApp::OnInit()
 150 {
 151   // Create the main frame window
 152   MyFrame *frame = new MyFrame(wxT("wxListCtrl Test"), 50, 50, 450, 340);
 153
 154   // Show the frame
 155   frame->Show(true);
 156
 157   SetTopWindow(frame);
 158
 159   return true;
 160 }
 161
 162 // My frame constructor
 163 MyFrame::MyFrame(const wxChar *title, int x, int y, int w, int h)
 164        : wxFrame(NULL, wxID_ANY, title, wxPoint(x, y), wxSize(w, h))
 165 {
 166     m_listCtrl = NULL;
 167     m_logWindow = NULL;
 168     m_smallVirtual = false;
 169
 170     // Give it an icon
 171     SetIcon( wxICON(mondrian) );
 172
 173     // Make an image list containing large icons
 174     m_imageListNormal = new wxImageList(32, 32, true);
 175     m_imageListSmall = new wxImageList(16, 16, true);
 176
 177 #ifdef __WXMSW__
 178     m_imageListNormal->Add( wxIcon(_T("icon1"), wxBITMAP_TYPE_ICO_RESOURCE) );
 179     m_imageListNormal->Add( wxIcon(_T("icon2"), wxBITMAP_TYPE_ICO_RESOURCE) );
 180     m_imageListNormal->Add( wxIcon(_T("icon3"), wxBITMAP_TYPE_ICO_RESOURCE) );
 181     m_imageListNormal->Add( wxIcon(_T("icon4"), wxBITMAP_TYPE_ICO_RESOURCE) );
 182     m_imageListNormal->Add( wxIcon(_T("icon5"), wxBITMAP_TYPE_ICO_RESOURCE) );
 183     m_imageListNormal->Add( wxIcon(_T("icon6"), wxBITMAP_TYPE_ICO_RESOURCE) );
 184     m_imageListNormal->Add( wxIcon(_T("icon7"), wxBITMAP_TYPE_ICO_RESOURCE) );
 185     m_imageListNormal->Add( wxIcon(_T("icon8"), wxBITMAP_TYPE_ICO_RESOURCE) );
 186     m_imageListNormal->Add( wxIcon(_T("icon9"), wxBITMAP_TYPE_ICO_RESOURCE) );
 187
 188     m_imageListSmall->Add( wxIcon(_T("iconsmall"), wxBITMAP_TYPE_ICO_RESOURCE) );
 189
 190 #else
 191     m_imageListNormal->Add( wxIcon( toolbrai_xpm ) );
 192     m_imageListNormal->Add( wxIcon( toolchar_xpm ) );
 193     m_imageListNormal->Add( wxIcon( tooldata_xpm ) );
 194     m_imageListNormal->Add( wxIcon( toolnote_xpm ) );
 195     m_imageListNormal->Add( wxIcon( tooltodo_xpm ) );
 196     m_imageListNormal->Add( wxIcon( toolchec_xpm ) );
 197     m_imageListNormal->Add( wxIcon( toolgame_xpm ) );
 198     m_imageListNormal->Add( wxIcon( tooltime_xpm ) );
 199     m_imageListNormal->Add( wxIcon( toolword_xpm ) );
 200
 201     m_imageListSmall->Add( wxIcon( small1_xpm) );
 202 #endif
 203
 204     // Make a menubar
 205     wxMenu *menuFile = new wxMenu;
 206     menuFile->Append(LIST_ABOUT, _T("&About"));
 207     menuFile->AppendSeparator();
 208     menuFile->Append(LIST_QUIT, _T("E&xit\tAlt-X"));
 209
 210     wxMenu *menuView = new wxMenu;
 211     menuView->Append(LIST_LIST_VIEW, _T("&List view\tF1"));
 212     menuView->Append(LIST_REPORT_VIEW, _T("&Report view\tF2"));
 213     menuView->Append(LIST_ICON_VIEW, _T("&Icon view\tF3"));
 214     menuView->Append(LIST_ICON_TEXT_VIEW, _T("Icon view with &text\tF4"));
 215     menuView->Append(LIST_SMALL_ICON_VIEW, _T("&Small icon view\tF5"));
 216     menuView->Append(LIST_SMALL_ICON_TEXT_VIEW, _T("Small icon &view with text\tF6"));
 217     menuView->Append(LIST_VIRTUAL_VIEW, _T("&Virtual view\tF7"));
 218     menuView->Append(LIST_SMALL_VIRTUAL_VIEW, _T("Small virtual vie&w\tF8"));
 219
 220     wxMenu *menuList = new wxMenu;
 221     menuList->Append(LIST_FOCUS_LAST, _T("&Make last item current\tCtrl-L"));
 222     menuList->Append(LIST_TOGGLE_FIRST, _T("To&ggle first item\tCtrl-G"));
 223     menuList->Append(LIST_DESELECT_ALL, _T("&Deselect All\tCtrl-D"));
 224     menuList->Append(LIST_SELECT_ALL, _T("S&elect All\tCtrl-A"));
 225     menuList->AppendSeparator();
 226     menuList->Append(LIST_SHOW_COL_INFO, _T("Show &column info\tCtrl-C"));
 227     menuList->Append(LIST_SHOW_SEL_INFO, _T("Show &selected items\tCtrl-S"));
 228     menuList->AppendSeparator();
 229     menuList->Append(LIST_SORT, _T("&Sort\tCtrl-S"));
 230     menuList->AppendSeparator();
 231     menuList->Append(LIST_ADD, _T("&Append an item\tCtrl-P"));
 232     menuList->Append(LIST_EDIT, _T("&Edit the item\tCtrl-E"));
 233     menuList->Append(LIST_DELETE, _T("&Delete first item\tCtrl-X"));
 234     menuList->Append(LIST_DELETE_ALL, _T("Delete &all items"));
 235     menuList->AppendSeparator();
 236     menuList->Append(LIST_FREEZE, _T("Free&ze\tCtrl-Z"));
 237     menuList->Append(LIST_THAW, _T("Tha&w\tCtrl-W"));
 238     menuList->AppendSeparator();
 239     menuList->AppendCheckItem(LIST_TOGGLE_LINES, _T("Toggle &lines\tCtrl-I"));
 240     menuList->Append(LIST_TOGGLE_MULTI_SEL, _T("&Multiple selection\tCtrl-M"),
 241             _T("Toggle multiple selection"), true);
 242
 243     wxMenu *menuCol = new wxMenu;
 244     menuCol->Append(LIST_SET_FG_COL, _T("&Foreground colour..."));
 245     menuCol->Append(LIST_SET_BG_COL, _T("&Background colour..."));
 246
 247     wxMenuBar *menubar = new wxMenuBar;
 248     menubar->Append(menuFile, _T("&File"));
 249     menubar->Append(menuView, _T("&View"));
 250     menubar->Append(menuList, _T("&List"));
 251     menubar->Append(menuCol, _T("&Colour"));
 252     SetMenuBar(menubar);
 253
 254     m_panel = new wxPanel(this, wxID_ANY);
 255     m_logWindow = new wxTextCtrl(m_panel, wxID_ANY, wxEmptyString,
 256                                  wxDefaultPosition, wxDefaultSize,
 257                                  wxTE_MULTILINE | wxSUNKEN_BORDER);
 258
 259     m_logOld = wxLog::SetActiveTarget(new wxLogTextCtrl(m_logWindow));
 260
 261     RecreateList(wxLC_REPORT | wxLC_SINGLE_SEL);
 262
 263 #if wxUSE_STATUSBAR
 264     CreateStatusBar(3);
 265 #endif // wxUSE_STATUSBAR
 266 }
 267
 268 MyFrame::~MyFrame()
 269 {
 270     delete wxLog::SetActiveTarget(m_logOld);
 271
 272     delete m_imageListNormal;
 273     delete m_imageListSmall;
 274 }
 275
 276 void MyFrame::OnSize(wxSizeEvent& event)
 277 {
 278     DoSize();
 279
 280     event.Skip();
 281 }
 282
 283 void MyFrame::DoSize()
 284 {
 285     if ( !m_logWindow )
 286         return;
 287
 288     wxSize size = GetClientSize();
 289     wxCoord y = (2*size.y)/3;
 290     m_listCtrl->SetSize(0, 0, size.x, y);
 291     m_logWindow->SetSize(0, y + 1, size.x, size.y - y);
 292 }
 293
 294 bool MyFrame::CheckNonVirtual() const
 295 {
 296     if ( !m_listCtrl->HasFlag(wxLC_VIRTUAL) )
 297         return true;
 298
 299     // "this" == whatever
 300     wxLogWarning(_T("Can't do this in virtual view, sorry."));
 301
 302     return false;
 303 }
 304
 305 void MyFrame::OnQuit(wxCommandEvent& WXUNUSED(event))
 306 {
 307     Close(true);
 308 }
 309
 310 void MyFrame::OnAbout(wxCommandEvent& WXUNUSED(event))
 311 {
 312     wxMessageDialog dialog(this, _T("List test sample\nJulian Smart (c) 1997"),
 313             _T("About list test"), wxOK|wxCANCEL);
 314
 315     dialog.ShowModal();
 316 }
 317
 318 void MyFrame::OnFreeze(wxCommandEvent& WXUNUSED(event))
 319 {
 320     wxLogMessage(_T("Freezing the control"));
 321
 322     m_listCtrl->Freeze();
 323 }
 324
 325 void MyFrame::OnThaw(wxCommandEvent& WXUNUSED(event))
 326 {
 327     wxLogMessage(_T("Thawing the control"));
 328
 329     m_listCtrl->Thaw();
 330 }
 331
 332 void MyFrame::OnToggleLines(wxCommandEvent& event)
 333 {
 334     m_listCtrl->SetSingleStyle(wxLC_HRULES | wxLC_VRULES, event.IsChecked());
 335 }
 336
 337 void MyFrame::OnFocusLast(wxCommandEvent& WXUNUSED(event))
 338 {
 339     long index = m_listCtrl->GetItemCount() - 1;
 340     if ( index == -1 )
 341     {
 342         return;
 343     }
 344
 345     m_listCtrl->SetItemState(index, wxLIST_STATE_FOCUSED, wxLIST_STATE_FOCUSED);
 346     m_listCtrl->EnsureVisible(index);
 347 }
 348
 349 void MyFrame::OnToggleFirstSel(wxCommandEvent& WXUNUSED(event))
 350 {
 351     m_listCtrl->SetItemState(0, (~m_listCtrl->GetItemState(0, wxLIST_STATE_SELECTED) ) & wxLIST_STATE_SELECTED, wxLIST_STATE_SELECTED);
 352 }
 353
 354 void MyFrame::OnDeselectAll(wxCommandEvent& WXUNUSED(event))
 355 {
 356     if ( !CheckNonVirtual() )
 357         return;
 358
 359     int n = m_listCtrl->GetItemCount();
 360     for (int i = 0; i < n; i++)
 361         m_listCtrl->SetItemState(i,0,wxLIST_STATE_SELECTED);
 362 }
 363
 364 void MyFrame::OnSelectAll(wxCommandEvent& WXUNUSED(event))
 365 {
 366     if ( !CheckNonVirtual() )
 367         return;
 368
 369     int n = m_listCtrl->GetItemCount();
 370     for (int i = 0; i < n; i++)
 371         m_listCtrl->SetItemState(i,wxLIST_STATE_SELECTED, wxLIST_STATE_SELECTED);
 372 }
 373
 374 // ----------------------------------------------------------------------------
 375 // changing listctrl modes
 376 // ----------------------------------------------------------------------------
 377
 378 void MyFrame::RecreateList(long flags, bool withText)
 379 {
 380     // we could avoid recreating it if we don't set/clear the wxLC_VIRTUAL
 381     // style, but it is more trouble to do it than not
 382 #if 0
 383     if ( !m_listCtrl || ((flags & wxLC_VIRTUAL) !=
 384             (m_listCtrl->GetWindowStyleFlag() & wxLC_VIRTUAL)) )
 385 #endif
 386     {
 387         delete m_listCtrl;
 388
 389         m_listCtrl = new MyListCtrl(m_panel, LIST_CTRL,
 390                                     wxDefaultPosition, wxDefaultSize,
 391                                     flags |
 392                                     wxSUNKEN_BORDER | wxLC_EDIT_LABELS);
 393
 394         switch ( flags & wxLC_MASK_TYPE )
 395         {
 396             case wxLC_LIST:
 397                 InitWithListItems();
 398                 break;
 399
 400             case wxLC_ICON:
 401                 InitWithIconItems(withText);
 402                 break;
 403
 404             case wxLC_SMALL_ICON:
 405                 InitWithIconItems(withText, true);
 406                 break;
 407
 408             case wxLC_REPORT:
 409                 if ( flags & wxLC_VIRTUAL )
 410                     InitWithVirtualItems();
 411                 else
 412                     InitWithReportItems();
 413                 break;
 414
 415             default:
 416                 wxFAIL_MSG( _T("unknown listctrl mode") );
 417         }
 418     }
 419
 420     DoSize();
 421
 422     m_logWindow->Clear();
 423 }
 424
 425 void MyFrame::OnListView(wxCommandEvent& WXUNUSED(event))
 426 {
 427     RecreateList(wxLC_LIST);
 428 }
 429
 430 void MyFrame::InitWithListItems()
 431 {
 432     for ( int i = 0; i < NUM_ITEMS; i++ )
 433     {
 434         m_listCtrl->InsertItem(i, wxString::Format(_T("Item %d"), i));
 435     }
 436 }
 437
 438 void MyFrame::OnReportView(wxCommandEvent& WXUNUSED(event))
 439 {
 440     RecreateList(wxLC_REPORT);
 441 }
 442
 443 void MyFrame::InitWithReportItems()
 444 {
 445     m_listCtrl->SetImageList(m_imageListSmall, wxIMAGE_LIST_SMALL);
 446
 447     // note that under MSW for SetColumnWidth() to work we need to create the
 448     // items with images initially even if we specify dummy image id
 449     wxListItem itemCol;
 450     itemCol.SetText(_T("Column 1"));
 451     itemCol.SetImage(-1);
 452     m_listCtrl->InsertColumn(0, itemCol);
 453
 454     itemCol.SetText(_T("Column 2"));
 455     itemCol.SetAlign(wxLIST_FORMAT_CENTRE);
 456     m_listCtrl->InsertColumn(1, itemCol);
 457
 458     itemCol.SetText(_T("Column 3"));
 459     itemCol.SetAlign(wxLIST_FORMAT_RIGHT);
 460     m_listCtrl->InsertColumn(2, itemCol);
 461
 462     // to speed up inserting we hide the control temporarily
 463     m_listCtrl->Hide();
 464
 465     wxStopWatch sw;
 466
 467     for ( int i = 0; i < NUM_ITEMS; i++ )
 468     {
 469         m_listCtrl->InsertItemInReportView(i);
 470     }
 471
 472     m_logWindow->WriteText(wxString::Format(_T("%d items inserted in %ldms\n"),
 473                                             NUM_ITEMS, sw.Time()));
 474     m_listCtrl->Show();
 475
 476     // we leave all mask fields to 0 and only change the colour
 477     wxListItem item;
 478     item.m_itemId = 0;
 479     item.SetTextColour(*wxRED);
 480     m_listCtrl->SetItem( item );
 481
 482     item.m_itemId = 2;
 483     item.SetTextColour(*wxGREEN);
 484     m_listCtrl->SetItem( item );
 485     item.m_itemId = 4;
 486     item.SetTextColour(*wxLIGHT_GREY);
 487     item.SetFont(*wxITALIC_FONT);
 488     item.SetBackgroundColour(*wxRED);
 489     m_listCtrl->SetItem( item );
 490
 491     m_listCtrl->SetTextColour(*wxBLUE);
 492     m_listCtrl->SetBackgroundColour(*wxLIGHT_GREY);
 493
 494     m_listCtrl->SetColumnWidth( 0, wxLIST_AUTOSIZE );
 495     m_listCtrl->SetColumnWidth( 1, wxLIST_AUTOSIZE );
 496     m_listCtrl->SetColumnWidth( 2, wxLIST_AUTOSIZE );
 497 }
 498
 499 void MyFrame::InitWithIconItems(bool withText, bool sameIcon)
 500 {
 501     m_listCtrl->SetImageList(m_imageListNormal, wxIMAGE_LIST_NORMAL);
 502     m_listCtrl->SetImageList(m_imageListSmall, wxIMAGE_LIST_SMALL);
 503
 504     for ( int i = 0; i < NUM_ICONS; i++ )
 505     {
 506         int image = sameIcon ? 0 : i;
 507
 508         if ( withText )
 509         {
 510             m_listCtrl->InsertItem(i, wxString::Format(_T("Label %d"), i),
 511                                    image);
 512         }
 513         else
 514         {
 515             m_listCtrl->InsertItem(i, image);
 516         }
 517     }
 518 }
 519
 520 void MyFrame::OnIconView(wxCommandEvent& WXUNUSED(event))
 521 {
 522     RecreateList(wxLC_ICON, false);
 523 }
 524
 525 void MyFrame::OnIconTextView(wxCommandEvent& WXUNUSED(event))
 526 {
 527     RecreateList(wxLC_ICON);
 528 }
 529
 530 void MyFrame::OnSmallIconView(wxCommandEvent& WXUNUSED(event))
 531 {
 532     RecreateList(wxLC_SMALL_ICON, false);
 533 }
 534
 535 void MyFrame::OnSmallIconTextView(wxCommandEvent& WXUNUSED(event))
 536 {
 537     RecreateList(wxLC_SMALL_ICON);
 538 }
 539
 540 void MyFrame::OnVirtualView(wxCommandEvent& WXUNUSED(event))
 541 {
 542     m_smallVirtual = false;
 543     RecreateList(wxLC_REPORT | wxLC_VIRTUAL);
 544 }
 545
 546 void MyFrame::OnSmallVirtualView(wxCommandEvent& WXUNUSED(event))
 547 {
 548     m_smallVirtual = true;
 549     RecreateList(wxLC_REPORT | wxLC_VIRTUAL);
 550 }
 551
 552 void MyFrame::InitWithVirtualItems()
 553 {
 554     m_listCtrl->SetImageList(m_imageListSmall, wxIMAGE_LIST_SMALL);
 555
 556     if ( m_smallVirtual )
 557     {
 558         m_listCtrl->InsertColumn(0, _T("Animal"));
 559         m_listCtrl->InsertColumn(1, _T("Sound"));
 560         m_listCtrl->SetItemCount(WXSIZEOF(SMALL_VIRTUAL_VIEW_ITEMS));
 561     }
 562     else
 563     {
 564         m_listCtrl->InsertColumn(0, _T("First Column"));
 565         m_listCtrl->InsertColumn(1, _T("Second Column"));
 566         m_listCtrl->SetColumnWidth(0, 150);
 567         m_listCtrl->SetColumnWidth(1, 150);
 568         m_listCtrl->SetItemCount(1000000);
 569     }
 570 }
 571
 572 void MyFrame::OnSort(wxCommandEvent& WXUNUSED(event))
 573 {
 574     wxStopWatch sw;
 575
 576     m_listCtrl->SortItems(MyCompareFunction, 0);
 577
 578     m_logWindow->WriteText(wxString::Format(_T("Sorting %d items took %ld ms\n"),
 579                                             m_listCtrl->GetItemCount(),
 580                                             sw.Time()));
 581 }
 582
 583 void MyFrame::OnShowSelInfo(wxCommandEvent& WXUNUSED(event))
 584 {
 585     int selCount = m_listCtrl->GetSelectedItemCount();
 586     wxLogMessage(_T("%d items selected:"), selCount);
 587
 588     // don't show too many items
 589     size_t shownCount = 0;
 590
 591     long item = m_listCtrl->GetNextItem(-1, wxLIST_NEXT_ALL,
 592                                         wxLIST_STATE_SELECTED);
 593     while ( item != -1 )
 594     {
 595         wxLogMessage(_T("\t%ld (%s)"),
 596                      item, m_listCtrl->GetItemText(item).c_str());
 597
 598         if ( ++shownCount > 10 )
 599         {
 600             wxLogMessage(_T("\t... more selected items snipped..."));
 601             break;
 602         }
 603
 604         item = m_listCtrl->GetNextItem(item, wxLIST_NEXT_ALL,
 605                                        wxLIST_STATE_SELECTED);
 606     }
 607 }
 608
 609 void MyFrame::OnShowColInfo(wxCommandEvent& WXUNUSED(event))
 610 {
 611     int count = m_listCtrl->GetColumnCount();
 612     wxLogMessage(wxT("%d columns:"), count);
 613     for ( int c = 0; c < count; c++ )
 614     {
 615         wxLogMessage(wxT("\tcolumn %d has width %d"), c,
 616                      m_listCtrl->GetColumnWidth(c));
 617     }
 618 }
 619
 620 void MyFrame::OnUpdateShowColInfo(wxUpdateUIEvent& event)
 621 {
 622     event.Enable( (m_listCtrl->GetWindowStyleFlag() & wxLC_REPORT) != 0 );
 623 }
 624
 625 void MyFrame::OnToggleMultiSel(wxCommandEvent& WXUNUSED(event))
 626 {
 627     long flags = m_listCtrl->GetWindowStyleFlag();
 628     if ( flags & wxLC_SINGLE_SEL )
 629         flags &= ~wxLC_SINGLE_SEL;
 630     else
 631         flags |= wxLC_SINGLE_SEL;
 632
 633     m_logWindow->WriteText(wxString::Format(wxT("Current selection mode: %sle\n"),
 634                            (flags & wxLC_SINGLE_SEL) ? _T("sing") : _T("multip")));
 635
 636     RecreateList(flags);
 637 }
 638
 639 void MyFrame::OnUpdateToggleMultiSel(wxUpdateUIEvent& event)
 640 {
 641      event.Check((m_listCtrl->GetWindowStyleFlag() & wxLC_SINGLE_SEL) == 0);
 642 }
 643
 644 void MyFrame::OnSetFgColour(wxCommandEvent& WXUNUSED(event))
 645 {
 646     m_listCtrl->SetForegroundColour(wxGetColourFromUser(this));
 647     m_listCtrl->Refresh();
 648 }
 649
 650 void MyFrame::OnSetBgColour(wxCommandEvent& WXUNUSED(event))
 651 {
 652     m_listCtrl->SetBackgroundColour(wxGetColourFromUser(this));
 653     m_listCtrl->Refresh();
 654 }
 655
 656 void MyFrame::OnAdd(wxCommandEvent& WXUNUSED(event))
 657 {
 658     m_listCtrl->InsertItem(m_listCtrl->GetItemCount(), _T("Appended item"));
 659 }
 660
 661 void MyFrame::OnEdit(wxCommandEvent& WXUNUSED(event))
 662 {
 663     long itemCur = m_listCtrl->GetNextItem(-1, wxLIST_NEXT_ALL,
 664                                            wxLIST_STATE_FOCUSED);
 665
 666     if ( itemCur != -1 )
 667     {
 668         m_listCtrl->EditLabel(itemCur);
 669     }
 670     else
 671     {
 672         m_logWindow->WriteText(_T("No item to edit"));
 673     }
 674 }
 675
 676 void MyFrame::OnDelete(wxCommandEvent& WXUNUSED(event))
 677 {
 678     if ( m_listCtrl->GetItemCount() )
 679     {
 680         m_listCtrl->DeleteItem(0);
 681     }
 682     else
 683     {
 684         m_logWindow->WriteText(_T("Nothing to delete"));
 685     }
 686 }
 687
 688 void MyFrame::OnDeleteAll(wxCommandEvent& WXUNUSED(event))
 689 {
 690     wxStopWatch sw;
 691
 692     size_t itemCount = m_listCtrl->GetItemCount();
 693
 694     m_listCtrl->DeleteAllItems();
 695
 696     m_logWindow->WriteText(wxString::Format(_T("Deleting %d items took %ld ms\n"),
 697                                             itemCount,
 698                                             sw.Time()));
 699 }
 700
 701 // MyListCtrl
 702
 703 void MyListCtrl::OnCacheHint(wxListEvent& event)
 704 {
 705     wxLogMessage( wxT("OnCacheHint: cache items %ld..%ld"),
 706                   event.GetCacheFrom(), event.GetCacheTo() );
 707 }
 708
 709 void MyListCtrl::SetColumnImage(int col, int image)
 710 {
 711     wxListItem item;
 712     item.SetMask(wxLIST_MASK_IMAGE);
 713     item.SetImage(image);
 714     SetColumn(col, item);
 715 }
 716
 717 void MyListCtrl::OnColClick(wxListEvent& event)
 718 {
 719     int col = event.GetColumn();
 720     SetColumnImage(col, 0);
 721
 722     wxLogMessage( wxT("OnColumnClick at %d."), col );
 723 }
 724
 725 void MyListCtrl::OnColRightClick(wxListEvent& event)
 726 {
 727     int col = event.GetColumn();
 728     if ( col != -1 )
 729     {
 730         SetColumnImage(col, -1);
 731     }
 732
 733     // Show popupmenu at position
 734     wxMenu menu(wxT("Test"));
 735     menu.Append(LIST_ABOUT, _T("&About"));
 736     PopupMenu(&menu, event.GetPoint());
 737
 738     wxLogMessage( wxT("OnColumnRightClick at %d."), event.GetColumn() );
 739 }
 740
 741 void MyListCtrl::LogColEvent(const wxListEvent& event, const wxChar *name)
 742 {
 743     const int col = event.GetColumn();
 744
 745     wxLogMessage(wxT("%s: column %d (width = %d or %d)."),
 746                  name,
 747                  col,
 748                  event.GetItem().GetWidth(),
 749                  GetColumnWidth(col));
 750 }
 751
 752 void MyListCtrl::OnColBeginDrag(wxListEvent& event)
 753 {
 754     LogColEvent( event, wxT("OnColBeginDrag") );
 755
 756     if ( event.GetColumn() == 0 )
 757     {
 758         wxLogMessage(_T("Resizing this column shouldn't work."));
 759
 760         event.Veto();
 761     }
 762 }
 763
 764 void MyListCtrl::OnColDragging(wxListEvent& event)
 765 {
 766     LogColEvent( event, wxT("OnColDragging") );
 767 }
 768
 769 void MyListCtrl::OnColEndDrag(wxListEvent& event)
 770 {
 771     LogColEvent( event, wxT("OnColEndDrag") );
 772 }
 773
 774 void MyListCtrl::OnBeginDrag(wxListEvent& event)
 775 {
 776     const wxPoint& pt = event.m_pointDrag;
 777
 778     int flags;
 779     wxLogMessage( wxT("OnBeginDrag at (%d, %d), item %ld."),
 780                   pt.x, pt.y, HitTest(pt, flags) );
 781 }
 782
 783 void MyListCtrl::OnBeginRDrag(wxListEvent& event)
 784 {
 785     wxLogMessage( wxT("OnBeginRDrag at %d,%d."),
 786                   event.m_pointDrag.x, event.m_pointDrag.y );
 787 }
 788
 789 void MyListCtrl::OnBeginLabelEdit(wxListEvent& event)
 790 {
 791     wxLogMessage( wxT("OnBeginLabelEdit: %s"), event.m_item.m_text.c_str());
 792 }
 793
 794 void MyListCtrl::OnEndLabelEdit(wxListEvent& event)
 795 {
 796     wxLogMessage( wxT("OnEndLabelEdit: %s"),
 797                   event.IsEditCancelled() ? _T("[cancelled]")
 798                                           : event.m_item.m_text.c_str());
 799 }
 800
 801 void MyListCtrl::OnDeleteItem(wxListEvent& event)
 802 {
 803     LogEvent(event, _T("OnDeleteItem"));
 804 }
 805
 806 void MyListCtrl::OnDeleteAllItems(wxListEvent& event)
 807 {
 808     LogEvent(event, _T("OnDeleteAllItems"));
 809 }
 810
 811 #if WXWIN_COMPATIBILITY_2_4
 812 void MyListCtrl::OnGetInfo(wxListEvent& event)
 813 {
 814     wxString msg;
 815
 816     msg << _T("OnGetInfo (") << event.m_item.m_itemId << _T(", ") << event.m_item.m_col << _T(")");
 817     if ( event.m_item.m_mask & wxLIST_MASK_STATE )
 818         msg << _T(" wxLIST_MASK_STATE");
 819     if ( event.m_item.m_mask & wxLIST_MASK_TEXT )
 820         msg << _T(" wxLIST_MASK_TEXT");
 821     if ( event.m_item.m_mask & wxLIST_MASK_IMAGE )
 822         msg << _T(" wxLIST_MASK_IMAGE");
 823     if ( event.m_item.m_mask & wxLIST_MASK_DATA )
 824         msg << _T(" wxLIST_MASK_DATA");
 825     if ( event.m_item.m_mask & wxLIST_SET_ITEM )
 826         msg << _T(" wxLIST_SET_ITEM");
 827     if ( event.m_item.m_mask & wxLIST_MASK_WIDTH )
 828         msg << _T(" wxLIST_MASK_WIDTH");
 829     if ( event.m_item.m_mask & wxLIST_MASK_FORMAT )
 830         msg << _T(" wxLIST_MASK_WIDTH");
 831
 832     if ( event.m_item.m_mask & wxLIST_MASK_TEXT )
 833     {
 834         event.m_item.m_text = _T("My callback text");
 835     }
 836
 837     wxLogMessage(msg);
 838 }
 839
 840 void MyListCtrl::OnSetInfo(wxListEvent& event)
 841 {
 842     LogEvent(event, _T("OnSetInfo"));
 843 }
 844 #endif
 845
 846 void MyListCtrl::OnSelected(wxListEvent& event)
 847 {
 848     LogEvent(event, _T("OnSelected"));
 849
 850     if ( GetWindowStyle() & wxLC_REPORT )
 851     {
 852         wxListItem info;
 853         info.m_itemId = event.m_itemIndex;
 854         info.m_col = 1;
 855         info.m_mask = wxLIST_MASK_TEXT;
 856         if ( GetItem(info) )
 857         {
 858             wxLogMessage(wxT("Value of the 2nd field of the selected item: %s"),
 859                          info.m_text.c_str());
 860         }
 861         else
 862         {
 863             wxFAIL_MSG(wxT("wxListCtrl::GetItem() failed"));
 864         }
 865     }
 866 }
 867
 868 void MyListCtrl::OnDeselected(wxListEvent& event)
 869 {
 870     LogEvent(event, _T("OnDeselected"));
 871 }
 872
 873 void MyListCtrl::OnActivated(wxListEvent& event)
 874 {
 875     LogEvent(event, _T("OnActivated"));
 876 }
 877
 878 void MyListCtrl::OnFocused(wxListEvent& event)
 879 {
 880     LogEvent(event, _T("OnFocused"));
 881
 882     event.Skip();
 883 }
 884
 885 void MyListCtrl::OnListKeyDown(wxListEvent& event)
 886 {
 887     switch ( event.GetKeyCode() )
 888     {
 889         case 'c': // colorize
 890         case 'C':
 891             {
 892                 wxListItem info;
 893                 info.m_itemId = event.GetIndex();
 894                 GetItem(info);
 895
 896                 wxListItemAttr *attr = info.GetAttributes();
 897                 if ( !attr || !attr->HasTextColour() )
 898                 {
 899                     info.SetTextColour(*wxCYAN);
 900
 901                     SetItem(info);
 902
 903                     RefreshItem(info.m_itemId);
 904                 }
 905             }
 906             break;
 907
 908         case 'n': // next
 909         case 'N':
 910             {
 911                 long item = GetNextItem(-1,
 912                                         wxLIST_NEXT_ALL, wxLIST_STATE_FOCUSED);
 913                 if ( item++ == GetItemCount() - 1 )
 914                 {
 915                     item = 0;
 916                 }
 917
 918                 wxLogMessage(_T("Focusing item %ld"), item);
 919
 920                 SetItemState(item, wxLIST_STATE_FOCUSED, wxLIST_STATE_FOCUSED);
 921                 EnsureVisible(item);
 922             }
 923             break;
 924
 925         case WXK_DELETE:
 926             {
 927                 long item = GetNextItem(-1,
 928                                         wxLIST_NEXT_ALL, wxLIST_STATE_SELECTED);
 929                 while ( item != -1 )
 930                 {
 931                     DeleteItem(item);
 932
 933                     wxLogMessage(_T("Item %ld deleted"), item);
 934
 935                     // -1 because the indices were shifted by DeleteItem()
 936                     item = GetNextItem(item - 1,
 937                                        wxLIST_NEXT_ALL, wxLIST_STATE_SELECTED);
 938                 }
 939             }
 940             break;
 941
 942         case WXK_INSERT:
 943             if ( GetWindowStyle() & wxLC_REPORT )
 944             {
 945                 if ( GetWindowStyle() & wxLC_VIRTUAL )
 946                 {
 947                     SetItemCount(GetItemCount() + 1);
 948                 }
 949                 else // !virtual
 950                 {
 951                     InsertItemInReportView(event.GetIndex());
 952                 }
 953             }
 954             //else: fall through
 955
 956         default:
 957             LogEvent(event, _T("OnListKeyDown"));
 958
 959             event.Skip();
 960     }
 961 }
 962
 963 void MyListCtrl::OnChar(wxKeyEvent& event)
 964 {
 965     wxLogMessage(_T("Got char event."));
 966
 967     switch ( event.GetKeyCode() )
 968     {
 969         case 'n':
 970         case 'N':
 971         case 'c':
 972         case 'C':
 973             // these are the keys we process ourselves
 974             break;
 975
 976         default:
 977             event.Skip();
 978     }
 979 }
 980
 981 void MyListCtrl::LogEvent(const wxListEvent& event, const wxChar *eventName)
 982 {
 983     wxLogMessage(_T("Item %ld: %s (item text = %s, data = %ld)"),
 984                  event.GetIndex(), eventName,
 985                  event.GetText().c_str(), event.GetData());
 986 }
 987
 988 wxString MyListCtrl::OnGetItemText(long item, long column) const
 989 {
 990     if ( GetItemCount() == WXSIZEOF(SMALL_VIRTUAL_VIEW_ITEMS) )
 991     {
 992         return SMALL_VIRTUAL_VIEW_ITEMS[item][column];
 993     }
 994     else
 995     {
 996         return wxString::Format(_T("Column %ld of item %ld"), column, item);
 997     }
 998 }
 999
1000 int MyListCtrl::OnGetItemImage(long WXUNUSED(item)) const
1001 {
1002     return 0;
1003 }
1004
1005 wxListItemAttr *MyListCtrl::OnGetItemAttr(long item) const
1006 {
1007     return item % 2 ? NULL : (wxListItemAttr *)&m_attr;
1008 }
1009
1010 void MyListCtrl::InsertItemInReportView(int i)
1011 {
1012     wxString buf;
1013     buf.Printf(_T("This is item %d"), i);
1014     long tmp = InsertItem(i, buf, 0);
1015     SetItemData(tmp, i);
1016
1017     buf.Printf(_T("Col 1, item %d"), i);
1018     SetItem(i, 1, buf);
1019
1020     buf.Printf(_T("Item %d in column 2"), i);
1021     SetItem(i, 2, buf);
1022 }
1023