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