]> git.saurik.com Git - wxWidgets.git/blobdiff - samples/listctrl/listtest.cpp
move wxDataFormat and wxDataObject docs at the beginning of the file, before the...
[wxWidgets.git] / samples / listctrl / listtest.cpp
index 8c4e700899d04dbe88206f0b641e91035ed11098..2f51db5f538bec185cdf90d2f4ddb3cb6e1ce9da 100644 (file)
@@ -5,15 +5,10 @@
 // Modified by:
 // Created:     04/01/98
 // RCS-ID:      $Id$
-// Copyright:   (c) Julian Smart and Markus Holzem
+// Copyright:   (c) Julian Smart
 // Licence:     wxWindows license
 /////////////////////////////////////////////////////////////////////////////
 
-#ifdef __GNUG__
-#pragma implementation
-#pragma interface
-#endif
-
 // For compilers that support precompilation, includes "wx/wx.h".
 #include "wx/wxprec.h"
 
 #include "wx/wx.h"
 #endif
 
+#if !defined(__WXMSW__) && !defined(__WXPM__)
+    #include "mondrian.xpm"
+#endif
+
 #ifndef __WXMSW__
-#include "mondrian.xpm"
+    #include "bitmaps/toolbrai.xpm"
+    #include "bitmaps/toolchar.xpm"
+    #include "bitmaps/tooldata.xpm"
+    #include "bitmaps/toolnote.xpm"
+    #include "bitmaps/tooltodo.xpm"
+    #include "bitmaps/toolchec.xpm"
+    #include "bitmaps/toolgame.xpm"
+    #include "bitmaps/tooltime.xpm"
+    #include "bitmaps/toolword.xpm"
+    #include "bitmaps/small1.xpm"
 #endif
 
+#include "wx/imaglist.h"
 #include "wx/listctrl.h"
+#include "wx/timer.h"           // for wxStopWatch
+#include "wx/colordlg.h"        // for wxGetColourFromUser
+#include "wx/settings.h"
+#include "wx/sysopt.h"
+
 #include "listtest.h"
 
+
+// ----------------------------------------------------------------------------
+// Constants and globals
+// ----------------------------------------------------------------------------
+
+const wxChar *SMALL_VIRTUAL_VIEW_ITEMS[][2] =
+{
+    { _T("Cat"), _T("meow") },
+    { _T("Cow"), _T("moo") },
+    { _T("Crow"), _T("caw") },
+    { _T("Dog"), _T("woof") },
+    { _T("Duck"), _T("quack") },
+    { _T("Mouse"), _T("squeak") },
+    { _T("Owl"), _T("hoo") },
+    { _T("Pig"), _T("oink") },
+    { _T("Pigeon"), _T("coo") },
+    { _T("Sheep"), _T("baaah") },
+};
+
+// number of items in list/report view
+static const int NUM_ITEMS = 10;
+
+// number of items in icon/small icon view
+static const int NUM_ICONS = 9;
+
+int wxCALLBACK MyCompareFunction(long item1, long item2, long WXUNUSED(sortData))
+{
+    // inverse the order
+    if (item1 < item2)
+        return -1;
+    if (item1 > item2)
+        return 1;
+
+    return 0;
+}
+
+
+// ----------------------------------------------------------------------------
+// MyApp
+// ----------------------------------------------------------------------------
+
+IMPLEMENT_APP(MyApp)
+
+// `Main program' equivalent, creating windows and returning main app frame
+bool MyApp::OnInit()
+{
+    if ( !wxApp::OnInit() )
+        return false;
+
+    // Create the main frame window
+    MyFrame *frame = new MyFrame(wxT("wxListCtrl Test"));
+
+    // Show the frame
+    frame->Show(true);
+
+    SetTopWindow(frame);
+
+    return true;
+}
+
+
+
+// ----------------------------------------------------------------------------
+// MyFrame
+// ----------------------------------------------------------------------------
+
 BEGIN_EVENT_TABLE(MyFrame, wxFrame)
-    EVT_MENU(BUSY_ON, MyFrame::BusyOn)
-    EVT_MENU(BUSY_OFF, MyFrame::BusyOff)
+    EVT_SIZE(MyFrame::OnSize)
+
     EVT_MENU(LIST_QUIT, MyFrame::OnQuit)
     EVT_MENU(LIST_ABOUT, MyFrame::OnAbout)
     EVT_MENU(LIST_LIST_VIEW, MyFrame::OnListView)
@@ -43,195 +123,267 @@ BEGIN_EVENT_TABLE(MyFrame, wxFrame)
     EVT_MENU(LIST_ICON_TEXT_VIEW, MyFrame::OnIconTextView)
     EVT_MENU(LIST_SMALL_ICON_VIEW, MyFrame::OnSmallIconView)
     EVT_MENU(LIST_SMALL_ICON_TEXT_VIEW, MyFrame::OnSmallIconTextView)
+    EVT_MENU(LIST_VIRTUAL_VIEW, MyFrame::OnVirtualView)
+    EVT_MENU(LIST_SMALL_VIRTUAL_VIEW, MyFrame::OnSmallVirtualView)
+
+    EVT_MENU(LIST_GOTO, MyFrame::OnGoTo)
+    EVT_MENU(LIST_FOCUS_LAST, MyFrame::OnFocusLast)
+    EVT_MENU(LIST_TOGGLE_FIRST, MyFrame::OnToggleFirstSel)
     EVT_MENU(LIST_DESELECT_ALL, MyFrame::OnDeselectAll)
     EVT_MENU(LIST_SELECT_ALL, MyFrame::OnSelectAll)
+    EVT_MENU(LIST_DELETE, MyFrame::OnDelete)
+    EVT_MENU(LIST_ADD, MyFrame::OnAdd)
+    EVT_MENU(LIST_EDIT, MyFrame::OnEdit)
     EVT_MENU(LIST_DELETE_ALL, MyFrame::OnDeleteAll)
     EVT_MENU(LIST_SORT, MyFrame::OnSort)
+    EVT_MENU(LIST_SET_FG_COL, MyFrame::OnSetFgColour)
+    EVT_MENU(LIST_SET_BG_COL, MyFrame::OnSetBgColour)
+    EVT_MENU(LIST_TOGGLE_MULTI_SEL, MyFrame::OnToggleMultiSel)
+    EVT_MENU(LIST_SHOW_COL_INFO, MyFrame::OnShowColInfo)
+    EVT_MENU(LIST_SHOW_SEL_INFO, MyFrame::OnShowSelInfo)
+    EVT_MENU(LIST_SHOW_VIEW_RECT, MyFrame::OnShowViewRect)
+#ifdef wxHAS_LISTCTRL_COLUMN_ORDER
+    EVT_MENU(LIST_SET_COL_ORDER, MyFrame::OnSetColOrder)
+    EVT_MENU(LIST_GET_COL_ORDER, MyFrame::OnGetColOrder)
+#endif // wxHAS_LISTCTRL_COLUMN_ORDER
+    EVT_MENU(LIST_FREEZE, MyFrame::OnFreeze)
+    EVT_MENU(LIST_THAW, MyFrame::OnThaw)
+    EVT_MENU(LIST_TOGGLE_LINES, MyFrame::OnToggleLines)
+    EVT_MENU(LIST_MAC_USE_GENERIC, MyFrame::OnToggleMacUseGeneric)
+
+    EVT_UPDATE_UI(LIST_SHOW_COL_INFO, MyFrame::OnUpdateShowColInfo)
+    EVT_UPDATE_UI(LIST_TOGGLE_MULTI_SEL, MyFrame::OnUpdateToggleMultiSel)
 END_EVENT_TABLE()
 
