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