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