-BEGIN_EVENT_TABLE(MyListCtrl, wxListCtrl)
-    EVT_LIST_BEGIN_DRAG(LIST_CTRL, MyListCtrl::OnBeginDrag)
-    EVT_LIST_BEGIN_RDRAG(LIST_CTRL, MyListCtrl::OnBeginRDrag)
-    EVT_LIST_BEGIN_LABEL_EDIT(LIST_CTRL, MyListCtrl::OnBeginLabelEdit)
-    EVT_LIST_END_LABEL_EDIT(LIST_CTRL, MyListCtrl::OnEndLabelEdit)
-    EVT_LIST_DELETE_ITEM(LIST_CTRL, MyListCtrl::OnDeleteItem)
-    EVT_LIST_GET_INFO(LIST_CTRL, MyListCtrl::OnGetInfo)
-    EVT_LIST_SET_INFO(LIST_CTRL, MyListCtrl::OnSetInfo)
-    EVT_LIST_ITEM_SELECTED(LIST_CTRL, MyListCtrl::OnSelected)
-    EVT_LIST_ITEM_DESELECTED(LIST_CTRL, MyListCtrl::OnDeselected)
-    EVT_LIST_KEY_DOWN(LIST_CTRL, MyListCtrl::OnListKeyDown)
-    EVT_LIST_ITEM_ACTIVATED(LIST_CTRL, MyListCtrl::OnActivated)
-    EVT_LIST_COL_CLICK(LIST_CTRL, MyListCtrl::OnColClick)
-END_EVENT_TABLE()
-
-IMPLEMENT_APP(MyApp)
-
-int wxCALLBACK MyCompareFunction(long item1, long item2, long sortData)
-{
-    // inverse the order
-    return item1 < item2;
-}
-
-// `Main program' equivalent, creating windows and returning main app frame
-bool MyApp::OnInit(void)
+// My frame constructor
+MyFrame::MyFrame(const wxChar *title)
+       : wxFrame(NULL, wxID_ANY, title, wxDefaultPosition, wxSize(600, 500))
 {
-  // Create the main frame window
-  MyFrame *frame = new MyFrame((wxFrame *) NULL, "wxListCtrl Test", 50, 50, 450, 340);
-
-  // This reduces flicker effects - even better would be to define OnEraseBackground
-  // to do nothing. When the list control's scrollbars are show or hidden, the
-  // frame is sent a background erase event.
-  frame->SetBackgroundColour( *wxWHITE );
+    m_listCtrl = NULL;
+    m_logWindow = NULL;
+    m_smallVirtual = false;
 
-  // Give it an icon
-  frame->SetIcon( wxICON(mondrian) );
+    // Give it an icon
+    SetIcon( wxICON(mondrian) );
 
-  // Make an image list containing large icons
-  m_imageListNormal = new wxImageList(32, 32, TRUE);
-  m_imageListSmall = new wxImageList(16, 16, TRUE);
+    // Make an image list containing large icons
+    m_imageListNormal = new wxImageList(32, 32, true);
+    m_imageListSmall = new wxImageList(16, 16, true);
 
 #ifdef __WXMSW__
-  m_imageListNormal->Add( wxIcon("icon1", wxBITMAP_TYPE_ICO_RESOURCE) );
-  m_imageListNormal->Add( wxIcon("icon2", wxBITMAP_TYPE_ICO_RESOURCE) );
-  m_imageListNormal->Add( wxIcon("icon3", wxBITMAP_TYPE_ICO_RESOURCE) );
-  m_imageListNormal->Add( wxIcon("icon4", wxBITMAP_TYPE_ICO_RESOURCE) );
-  m_imageListNormal->Add( wxIcon("icon5", wxBITMAP_TYPE_ICO_RESOURCE) );
-  m_imageListNormal->Add( wxIcon("icon6", wxBITMAP_TYPE_ICO_RESOURCE) );
-  m_imageListNormal->Add( wxIcon("icon7", wxBITMAP_TYPE_ICO_RESOURCE) );
-  m_imageListNormal->Add( wxIcon("icon8", wxBITMAP_TYPE_ICO_RESOURCE) );
-  m_imageListNormal->Add( wxIcon("icon9", wxBITMAP_TYPE_ICO_RESOURCE) );
-
-  m_imageListSmall->Add( wxIcon("iconsmall", wxBITMAP_TYPE_ICO_RESOURCE) );
+    m_imageListNormal->Add( wxIcon(_T("icon1"), wxBITMAP_TYPE_ICO_RESOURCE) );
+    m_imageListNormal->Add( wxIcon(_T("icon2"), wxBITMAP_TYPE_ICO_RESOURCE) );
+    m_imageListNormal->Add( wxIcon(_T("icon3"), wxBITMAP_TYPE_ICO_RESOURCE) );
+    m_imageListNormal->Add( wxIcon(_T("icon4"), wxBITMAP_TYPE_ICO_RESOURCE) );
+    m_imageListNormal->Add( wxIcon(_T("icon5"), wxBITMAP_TYPE_ICO_RESOURCE) );
+    m_imageListNormal->Add( wxIcon(_T("icon6"), wxBITMAP_TYPE_ICO_RESOURCE) );
+    m_imageListNormal->Add( wxIcon(_T("icon7"), wxBITMAP_TYPE_ICO_RESOURCE) );
+    m_imageListNormal->Add( wxIcon(_T("icon8"), wxBITMAP_TYPE_ICO_RESOURCE) );
+    m_imageListNormal->Add( wxIcon(_T("icon9"), wxBITMAP_TYPE_ICO_RESOURCE) );
+
+    m_imageListSmall->Add( wxIcon(_T("iconsmall"), wxBITMAP_TYPE_ICO_RESOURCE) );
 
 #else
+    m_imageListNormal->Add( wxIcon( toolbrai_xpm ) );
+    m_imageListNormal->Add( wxIcon( toolchar_xpm ) );
+    m_imageListNormal->Add( wxIcon( tooldata_xpm ) );
+    m_imageListNormal->Add( wxIcon( toolnote_xpm ) );
+    m_imageListNormal->Add( wxIcon( tooltodo_xpm ) );
+    m_imageListNormal->Add( wxIcon( toolchec_xpm ) );
+    m_imageListNormal->Add( wxIcon( toolgame_xpm ) );
+    m_imageListNormal->Add( wxIcon( tooltime_xpm ) );
+    m_imageListNormal->Add( wxIcon( toolword_xpm ) );
+
+    m_imageListSmall->Add( wxIcon( small1_xpm) );
+#endif
+
+    // Make a menubar
+    wxMenu *menuFile = new wxMenu;
+    menuFile->Append(LIST_ABOUT, _T("&About"));
+    menuFile->AppendSeparator();
+    menuFile->Append(LIST_QUIT, _T("E&xit\tAlt-X"));
+
+    wxMenu *menuView = new wxMenu;
+    menuView->Append(LIST_LIST_VIEW, _T("&List view\tF1"));
+    menuView->Append(LIST_REPORT_VIEW, _T("&Report view\tF2"));
+    menuView->Append(LIST_ICON_VIEW, _T("&Icon view\tF3"));
+    menuView->Append(LIST_ICON_TEXT_VIEW, _T("Icon view with &text\tF4"));
+    menuView->Append(LIST_SMALL_ICON_VIEW, _T("&Small icon view\tF5"));
+    menuView->Append(LIST_SMALL_ICON_TEXT_VIEW, _T("Small icon &view with text\tF6"));
+    menuView->Append(LIST_VIRTUAL_VIEW, _T("&Virtual view\tF7"));
+    menuView->Append(LIST_SMALL_VIRTUAL_VIEW, _T("Small virtual vie&w\tF8"));
+#ifdef __WXMAC__
+    menuView->AppendCheckItem(LIST_MAC_USE_GENERIC, _T("Mac: Use Generic Control"));
+#endif
 
-  #include "bitmaps/toolbrai.xpm"
-  m_imageListNormal->Add( wxIcon( toolbrai_xpm ) );
-  #include "bitmaps/toolchar.xpm"
-  m_imageListNormal->Add( wxIcon( toolchar_xpm ) );
-  #include "bitmaps/tooldata.xpm"
-  m_imageListNormal->Add( wxIcon( tooldata_xpm ) );
-  #include "bitmaps/toolnote.xpm"
-  m_imageListNormal->Add( wxIcon( toolnote_xpm ) );
-  #include "bitmaps/tooltodo.xpm"
-  m_imageListNormal->Add( wxIcon( tooltodo_xpm ) );
-  #include "bitmaps/toolchec.xpm"
-  m_imageListNormal->Add( wxIcon( toolchec_xpm ) );
-  #include "bitmaps/toolgame.xpm"
-  m_imageListNormal->Add( wxIcon( toolgame_xpm ) );
-  #include "bitmaps/tooltime.xpm"
-  m_imageListNormal->Add( wxIcon( tooltime_xpm ) );
-  #include "bitmaps/toolword.xpm"
-  m_imageListNormal->Add( wxIcon( toolword_xpm ) );
-
-  #include "bitmaps/small1.xpm"
-  m_imageListSmall->Add( wxIcon( small1_xpm) );
+    wxMenu *menuList = new wxMenu;
+    menuList->Append(LIST_GOTO, _T("&Go to item #3\tCtrl-3"));
+    menuList->Append(LIST_FOCUS_LAST, _T("&Make last item current\tCtrl-L"));
+    menuList->Append(LIST_TOGGLE_FIRST, _T("To&ggle first item\tCtrl-G"));
+    menuList->Append(LIST_DESELECT_ALL, _T("&Deselect All\tCtrl-D"));
+    menuList->Append(LIST_SELECT_ALL, _T("S&elect All\tCtrl-A"));
+    menuList->AppendSeparator();
+    menuList->Append(LIST_SHOW_COL_INFO, _T("Show &column info\tCtrl-C"));
+    menuList->Append(LIST_SHOW_SEL_INFO, _T("Show &selected items\tCtrl-S"));
+    menuList->Append(LIST_SHOW_VIEW_RECT, _T("Show &view rect"));
+#ifdef wxHAS_LISTCTRL_COLUMN_ORDER
+    menuList->Append(LIST_SET_COL_ORDER, _T("Se&t columns order\tShift-Ctrl-O"));
+    menuList->Append(LIST_GET_COL_ORDER, _T("Show&w columns order\tCtrl-O"));
+#endif // wxHAS_LISTCTRL_COLUMN_ORDER
+    menuList->AppendSeparator();
+    menuList->Append(LIST_SORT, _T("Sor&t\tCtrl-T"));
+    menuList->AppendSeparator();
+    menuList->Append(LIST_ADD, _T("&Append an item\tCtrl-P"));
+    menuList->Append(LIST_EDIT, _T("&Edit the item\tCtrl-E"));
+    menuList->Append(LIST_DELETE, _T("&Delete first item\tCtrl-X"));
+    menuList->Append(LIST_DELETE_ALL, _T("Delete &all items"));
+    menuList->AppendSeparator();
+    menuList->Append(LIST_FREEZE, _T("Free&ze\tCtrl-Z"));
+    menuList->Append(LIST_THAW, _T("Tha&w\tCtrl-W"));
+    menuList->AppendSeparator();
+    menuList->AppendCheckItem(LIST_TOGGLE_LINES, _T("Toggle &lines\tCtrl-I"));
+    menuList->Append(LIST_TOGGLE_MULTI_SEL, _T("&Multiple selection\tCtrl-M"),
+            _T("Toggle multiple selection"), true);
+
+    wxMenu *menuCol = new wxMenu;
+    menuCol->Append(LIST_SET_FG_COL, _T("&Foreground colour..."));
+    menuCol->Append(LIST_SET_BG_COL, _T("&Background colour..."));
+
+    wxMenuBar *menubar = new wxMenuBar;
+    menubar->Append(menuFile, _T("&File"));
+    menubar->Append(menuView, _T("&View"));
+    menubar->Append(menuList, _T("&List"));
+    menubar->Append(menuCol, _T("&Colour"));
+    SetMenuBar(menubar);
+
+    m_panel = new wxPanel(this, wxID_ANY);
+    m_logWindow = new wxTextCtrl(m_panel, wxID_ANY, wxEmptyString,
+                                 wxDefaultPosition, wxDefaultSize,
+                                 wxTE_READONLY | wxTE_MULTILINE | wxSUNKEN_BORDER);
+
+    m_logOld = wxLog::SetActiveTarget(new wxLogTextCtrl(m_logWindow));
+
+    RecreateList(wxLC_REPORT | wxLC_SINGLE_SEL);
 
+#ifdef __WXMSW__
+    // this is useful to know specially when debugging :)
+    wxLogMessage("Your version of comctl32.dll is: %d", 
+                 wxApp::GetComCtl32Version());
 #endif
 
-  // Make a menubar
-  wxMenu *file_menu = new wxMenu;
-
-  file_menu->Append(LIST_LIST_VIEW,         "&List view");
-  file_menu->Append(LIST_REPORT_VIEW,         "&Report view");
-  file_menu->Append(LIST_ICON_VIEW,         "&Icon view");
-  file_menu->Append(LIST_ICON_TEXT_VIEW,     "Icon view with &text");
-  file_menu->Append(LIST_SMALL_ICON_VIEW,     "&Small icon view");
-  file_menu->Append(LIST_SMALL_ICON_TEXT_VIEW,     "Small icon &view with text");
-  file_menu->Append(LIST_DESELECT_ALL, "&Deselect All");
-  file_menu->Append(LIST_SELECT_ALL, "S&elect All");
-  file_menu->AppendSeparator();
-  file_menu->Append(LIST_SORT, "&Sort\tCtrl-S");
-  file_menu->AppendSeparator();
-  file_menu->Append(LIST_DELETE_ALL, "Delete &all items");
-  file_menu->AppendSeparator();
-  file_menu->Append(BUSY_ON,         "&Busy cursor on");
-  file_menu->Append(BUSY_OFF,         "&Busy cursor off");
-  file_menu->AppendSeparator();
-  file_menu->Append(LIST_ABOUT, "&About");
-  file_menu->Append(LIST_QUIT, "E&xit");
-  wxMenuBar *menu_bar = new wxMenuBar;
-  menu_bar->Append(file_menu, "&File");
-  frame->SetMenuBar(menu_bar);
-
-  // Make a panel with a message
-  frame->m_listCtrl = new MyListCtrl(frame, LIST_CTRL, wxPoint(0, 0), wxSize(400, 200),
-          wxLC_LIST|wxSUNKEN_BORDER|wxLC_EDIT_LABELS );
-//          wxLC_LIST|wxLC_USER_TEXT|wxSUNKEN_BORDER); // wxLC_USER_TEXT requires app to supply all text on demand
-  frame->m_logWindow = new wxTextCtrl(frame, -1, "", wxPoint(0, 0), wxSize(400, 200), wxTE_MULTILINE|wxSUNKEN_BORDER);
-
-  wxLayoutConstraints *c = new wxLayoutConstraints;
-  c->top.SameAs            (frame, wxTop);
-  c->left.SameAs        (frame, wxLeft);
-  c->right.SameAs        (frame, wxRight);
-  c->height.PercentOf    (frame, wxHeight, 66);
-  frame->m_listCtrl->SetConstraints(c);
-
-  c = new wxLayoutConstraints;
-  c->top.Below            (frame->m_listCtrl);
-  c->left.SameAs        (frame, wxLeft);
-  c->right.SameAs        (frame, wxRight);
-  c->bottom.SameAs        (frame, wxBottom);
-  frame->m_logWindow->SetConstraints(c);
-  frame->SetAutoLayout(TRUE);
-
-  for ( int i=0; i < 30; i++)
-    {
-        wxChar buf[20];
-        wxSprintf(buf, _T("Item %d"), i);
-        frame->m_listCtrl->InsertItem(i, buf);
-    }
+#if wxUSE_STATUSBAR
+    CreateStatusBar();
+#endif // wxUSE_STATUSBAR
+}
 
