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