-  frame->CreateStatusBar(3);
-  frame->SetStatusText("", 0);
+MyFrame::~MyFrame()
+{
+    delete wxLog::SetActiveTarget(m_logOld);
 
-  // Show the frame
-  frame->Show(TRUE);
+    delete m_imageListNormal;
+    delete m_imageListSmall;
+}
 
-  SetTopWindow(frame);
+void MyFrame::OnSize(wxSizeEvent& event)
+{
+    DoSize();
 
-  return TRUE;
+    event.Skip();
 }
 
-// My frame constructor
-MyFrame::MyFrame(wxFrame *frame, char *title, int x, int y, int w, int h):
-  wxFrame(frame, -1, title, wxPoint(x, y), wxSize(w, h))
+void MyFrame::DoSize()
 {
-    m_listCtrl = (MyListCtrl *) NULL;
-    m_logWindow = (wxTextCtrl *) NULL;
+    if ( !m_logWindow )
+        return;
+
+    wxSize size = GetClientSize();
+    wxCoord y = (2*size.y)/3;
+    m_listCtrl->SetSize(0, 0, size.x, y);
+    m_logWindow->SetSize(0, y + 1, size.x, size.y - y -1);
 }
 
-MyFrame::~MyFrame(void)
+bool MyFrame::CheckNonVirtual() const
 {
-    delete wxGetApp().m_imageListNormal;
-    delete wxGetApp().m_imageListSmall;
+    if ( !m_listCtrl->HasFlag(wxLC_VIRTUAL) )
+        return true;
+
+    // "this" == whatever
+    wxLogWarning(_T("Can't do this in virtual view, sorry."));
+
+    return false;
 }
 
 void MyFrame::OnQuit(wxCommandEvent& WXUNUSED(event))
 {
-  Close(TRUE);
+    Close(true);
 }
 
-void MyFrame::BusyOn(wxCommandEvent& WXUNUSED(event))
+void MyFrame::OnAbout(wxCommandEvent& WXUNUSED(event))
 {
-   wxBeginBusyCursor();
+    wxMessageDialog dialog(this, _T("List test sample\nJulian Smart (c) 1997"),
+            _T("About list test"), wxOK|wxCANCEL);
+
+    dialog.ShowModal();
 }
 
-void MyFrame::BusyOff(wxCommandEvent& WXUNUSED(event))
+void MyFrame::OnFreeze(wxCommandEvent& WXUNUSED(event))
 {
-   wxEndBusyCursor();
+    wxLogMessage(_T("Freezing the control"));
+
+    m_listCtrl->Freeze();
 }
 
-void MyFrame::OnAbout(wxCommandEvent& WXUNUSED(event))
+void MyFrame::OnThaw(wxCommandEvent& WXUNUSED(event))
 {
-    wxMessageDialog dialog(this, "List test sample\nJulian Smart (c) 1997",
-            "About list test", wxOK|wxCANCEL);
+    wxLogMessage(_T("Thawing the control"));
 
-    dialog.ShowModal();
+    m_listCtrl->Thaw();
+}
+
+void MyFrame::OnToggleLines(wxCommandEvent& event)
+{
+    m_listCtrl->SetSingleStyle(wxLC_HRULES | wxLC_VRULES, event.IsChecked());
+}
+
+void MyFrame::OnToggleMacUseGeneric(wxCommandEvent& event)
+{
+    wxSystemOptions::SetOption(wxT("mac.listctrl.always_use_generic"), event.IsChecked());
+}
+
+void MyFrame::OnGoTo(wxCommandEvent& WXUNUSED(event))
+{
+    long index = 3;
+    m_listCtrl->SetItemState(index, wxLIST_STATE_FOCUSED, wxLIST_STATE_FOCUSED);
+
+    long sel = m_listCtrl->GetNextItem(-1, wxLIST_NEXT_ALL,
+                                        wxLIST_STATE_SELECTED);
+    if ( sel != -1 )
+        m_listCtrl->SetItemState(sel, 0, wxLIST_STATE_SELECTED);
+    m_listCtrl->SetItemState(index, wxLIST_STATE_SELECTED, wxLIST_STATE_SELECTED);
+}
+
+void MyFrame::OnFocusLast(wxCommandEvent& WXUNUSED(event))
+{
+    long index = m_listCtrl->GetItemCount() - 1;
+    if ( index == -1 )
+    {
+        return;
+    }
+
+    m_listCtrl->SetItemState(index, wxLIST_STATE_FOCUSED, wxLIST_STATE_FOCUSED);
+    m_listCtrl->EnsureVisible(index);
+}
+
+void MyFrame::OnToggleFirstSel(wxCommandEvent& WXUNUSED(event))
+{
+    m_listCtrl->SetItemState(0, (~m_listCtrl->GetItemState(0, wxLIST_STATE_SELECTED) ) & wxLIST_STATE_SELECTED, wxLIST_STATE_SELECTED);
 }
 
 void MyFrame::OnDeselectAll(wxCommandEvent& WXUNUSED(event))
 {
+    if ( !CheckNonVirtual() )
+        return;
+
     int n = m_listCtrl->GetItemCount();
     for (int i = 0; i < n; i++)
         m_listCtrl->SetItemState(i,0,wxLIST_STATE_SELECTED);
@@ -239,55 +391,116 @@ void MyFrame::OnDeselectAll(wxCommandEvent& WXUNUSED(event))
 
 void MyFrame::OnSelectAll(wxCommandEvent& WXUNUSED(event))
 {
+    if ( !CheckNonVirtual() )
+        return;
+
     int n = m_listCtrl->GetItemCount();
     for (int i = 0; i < n; i++)
         m_listCtrl->SetItemState(i,wxLIST_STATE_SELECTED, wxLIST_STATE_SELECTED);
 }
 
-void MyFrame::OnListView(wxCommandEvent& WXUNUSED(event))
+// ----------------------------------------------------------------------------
+// changing listctrl modes
+// ----------------------------------------------------------------------------
+
+void MyFrame::RecreateList(long flags, bool withText)
 {
-    m_listCtrl->DeleteAllItems();
+    // we could avoid recreating it if we don't set/clear the wxLC_VIRTUAL
+    // style, but it is more trouble to do it than not
+#if 0
+    if ( !m_listCtrl || ((flags & wxLC_VIRTUAL) !=
+            (m_listCtrl->GetWindowStyleFlag() & wxLC_VIRTUAL)) )
+#endif
+    {
+        delete m_listCtrl;
+
+        m_listCtrl = new MyListCtrl(m_panel, LIST_CTRL,
+                                    wxDefaultPosition, wxDefaultSize,
+                                    flags |
+                                    wxBORDER_THEME | wxLC_EDIT_LABELS);
+
+        switch ( flags & wxLC_MASK_TYPE )
+        {
+            case wxLC_LIST:
+                InitWithListItems();
+                break;
+
+            case wxLC_ICON:
+                InitWithIconItems(withText);
+                break;
+
+            case wxLC_SMALL_ICON:
+                InitWithIconItems(withText, true);
+                break;
+
+            case wxLC_REPORT:
+                if ( flags & wxLC_VIRTUAL )
+                    InitWithVirtualItems();
+                else
+                    InitWithReportItems();
+                break;
+
+            default:
+                wxFAIL_MSG( _T("unknown listctrl mode") );
+        }
+    }
+
+    DoSize();
+
     m_logWindow->Clear();
-    m_listCtrl->SetSingleStyle(wxLC_LIST);
-    m_listCtrl->SetImageList((wxImageList *) NULL, wxIMAGE_LIST_NORMAL);
-    m_listCtrl->SetImageList((wxImageList *) NULL, wxIMAGE_LIST_SMALL);
+}
 
-    for ( int i=0; i < 30; i++)
+void MyFrame::OnListView(wxCommandEvent& WXUNUSED(event))
+{
+    RecreateList(wxLC_LIST);
+}
+
+void MyFrame::InitWithListItems()
+{
+    for ( int i = 0; i < NUM_ITEMS; i++ )
     {
-        wxChar buf[20];
-        wxSprintf(buf, _T("Item %d"), i);
-        m_listCtrl->InsertItem(i, buf);
+        m_listCtrl->InsertItem(i, wxString::Format(_T("Item %d"), i));
     }
 }
 
 void MyFrame::OnReportView(wxCommandEvent& WXUNUSED(event))
 {
-    m_listCtrl->DeleteAllItems();
-    m_listCtrl->DeleteAllColumns();
-    m_logWindow->Clear();
+    RecreateList(wxLC_REPORT);
+}
+
+void MyFrame::InitWithReportItems()
+{
+    m_listCtrl->SetImageList(m_imageListSmall, wxIMAGE_LIST_SMALL);
 
-    m_listCtrl->SetSingleStyle(wxLC_REPORT);
-    m_listCtrl->SetImageList((wxImageList *) NULL, wxIMAGE_LIST_NORMAL);
-    m_listCtrl->SetImageList(wxGetApp().m_imageListSmall, wxIMAGE_LIST_SMALL);
+    // note that under MSW for SetColumnWidth() to work we need to create the
+    // items with images initially even if we specify dummy image id
+    wxListItem itemCol;
+    itemCol.SetText(_T("Column 1"));
+    itemCol.SetImage(-1);
+    m_listCtrl->InsertColumn(0, itemCol);
 
-    m_listCtrl->InsertColumn(0, "Column 1"); // , wxLIST_FORMAT_LEFT, 140);
-    m_listCtrl->InsertColumn(1, "Column 2"); // , wxLIST_FORMAT_LEFT, 140);
-    m_listCtrl->InsertColumn(2, "One More Column (2)"); // , wxLIST_FORMAT_LEFT, 140);
+    itemCol.SetText(_T("Column 2"));
+    itemCol.SetAlign(wxLIST_FORMAT_CENTRE);
+    m_listCtrl->InsertColumn(1, itemCol);
 
-    for ( int i = 0; i < 300; i++ )
-    {
-        wxChar buf[50];
-        wxSprintf(buf, _T("This is item %d"), i);
-        long tmp = m_listCtrl->InsertItem(i, buf, 0);
-        m_listCtrl->SetItemData(tmp, i);
+    itemCol.SetText(_T("Column 3"));
+    itemCol.SetAlign(wxLIST_FORMAT_RIGHT);
+    m_listCtrl->InsertColumn(2, itemCol);
+
+    // to speed up inserting we hide the control temporarily
+    m_listCtrl->Hide();
 
-        wxSprintf(buf, _T("Col 1, item %d"), i);
-        tmp = m_listCtrl->SetItem(i, 1, buf);
+    wxStopWatch sw;
 
-        wxSprintf(buf, _T("Item %d in column 2"), i);
-        tmp = m_listCtrl->SetItem(i, 2, buf);
+    for ( int i = 0; i < NUM_ITEMS; i++ )
+    {
+        m_listCtrl->InsertItemInReportView(i);
     }
 
+    m_logWindow->WriteText(wxString::Format(_T("%d items inserted in %ldms\n"),
+                                            NUM_ITEMS, sw.Time()));
+    m_listCtrl->Show();
+
     // we leave all mask fields to 0 and only change the colour
     wxListItem item;
     item.m_itemId = 0;
@@ -304,225 +517,460 @@ void MyFrame::OnReportView(wxCommandEvent& WXUNUSED(event))
     m_listCtrl->SetItem( item );
 
     m_listCtrl->SetTextColour(*wxBLUE);
-    m_listCtrl->SetBackgroundColour(*wxLIGHT_GREY);
 
     m_listCtrl->SetColumnWidth( 0, wxLIST_AUTOSIZE );
     m_listCtrl->SetColumnWidth( 1, wxLIST_AUTOSIZE );
     m_listCtrl->SetColumnWidth( 2, wxLIST_AUTOSIZE );
+
+    // Set images in columns
+    m_listCtrl->SetItemColumnImage(1, 1, 0);
+
+    wxListItem info;
+    info.SetImage(0);
+    info.SetId(3);
+    info.SetColumn(2);
+    m_listCtrl->SetItem(info);
+
+    // test SetItemFont too
+    m_listCtrl->SetItemFont(0, *wxITALIC_FONT);
 }
 
-void MyFrame::OnIconView(wxCommandEvent& WXUNUSED(event))
+void MyFrame::InitWithIconItems(bool withText, bool sameIcon)
 {
-    m_listCtrl->DeleteAllItems();
-    m_logWindow->Clear();
-    m_listCtrl->SetSingleStyle(wxLC_ICON);
-    m_listCtrl->SetImageList(wxGetApp().m_imageListNormal, wxIMAGE_LIST_NORMAL);
-    m_listCtrl->SetImageList(wxGetApp().m_imageListSmall, wxIMAGE_LIST_SMALL);
+    m_listCtrl->SetImageList(m_imageListNormal, wxIMAGE_LIST_NORMAL);
+    m_listCtrl->SetImageList(m_imageListSmall, wxIMAGE_LIST_SMALL);
 
-    for ( int i=0; i < 9; i++)
+    for ( int i = 0; i < NUM_ICONS; i++ )
     {
-        m_listCtrl->InsertItem(i, i);
+        int image = sameIcon ? 0 : i;
+
+        if ( withText )
+        {
+            m_listCtrl->InsertItem(i, wxString::Format(_T("Label %d"), i),
+                                   image);
+        }
+        else
+        {
+            m_listCtrl->InsertItem(i, image);
+        }
     }
 }
 
+void MyFrame::OnIconView(wxCommandEvent& WXUNUSED(event))
+{
+    RecreateList(wxLC_ICON, false);
+}
+
 void MyFrame::OnIconTextView(wxCommandEvent& WXUNUSED(event))
 {
-    m_listCtrl->DeleteAllItems();
-    m_logWindow->Clear();
-    m_listCtrl->SetSingleStyle(wxLC_ICON);
-    m_listCtrl->SetImageList(wxGetApp().m_imageListNormal, wxIMAGE_LIST_NORMAL);
-    m_listCtrl->SetImageList(wxGetApp().m_imageListSmall, wxIMAGE_LIST_SMALL);
+    RecreateList(wxLC_ICON);
+}
+
+void MyFrame::OnSmallIconView(wxCommandEvent& WXUNUSED(event))
+{
+    RecreateList(wxLC_SMALL_ICON, false);
+}
+
+void MyFrame::OnSmallIconTextView(wxCommandEvent& WXUNUSED(event))
+{
+    RecreateList(wxLC_SMALL_ICON);
+}
+
+void MyFrame::OnVirtualView(wxCommandEvent& WXUNUSED(event))
+{
+    m_smallVirtual = false;
+    RecreateList(wxLC_REPORT | wxLC_VIRTUAL);
+}
+
+void MyFrame::OnSmallVirtualView(wxCommandEvent& WXUNUSED(event))
+{
+    m_smallVirtual = true;
+    RecreateList(wxLC_REPORT | wxLC_VIRTUAL);
+}
+
+void MyFrame::InitWithVirtualItems()
+{
+    m_listCtrl->SetImageList(m_imageListSmall, wxIMAGE_LIST_SMALL);
 
-    for ( int i=0; i < 9; i++)
+    if ( m_smallVirtual )
+    {
+        m_listCtrl->InsertColumn(0, _T("Animal"));
+        m_listCtrl->InsertColumn(1, _T("Sound"));
+        m_listCtrl->SetItemCount(WXSIZEOF(SMALL_VIRTUAL_VIEW_ITEMS));
+    }
+    else
     {
-        wxChar buf[20];
-        wxSprintf(buf, _T("Label %d"), i);
-        m_listCtrl->InsertItem(i, buf, i);
+        m_listCtrl->InsertColumn(0, _T("First Column"));
+        m_listCtrl->InsertColumn(1, _T("Second Column"));
+        m_listCtrl->SetColumnWidth(0, 150);
+        m_listCtrl->SetColumnWidth(1, 150);
+        m_listCtrl->SetItemCount(1000000);
     }
 }
 
-void MyFrame::OnSmallIconView(wxCommandEvent& WXUNUSED(event))
+void MyFrame::OnSort(wxCommandEvent& WXUNUSED(event))
 {
-    m_listCtrl->DeleteAllItems();
-    m_logWindow->Clear();
-    m_listCtrl->SetSingleStyle(wxLC_SMALL_ICON);
-    m_listCtrl->SetImageList(wxGetApp().m_imageListNormal, wxIMAGE_LIST_NORMAL);
-    m_listCtrl->SetImageList(wxGetApp().m_imageListSmall, wxIMAGE_LIST_SMALL);
+    wxStopWatch sw;
+
+    m_listCtrl->SortItems(MyCompareFunction, 0);
+
+    m_logWindow->WriteText(wxString::Format(_T("Sorting %d items took %ld ms\n"),
+                                            m_listCtrl->GetItemCount(),
+                                            sw.Time()));
+}
+
+void MyFrame::OnShowSelInfo(wxCommandEvent& WXUNUSED(event))
+{
+    int selCount = m_listCtrl->GetSelectedItemCount();
+    wxLogMessage(_T("%d items selected:"), selCount);
+
+    // don't show too many items
+    size_t shownCount = 0;
 
-    for ( int i=0; i < 9; i++)
+    long item = m_listCtrl->GetNextItem(-1, wxLIST_NEXT_ALL,
+                                        wxLIST_STATE_SELECTED);
+    while ( item != -1 )
     {
-        m_listCtrl->InsertItem(i, 0);
+        wxLogMessage(_T("\t%ld (%s)"),
+                     item, m_listCtrl->GetItemText(item).c_str());
+
+        if ( ++shownCount > 10 )
+        {
+            wxLogMessage(_T("\t... more selected items snipped..."));
+            break;
+        }
+
+        item = m_listCtrl->GetNextItem(item, wxLIST_NEXT_ALL,
+                                       wxLIST_STATE_SELECTED);
     }
 }
 
-void MyFrame::OnSmallIconTextView(wxCommandEvent& WXUNUSED(event))
+void MyFrame::OnShowViewRect(wxCommandEvent& WXUNUSED(event))
 {
-    m_listCtrl->DeleteAllItems();
-    m_logWindow->Clear();
-    m_listCtrl->SetSingleStyle(wxLC_SMALL_ICON);
-    m_listCtrl->SetImageList(wxGetApp().m_imageListNormal, wxIMAGE_LIST_NORMAL);
-    m_listCtrl->SetImageList(wxGetApp().m_imageListSmall, wxIMAGE_LIST_SMALL);
+    const wxRect r = m_listCtrl->GetViewRect();
+    wxLogMessage("View rect: (%d, %d)-(%d, %d)",
+                 r.GetLeft(), r.GetTop(), r.GetRight(), r.GetBottom());
+}
+
+// ----------------------------------------------------------------------------
+// column order tests
+// ----------------------------------------------------------------------------
+
+#ifdef wxHAS_LISTCTRL_COLUMN_ORDER
 
-    for ( int i=0; i < 9; i++)
+static wxString DumpIntArray(const wxArrayInt& a)
+{
+    wxString s("{ ");
+    const size_t count = a.size();
+    for ( size_t n = 0; n < count; n++ )
     {
-        m_listCtrl->InsertItem(i, "Label", 0);
+        if ( n )
+            s += ", ";
+        s += wxString::Format("%lu", (unsigned long)a[n]);
     }
+
+    s += " }";
+
+    return s;
 }
 
-void MyFrame::OnSort(wxCommandEvent& WXUNUSED(event))
+void MyFrame::OnSetColOrder(wxCommandEvent& WXUNUSED(event))
 {
-    m_listCtrl->SortItems(MyCompareFunction, 0);
+    wxArrayInt order(3);
+    order[0] = 2;
+    order[1] = 0;
+    order[2] = 1;
+    if ( m_listCtrl->SetColumnsOrder(order) )
+        wxLogMessage("Column order set to %s", DumpIntArray(order));
+}
+
+void MyFrame::OnGetColOrder(wxCommandEvent& WXUNUSED(event))
+{
+    // show what GetColumnsOrder() returns
+    const wxArrayInt order = m_listCtrl->GetColumnsOrder();
+    wxString msg = "Columns order: " +
+                        DumpIntArray(m_listCtrl->GetColumnsOrder()) + "\n";
+
+    int n;
+    const int count = m_listCtrl->GetColumnCount();
+
+    // show the results of GetColumnOrder() for each column
+    msg += "GetColumnOrder() results:\n";
+    for ( n = 0; n < count; n++ )
+    {
+        msg += wxString::Format("    %2d -> %2d\n",
+                                n, m_listCtrl->GetColumnOrder(n));
+    }
+
+    // and the results of GetColumnIndexFromOrder() too
+    msg += "GetColumnIndexFromOrder() results:\n";
+    for ( n = 0; n < count; n++ )
+    {
+        msg += wxString::Format("    %2d -> %2d\n",
+                                n, m_listCtrl->GetColumnIndexFromOrder(n));
+    }
+
+    wxLogMessage("%s", msg);
+}
+
+#endif // wxHAS_LISTCTRL_COLUMN_ORDER
+
+void MyFrame::OnShowColInfo(wxCommandEvent& WXUNUSED(event))
+{
+    int count = m_listCtrl->GetColumnCount();
+    wxLogMessage(wxT("%d columns:"), count);
+    for ( int c = 0; c < count; c++ )
+    {
+        wxLogMessage(wxT("\tcolumn %d has width %d"), c,
+                     m_listCtrl->GetColumnWidth(c));
+    }
+}
+
+void MyFrame::OnUpdateShowColInfo(wxUpdateUIEvent& event)
+{
+    event.Enable( (m_listCtrl->GetWindowStyleFlag() & wxLC_REPORT) != 0 );
+}
+
+void MyFrame::OnToggleMultiSel(wxCommandEvent& WXUNUSED(event))
+{
+    long flags = m_listCtrl->GetWindowStyleFlag();
+    if ( flags & wxLC_SINGLE_SEL )
+        flags &= ~wxLC_SINGLE_SEL;
+    else
+        flags |= wxLC_SINGLE_SEL;
+
+    m_logWindow->WriteText(wxString::Format(wxT("Current selection mode: %sle\n"),
+                           (flags & wxLC_SINGLE_SEL) ? _T("sing") : _T("multip")));
+
+    RecreateList(flags);
+}
+
+void MyFrame::OnUpdateToggleMultiSel(wxUpdateUIEvent& event)
+{
+     event.Check((m_listCtrl->GetWindowStyleFlag() & wxLC_SINGLE_SEL) == 0);
+}
+
+void MyFrame::OnSetFgColour(wxCommandEvent& WXUNUSED(event))
+{
+    m_listCtrl->SetForegroundColour(wxGetColourFromUser(this));
+    m_listCtrl->Refresh();
+}
+
+void MyFrame::OnSetBgColour(wxCommandEvent& WXUNUSED(event))
+{
+    m_listCtrl->SetBackgroundColour(wxGetColourFromUser(this));
+    m_listCtrl->Refresh();
+}
+
+void MyFrame::OnAdd(wxCommandEvent& WXUNUSED(event))
+{
+    m_listCtrl->InsertItem(m_listCtrl->GetItemCount(), _T("Appended item"));
+}
+
+void MyFrame::OnEdit(wxCommandEvent& WXUNUSED(event))
+{
+    long itemCur = m_listCtrl->GetNextItem(-1, wxLIST_NEXT_ALL,
+                                           wxLIST_STATE_FOCUSED);
+
+    if ( itemCur != -1 )
+    {
+        m_listCtrl->EditLabel(itemCur);
+    }
+    else
+    {
+        m_logWindow->WriteText(_T("No item to edit"));
+    }
+}
+
+void MyFrame::OnDelete(wxCommandEvent& WXUNUSED(event))
+{
+    if ( m_listCtrl->GetItemCount() )
+    {
+        m_listCtrl->DeleteItem(0);
+    }
+    else
+    {
+        m_logWindow->WriteText(_T("Nothing to delete"));
+    }
 }
 
 void MyFrame::OnDeleteAll(wxCommandEvent& WXUNUSED(event))
 {
-    (void)wxGetElapsedTime(TRUE);
+    wxStopWatch sw;
+
+    int itemCount = m_listCtrl->GetItemCount();
 
-    int nItems = m_listCtrl->GetItemCount();
     m_listCtrl->DeleteAllItems();
 
-    wxLogMessage("Deleting %d items took %ld ms",
-                 nItems, wxGetElapsedTime());
+    m_logWindow->WriteText(wxString::Format(_T("Deleting %d items took %ld ms\n"),
+                                            itemCount,
+                                            sw.Time()));
 }
 
+
+// ----------------------------------------------------------------------------
 // MyListCtrl
+// ----------------------------------------------------------------------------
+
+BEGIN_EVENT_TABLE(MyListCtrl, wxListCtrl)
+    EVT_LIST_BEGIN_DRAG(LIST_CTRL, MyListCtrl::OnBeginDrag)
+    EVT_LIST_BEGIN_RDRAG(LIST_CTRL, MyListCtrl::OnBeginRDrag)
+    EVT_LIST_BEGIN_LABEL_EDIT(LIST_CTRL, MyListCtrl::OnBeginLabelEdit)
+    EVT_LIST_END_LABEL_EDIT(LIST_CTRL, MyListCtrl::OnEndLabelEdit)
+    EVT_LIST_DELETE_ITEM(LIST_CTRL, MyListCtrl::OnDeleteItem)
+    EVT_LIST_DELETE_ALL_ITEMS(LIST_CTRL, MyListCtrl::OnDeleteAllItems)
+    EVT_LIST_ITEM_SELECTED(LIST_CTRL, MyListCtrl::OnSelected)
+    EVT_LIST_ITEM_DESELECTED(LIST_CTRL, MyListCtrl::OnDeselected)
+    EVT_LIST_KEY_DOWN(LIST_CTRL, MyListCtrl::OnListKeyDown)
+    EVT_LIST_ITEM_ACTIVATED(LIST_CTRL, MyListCtrl::OnActivated)
+    EVT_LIST_ITEM_FOCUSED(LIST_CTRL, MyListCtrl::OnFocused)
+
+    EVT_LIST_COL_CLICK(LIST_CTRL, MyListCtrl::OnColClick)
+    EVT_LIST_COL_RIGHT_CLICK(LIST_CTRL, MyListCtrl::OnColRightClick)
+    EVT_LIST_COL_BEGIN_DRAG(LIST_CTRL, MyListCtrl::OnColBeginDrag)
+    EVT_LIST_COL_DRAGGING(LIST_CTRL, MyListCtrl::OnColDragging)
+    EVT_LIST_COL_END_DRAG(LIST_CTRL, MyListCtrl::OnColEndDrag)
+
+    EVT_LIST_CACHE_HINT(LIST_CTRL, MyListCtrl::OnCacheHint)
+
+#if USE_CONTEXT_MENU
+    EVT_CONTEXT_MENU(MyListCtrl::OnContextMenu)
+#endif
+    EVT_CHAR(MyListCtrl::OnChar)
+
+    EVT_RIGHT_DOWN(MyListCtrl::OnRightClick)
+END_EVENT_TABLE()
+
+void MyListCtrl::OnCacheHint(wxListEvent& event)
+{
+    wxLogMessage( wxT("OnCacheHint: cache items %ld..%ld"),
+                  event.GetCacheFrom(), event.GetCacheTo() );
+}
+
+void MyListCtrl::SetColumnImage(int col, int image)
+{
+    wxListItem item;
+    item.SetMask(wxLIST_MASK_IMAGE);
+    item.SetImage(image);
+    SetColumn(col, item);
+}
 
 void MyListCtrl::OnColClick(wxListEvent& event)
 {
-    if ( !wxGetApp().GetTopWindow() )
-        return;
+    int col = event.GetColumn();
 
-    wxTextCtrl *text = ((MyFrame *)wxGetApp().GetTopWindow())->m_logWindow;
-    if ( !text )
-        return;
+    // set or unset image
+    static bool x = false;
+    x = !x;
+    SetColumnImage(col, x ? 0 : -1);
 
-    wxString msg;
-    msg.Printf( "OnColumnClick at %d.\n", event.GetColumn() );
-    text->WriteText(msg);
+    wxLogMessage( wxT("OnColumnClick at %d."), col );
 }
 
-void MyListCtrl::OnBeginDrag(wxListEvent& event)
+void MyListCtrl::OnColRightClick(wxListEvent& event)
 {
-    if ( !wxGetApp().GetTopWindow() )
-        return;
+    int col = event.GetColumn();
+    if ( col != -1 )
+    {
+        SetColumnImage(col, -1);
+    }
 
-    wxTextCtrl *text = ((MyFrame *)wxGetApp().GetTopWindow())->m_logWindow;
-    if ( !text )
-        return;
+    // Show popupmenu at position
+    wxMenu menu(wxT("Test"));
+    menu.Append(LIST_ABOUT, _T("&About"));
+    PopupMenu(&menu, event.GetPoint());
 
-    wxString msg;
-    msg.Printf( "OnBeginDrag at %d,%d.\n", event.m_pointDrag.x, event.m_pointDrag.y );
-    text->WriteText(msg);
+    wxLogMessage( wxT("OnColumnRightClick at %d."), event.GetColumn() );
 }
 
-void MyListCtrl::OnBeginRDrag(wxListEvent& event)
+void MyListCtrl::LogColEvent(const wxListEvent& event, const wxChar *name)
 {
-    if ( !wxGetApp().GetTopWindow() )
-        return;
-
-    wxTextCtrl *text = ((MyFrame *)wxGetApp().GetTopWindow())->m_logWindow;
-    if ( !text )
-        return;
+    const int col = event.GetColumn();
 
-    wxString msg;
-    msg.Printf( "OnBeginRDrag at %d,%d.\n", event.m_pointDrag.x, event.m_pointDrag.y );
-    text->WriteText(msg);
+    wxLogMessage(wxT("%s: column %d (width = %d or %d)."),
+                 name,
+                 col,
+                 event.GetItem().GetWidth(),
+                 GetColumnWidth(col));
 }
 
-void MyListCtrl::OnBeginLabelEdit(wxListEvent& event)
+void MyListCtrl::OnColBeginDrag(wxListEvent& event)
 {
-    if ( !wxGetApp().GetTopWindow() )
-        return;
+    LogColEvent( event, wxT("OnColBeginDrag") );
 
-    wxTextCtrl *text = ((MyFrame *)wxGetApp().GetTopWindow())->m_logWindow;
-    if ( !text )
-        return;
+    if ( event.GetColumn() == 0 )
+    {
+        wxLogMessage(_T("Resizing this column shouldn't work."));
 
-    text->WriteText("OnBeginLabelEdit: ");
-    text->WriteText(event.m_item.m_text);
-    text->WriteText("\n");
+        event.Veto();
+    }
 }
 
-void MyListCtrl::OnEndLabelEdit(wxListEvent& event)
+void MyListCtrl::OnColDragging(wxListEvent& event)
 {
-    if ( !wxGetApp().GetTopWindow() )
-        return;
-
-    wxTextCtrl *text = ((MyFrame *)wxGetApp().GetTopWindow())->m_logWindow;
-    if ( !text )
-        return;
+    LogColEvent( event, wxT("OnColDragging") );
+}
 
-    text->WriteText("OnEndLabelEdit: ");
-    text->WriteText(event.m_item.m_text);
-    text->WriteText("\n");
+void MyListCtrl::OnColEndDrag(wxListEvent& event)
+{
+    LogColEvent( event, wxT("OnColEndDrag") );
 }
 
-void MyListCtrl::OnDeleteItem(wxListEvent& WXUNUSED(event))
+void MyListCtrl::OnBeginDrag(wxListEvent& event)
 {
-    if ( !wxGetApp().GetTopWindow() )
-        return;
+    const wxPoint& pt = event.m_pointDrag;
 
-    wxTextCtrl *text = ((MyFrame *)wxGetApp().GetTopWindow())->m_logWindow;
-    if ( !text )
-        return;
+    int flags;
+    wxLogMessage( wxT("OnBeginDrag at (%d, %d), item %ld."),
+                  pt.x, pt.y, HitTest(pt, flags) );
+}
 
-        text->WriteText("OnDeleteItem\n");
+void MyListCtrl::OnBeginRDrag(wxListEvent& event)
+{
+    wxLogMessage( wxT("OnBeginRDrag at %d,%d."),
+                  event.m_pointDrag.x, event.m_pointDrag.y );
 }
 
-void MyListCtrl::OnGetInfo(wxListEvent& event)
+void MyListCtrl::OnBeginLabelEdit(wxListEvent& event)
 {
-    if ( !wxGetApp().GetTopWindow() )
-        return;
+    wxLogMessage( wxT("OnBeginLabelEdit: %s"), event.m_item.m_text.c_str());
 
-    wxTextCtrl *text = ((MyFrame *)wxGetApp().GetTopWindow())->m_logWindow;
+    wxTextCtrl * const text = GetEditControl();
     if ( !text )
-        return;
-
-    text->WriteText("OnGetInfo\n");
-
-    (*text) << "OnGetInfo (" << event.m_item.m_itemId << ", " << event.m_item.m_col << ")";
-    if ( event.m_item.m_mask & wxLIST_MASK_STATE )
-        (*text) << " wxLIST_MASK_STATE";
-    if ( event.m_item.m_mask & wxLIST_MASK_TEXT )
-        (*text) << " wxLIST_MASK_TEXT";
-    if ( event.m_item.m_mask & wxLIST_MASK_IMAGE )
-        (*text) << " wxLIST_MASK_IMAGE";
-    if ( event.m_item.m_mask & wxLIST_MASK_DATA )
-        (*text) << " wxLIST_MASK_DATA";
-    if ( event.m_item.m_mask & wxLIST_SET_ITEM )
-        (*text) << " wxLIST_SET_ITEM";
-    if ( event.m_item.m_mask & wxLIST_MASK_WIDTH )
-        (*text) << " wxLIST_MASK_WIDTH";
-    if ( event.m_item.m_mask & wxLIST_MASK_FORMAT )
-        (*text) << " wxLIST_MASK_WIDTH";
-
-    if ( event.m_item.m_mask & wxLIST_MASK_TEXT )
     {
-        event.m_item.m_text = "My callback text";
+        wxLogMessage("BUG: started to edit but no edit control");
+    }
+    else
+    {
+        wxLogMessage("Edit control value: \"%s\"", text->GetValue());
     }
-    (*text) << "\n";
 }
 
-void MyListCtrl::OnSetInfo(wxListEvent& WXUNUSED(event))
+void MyListCtrl::OnEndLabelEdit(wxListEvent& event)
 {
-    if ( !wxGetApp().GetTopWindow() )
-        return;
+    wxLogMessage( wxT("OnEndLabelEdit: %s"),
+        (
+            event.IsEditCancelled() ?
+            wxString("[cancelled]") :
+            event.m_item.m_text
+        ).c_str()
+    );
+}
 
-    wxTextCtrl *text = ((MyFrame *)wxGetApp().GetTopWindow())->m_logWindow;
-    if ( !text )
-        return;
+void MyListCtrl::OnDeleteItem(wxListEvent& event)
+{
+    LogEvent(event, _T("OnDeleteItem"));
+    wxLogMessage( wxT("Number of items when delete event is sent: %d"), GetItemCount() );
+}
 
-    text->WriteText("OnSetInfo\n");
+void MyListCtrl::OnDeleteAllItems(wxListEvent& event)
+{
+    LogEvent(event, _T("OnDeleteAllItems"));
 }
 
 void MyListCtrl::OnSelected(wxListEvent& event)
 {
-    if ( !wxGetApp().GetTopWindow() )
-        return;
-
-    wxTextCtrl *text = ((MyFrame *)wxGetApp().GetTopWindow())->m_logWindow;
-    if ( !text )
-        return;
+    LogEvent(event, _T("OnSelected"));
 
     if ( GetWindowStyle() & wxLC_REPORT )
     {
@@ -532,52 +980,316 @@ void MyListCtrl::OnSelected(wxListEvent& event)
         info.m_mask = wxLIST_MASK_TEXT;
         if ( GetItem(info) )
         {
-            *text << "Value of the 2nd field of the selected item: "
-                  << info.m_text << '\n';
+            wxLogMessage(wxT("Value of the 2nd field of the selected item: %s"),
+                         info.m_text.c_str());
         }
         else
         {
-            wxFAIL_MSG("wxListCtrl::GetItem() failed");
+            wxFAIL_MSG(wxT("wxListCtrl::GetItem() failed"));
         }
     }
+}
 
-    text->WriteText("OnSelected\n");
+void MyListCtrl::OnDeselected(wxListEvent& event)
+{
+    LogEvent(event, _T("OnDeselected"));
 }
 
-void MyListCtrl::OnDeselected(wxListEvent& WXUNUSED(event))
+void MyListCtrl::OnActivated(wxListEvent& event)
 {
-    if ( !wxGetApp().GetTopWindow() )
-        return;
+    LogEvent(event, _T("OnActivated"));
+}
 
-    wxTextCtrl *text = ((MyFrame *)wxGetApp().GetTopWindow())->m_logWindow;
-    if ( !text )
-        return;
+void MyListCtrl::OnFocused(wxListEvent& event)
+{
+    LogEvent(event, _T("OnFocused"));
 
-    text->WriteText("OnDeselected\n");
+    event.Skip();
 }
 
-void MyListCtrl::OnActivated(wxListEvent& WXUNUSED(event))
+void MyListCtrl::OnListKeyDown(wxListEvent& event)
 {
-    if ( !wxGetApp().GetTopWindow() )
-        return;
+    long item;
 
-    wxTextCtrl *text = ((MyFrame *)wxGetApp().GetTopWindow())->m_logWindow;
-    if ( !text )
-        return;
+    switch ( event.GetKeyCode() )
+    {
+        case 'C': // colorize
+            {
+                wxListItem info;
+                info.m_itemId = event.GetIndex();
+                if ( info.m_itemId == -1 )
+                {
+                    // no item
+                    break;
+                }
+
+                GetItem(info);
+
+                wxListItemAttr *attr = info.GetAttributes();
+                if ( !attr || !attr->HasTextColour() )
+                {
+                    info.SetTextColour(*wxCYAN);
+
+                    SetItem(info);
+
+                    RefreshItem(info.m_itemId);
+                }
+            }
+            break;
+
+        case 'N': // next
+            item = GetNextItem(-1, wxLIST_NEXT_ALL, wxLIST_STATE_FOCUSED);
+            if ( item++ == GetItemCount() - 1 )
+            {
+                item = 0;
+            }
+
+            wxLogMessage(_T("Focusing item %ld"), item);
+
+            SetItemState(item, wxLIST_STATE_FOCUSED, wxLIST_STATE_FOCUSED);
+            EnsureVisible(item);
+            break;
+
+        case 'R': // show bounding rectangle
+            {
+                item = event.GetIndex();
+                wxRect r;
+                if ( !GetItemRect(item, r) )
+                {
+                    wxLogError(_T("Failed to retrieve rect of item %ld"), item);
+                    break;
+                }
+
+                wxLogMessage(_T("Bounding rect of item %ld is (%d, %d)-(%d, %d)"),
+                             item, r.x, r.y, r.x + r.width, r.y + r.height);
+            }
+            break;
+
+        case '1': // show sub item bounding rectangle
+        case '2':
+        case '3':
+        case '4': // this column is invalid but we want to test it too
+            if ( InReportView() )
+            {
+                int subItem = event.GetKeyCode() - '1';
+                item = event.GetIndex();
+                wxRect r;
+                if ( !GetSubItemRect(item, subItem, r) )
+                {
+                    wxLogError(_T("Failed to retrieve rect of item %ld column %d"), item, subItem + 1);
+                    break;
+                }
+
+                wxLogMessage(_T("Bounding rect of item %ld column %d is (%d, %d)-(%d, %d)"),
+                             item, subItem + 1,
+                             r.x, r.y, r.x + r.width, r.y + r.height);
+            }
+            break;
+
+        case 'U': // update
+            if ( !IsVirtual() )
+                break;
+
+            if ( m_updated != -1 )
+                RefreshItem(m_updated);
+
+            m_updated = event.GetIndex();
+            if ( m_updated != -1 )
+            {
+                // we won't see changes to this item as it's selected, update
+                // the next one (or the first one if we're on the last item)
+                if ( ++m_updated == GetItemCount() )
+                    m_updated = 0;
+
+                wxLogMessage("Updating colour of the item %ld", m_updated);
+                RefreshItem(m_updated);
+            }
+            break;
+
+        case 'D': // delete
+            item = GetNextItem(-1, wxLIST_NEXT_ALL, wxLIST_STATE_SELECTED);
+            while ( item != -1 )
+            {
+                DeleteItem(item);
+
+                wxLogMessage(_T("Item %ld deleted"), item);
+
+                // -1 because the indices were shifted by DeleteItem()
+                item = GetNextItem(item - 1,
+                                   wxLIST_NEXT_ALL, wxLIST_STATE_SELECTED);
+            }
+            break;
+
+        case 'I': // insert
+            if ( GetWindowStyle() & wxLC_REPORT )
+            {
+                if ( GetWindowStyle() & wxLC_VIRTUAL )
+                {
+                    SetItemCount(GetItemCount() + 1);
+                }
+                else // !virtual
+                {
+                    InsertItemInReportView(event.GetIndex());
+                }
+            }
+            //else: fall through
+
+        default:
+            LogEvent(event, _T("OnListKeyDown"));
+
+            event.Skip();
+    }
+}
 
-    text->WriteText("OnActivated\n");
+void MyListCtrl::OnChar(wxKeyEvent& event)
+{
+    wxLogMessage(_T("Got char event."));
+
+    switch ( event.GetKeyCode() )
+    {
+        case 'n':
+        case 'N':
+        case 'c':
+        case 'C':
+        case 'r':
+        case 'R':
+        case 'u':
+        case 'U':
+        case 'd':
+        case 'D':
+        case 'i':
+        case 'I':
+            // these are the keys we process ourselves
+            break;
+
+        default:
+            event.Skip();
+    }
 }
 
-void MyListCtrl::OnListKeyDown(wxListEvent& event)
+void MyListCtrl::OnRightClick(wxMouseEvent& event)
 {
-    if ( !wxGetApp().GetTopWindow() )
+    if ( !event.ControlDown() )
+    {
+        event.Skip();
         return;
+    }
 
-    wxTextCtrl *text = ((MyFrame *)wxGetApp().GetTopWindow())->m_logWindow;
-    if ( !text )
-        return;
+    int flags;
+    long subitem;
+    long item = HitTest(event.GetPosition(), flags, &subitem);
+
+    wxString where;
+    switch ( flags )
+    {
+        case wxLIST_HITTEST_ABOVE: where = _T("above"); break;
+        case wxLIST_HITTEST_BELOW: where = _T("below"); break;
+        case wxLIST_HITTEST_NOWHERE: where = _T("nowhere near"); break;
+        case wxLIST_HITTEST_ONITEMICON: where = _T("on icon of"); break;
+        case wxLIST_HITTEST_ONITEMLABEL: where = _T("on label of"); break;
+        case wxLIST_HITTEST_ONITEMRIGHT: where = _T("right on"); break;
+        case wxLIST_HITTEST_TOLEFT: where = _T("to the left of"); break;
+        case wxLIST_HITTEST_TORIGHT: where = _T("to the right of"); break;
+        default: where = _T("not clear exactly where on"); break;
+    }
+
+    wxLogMessage(_T("Right double click %s item %ld, subitem %ld"),
+                 where.c_str(), item, subitem);
+}
+
+void MyListCtrl::LogEvent(const wxListEvent& event, const wxChar *eventName)
+{
+    wxLogMessage(_T("Item %ld: %s (item text = %s, data = %ld)"),
+                 event.GetIndex(), eventName,
+                 event.GetText().c_str(), event.GetData());
+}
+
+wxString MyListCtrl::OnGetItemText(long item, long column) const
+{
+    if ( GetItemCount() == WXSIZEOF(SMALL_VIRTUAL_VIEW_ITEMS) )
+    {
+        return SMALL_VIRTUAL_VIEW_ITEMS[item][column];
+    }
+    else // "big" virtual control
+    {
+        return wxString::Format(_T("Column %ld of item %ld"), column, item);
+    }
+}
+
+int MyListCtrl::OnGetItemColumnImage(long item, long column) const
+{
+    if (!column)
+        return 0;
+
+    if (!(item % 3) && column == 1)
+        return 0;
+
+    return -1;
+}
+
+wxListItemAttr *MyListCtrl::OnGetItemAttr(long item) const
+{
+    // test to check that RefreshItem() works correctly: when m_updated is
+    // set to some item and it is refreshed, we highlight the item
+    if ( item == m_updated )
+    {
+        static wxListItemAttr s_attrHighlight(*wxRED, wxNullColour, wxNullFont);
+        return &s_attrHighlight;
+    }
+
+    return item % 2 ? NULL : (wxListItemAttr *)&m_attr;
+}
+
+void MyListCtrl::InsertItemInReportView(int i)
+{
+    wxString buf;
+    buf.Printf(_T("This is item %d"), i);
+    long tmp = InsertItem(i, buf, 0);
+    SetItemData(tmp, i);
+
+    buf.Printf(_T("Col 1, item %d"), i);
+    SetItem(tmp, 1, buf);
+
+    buf.Printf(_T("Item %d in column 2"), i);
+    SetItem(tmp, 2, buf);
+}
 
-    text->WriteText("OnListKeyDown\n");
+#if USE_CONTEXT_MENU
+void MyListCtrl::OnContextMenu(wxContextMenuEvent& event)
+{
+    if (GetEditControl() == NULL)
+    {
+        wxPoint point = event.GetPosition();
+        // If from keyboard
+        if ( (point.x == -1) && (point.y == -1) )
+        {
+            wxSize size = GetSize();
+            point.x = size.x / 2;
+            point.y = size.y / 2;
+        }
+        else
+        {
+            point = ScreenToClient(point);
+        }
+        ShowContextMenu(point);
+    }
+    else
+    {
+        // the user is editing:
+        // allow the text control to display its context menu
+        // if it has one (it has on Windows) rather than display our one
+        event.Skip();
+    }
 }
+#endif
 
+void MyListCtrl::ShowContextMenu(const wxPoint& pos)
+{
+    wxMenu menu;
+
+    menu.Append(wxID_ABOUT, _T("&About"));
+    menu.AppendSeparator();
+    menu.Append(wxID_EXIT, _T("E&xit"));
 
+    PopupMenu(&menu, pos.x, pos.y);
+}