samples/treectrl/treetest.cpp

   1 /////////////////////////////////////////////////////////////////////////////
   2 // Name:        treetest.cpp
   3 // Purpose:     wxTreeCtrl 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     #include "wx/log.h"
  22 #endif
  23
  24 #include "wx/colordlg.h"
  25 #include "wx/numdlg.h"
  26
  27 #include "wx/artprov.h"
  28 #include "wx/image.h"
  29 #include "wx/imaglist.h"
  30 #include "wx/treectrl.h"
  31 #include "wx/math.h"
  32 #include "wx/renderer.h"
  33
  34 #ifdef __WIN32__
  35     // this is not supported by native control
  36     #define NO_VARIABLE_HEIGHT
  37 #endif
  38
  39 #include "treetest.h"
  40
  41 #include "icon1.xpm"
  42 #include "icon2.xpm"
  43 #include "icon3.xpm"
  44 #include "icon4.xpm"
  45 #include "icon5.xpm"
  46
  47 #include "state1.xpm"
  48 #include "state2.xpm"
  49 #include "state3.xpm"
  50 #include "state4.xpm"
  51 #include "state5.xpm"
  52
  53 #ifndef __WXMSW__
  54     #include "../sample.xpm"
  55 #endif
  56
  57 // verify that the item is ok and insult the user if it is not
  58 #define CHECK_ITEM( item ) if ( !item.IsOk() ) {                                 \
  59                              wxMessageBox(wxT("Please select some item first!"), \
  60                                           wxT("Tree sample error"),              \
  61                                           wxOK | wxICON_EXCLAMATION,             \
  62                                           this);                                 \
  63                              return;                                             \
  64                            }
  65
  66 #define MENU_LINK(name) EVT_MENU(TreeTest_##name, MyFrame::On##name)
  67
  68 BEGIN_EVENT_TABLE(MyFrame, wxFrame)
  69     EVT_IDLE(MyFrame::OnIdle)
  70     EVT_SIZE(MyFrame::OnSize)
  71
  72     MENU_LINK(Quit)
  73     MENU_LINK(About)
  74     MENU_LINK(ClearLog)
  75
  76     MENU_LINK(TogButtons)
  77     MENU_LINK(TogTwist)
  78     MENU_LINK(TogLines)
  79     MENU_LINK(TogEdit)
  80     MENU_LINK(TogHideRoot)
  81     MENU_LINK(TogRootLines)
  82     MENU_LINK(TogBorder)
  83     MENU_LINK(TogFullHighlight)
  84     MENU_LINK(SetFgColour)
  85     MENU_LINK(SetBgColour)
  86     MENU_LINK(ResetStyle)
  87
  88     MENU_LINK(Highlight)
  89     MENU_LINK(Dump)
  90 #ifndef NO_MULTIPLE_SELECTION
  91     MENU_LINK(DumpSelected)
  92     MENU_LINK(Select)
  93     MENU_LINK(Unselect)
  94     MENU_LINK(ToggleSel)
  95 #endif // NO_MULTIPLE_SELECTION
  96     MENU_LINK(Rename)
  97     MENU_LINK(Count)
  98     MENU_LINK(CountRec)
  99     MENU_LINK(Sort)
 100     MENU_LINK(SortRev)
 101     MENU_LINK(SetBold)
 102     MENU_LINK(ClearBold)
 103     MENU_LINK(Delete)
 104     MENU_LINK(DeleteChildren)
 105     MENU_LINK(DeleteAll)
 106     MENU_LINK(Recreate)
 107     MENU_LINK(ToggleImages)
 108     MENU_LINK(ToggleStates)
 109     MENU_LINK(ToggleAlternateImages)
 110     MENU_LINK(ToggleAlternateStates)
 111     MENU_LINK(ToggleButtons)
 112     MENU_LINK(SetImageSize)
 113     MENU_LINK(CollapseAndReset)
 114     MENU_LINK(EnsureVisible)
 115     MENU_LINK(AddItem)
 116     MENU_LINK(InsertItem)
 117     MENU_LINK(IncIndent)
 118     MENU_LINK(DecIndent)
 119     MENU_LINK(IncSpacing)
 120     MENU_LINK(DecSpacing)
 121     MENU_LINK(ToggleIcon)
 122     MENU_LINK(ToggleState)
 123     MENU_LINK(SelectRoot)
 124
 125     MENU_LINK(ShowFirstVisible)
 126 #ifdef wxHAS_LAST_VISIBLE
 127     MENU_LINK(ShowLastVisible)
 128 #endif // wxHAS_LAST_VISIBLE
 129     MENU_LINK(ShowNextVisible)
 130     MENU_LINK(ShowPrevVisible)
 131     MENU_LINK(ShowParent)
 132     MENU_LINK(ShowPrevSibling)
 133     MENU_LINK(ShowNextSibling)
 134 #undef MENU_LINK
 135
 136 END_EVENT_TABLE()
 137
 138 #if USE_GENERIC_TREECTRL
 139 BEGIN_EVENT_TABLE(MyTreeCtrl, wxGenericTreeCtrl)
 140 #else
 141 BEGIN_EVENT_TABLE(MyTreeCtrl, wxTreeCtrl)
 142 #endif
 143     EVT_TREE_BEGIN_DRAG(TreeTest_Ctrl, MyTreeCtrl::OnBeginDrag)
 144     EVT_TREE_BEGIN_RDRAG(TreeTest_Ctrl, MyTreeCtrl::OnBeginRDrag)
 145     EVT_TREE_END_DRAG(TreeTest_Ctrl, MyTreeCtrl::OnEndDrag)
 146     EVT_TREE_BEGIN_LABEL_EDIT(TreeTest_Ctrl, MyTreeCtrl::OnBeginLabelEdit)
 147     EVT_TREE_END_LABEL_EDIT(TreeTest_Ctrl, MyTreeCtrl::OnEndLabelEdit)
 148     EVT_TREE_DELETE_ITEM(TreeTest_Ctrl, MyTreeCtrl::OnDeleteItem)
 149 #if 0       // there are so many of those that logging them causes flicker
 150     EVT_TREE_GET_INFO(TreeTest_Ctrl, MyTreeCtrl::OnGetInfo)
 151 #endif
 152     EVT_TREE_SET_INFO(TreeTest_Ctrl, MyTreeCtrl::OnSetInfo)
 153     EVT_TREE_ITEM_EXPANDED(TreeTest_Ctrl, MyTreeCtrl::OnItemExpanded)
 154     EVT_TREE_ITEM_EXPANDING(TreeTest_Ctrl, MyTreeCtrl::OnItemExpanding)
 155     EVT_TREE_ITEM_COLLAPSED(TreeTest_Ctrl, MyTreeCtrl::OnItemCollapsed)
 156     EVT_TREE_ITEM_COLLAPSING(TreeTest_Ctrl, MyTreeCtrl::OnItemCollapsing)
 157
 158     EVT_TREE_SEL_CHANGED(TreeTest_Ctrl, MyTreeCtrl::OnSelChanged)
 159     EVT_TREE_SEL_CHANGING(TreeTest_Ctrl, MyTreeCtrl::OnSelChanging)
 160     EVT_TREE_KEY_DOWN(TreeTest_Ctrl, MyTreeCtrl::OnTreeKeyDown)
 161     EVT_TREE_ITEM_ACTIVATED(TreeTest_Ctrl, MyTreeCtrl::OnItemActivated)
 162     EVT_TREE_STATE_IMAGE_CLICK(TreeTest_Ctrl, MyTreeCtrl::OnItemStateClick)
 163
 164     // so many different ways to handle right mouse button clicks...
 165     EVT_CONTEXT_MENU(MyTreeCtrl::OnContextMenu)
 166     // EVT_TREE_ITEM_MENU is the preferred event for creating context menus
 167     // on a tree control, because it includes the point of the click or item,
 168     // meaning that no additional placement calculations are required.
 169     EVT_TREE_ITEM_MENU(TreeTest_Ctrl, MyTreeCtrl::OnItemMenu)
 170     EVT_TREE_ITEM_RIGHT_CLICK(TreeTest_Ctrl, MyTreeCtrl::OnItemRClick)
 171
 172     EVT_RIGHT_DOWN(MyTreeCtrl::OnRMouseDown)
 173     EVT_RIGHT_UP(MyTreeCtrl::OnRMouseUp)
 174     EVT_RIGHT_DCLICK(MyTreeCtrl::OnRMouseDClick)
 175 END_EVENT_TABLE()
 176
 177 IMPLEMENT_APP(MyApp)
 178
 179 bool MyApp::OnInit()
 180 {
 181     if ( !wxApp::OnInit() )
 182         return false;
 183
 184     // Create the main frame window
 185     MyFrame *frame = new MyFrame(wxT("wxTreeCtrl Test"), 50, 50, 450, 600);
 186
 187     // Show the frame
 188     frame->Show(true);
 189     SetTopWindow(frame);
 190
 191     return true;
 192 }
 193
 194
 195 // My frame constructor
 196 MyFrame::MyFrame(const wxString& title, int x, int y, int w, int h)
 197        : wxFrame((wxFrame *)NULL, wxID_ANY, title, wxPoint(x, y), wxSize(w, h)),
 198          m_treeCtrl(NULL)
 199 #if wxUSE_LOG
 200          , m_textCtrl(NULL)
 201 #endif // wxUSE_LOG
 202 {
 203     // This reduces flicker effects - even better would be to define
 204     // OnEraseBackground to do nothing. When the tree control's scrollbars are
 205     // show or hidden, the frame is sent a background erase event.
 206     SetBackgroundColour(wxColour(255, 255, 255));
 207
 208     // Give it an icon
 209     SetIcon(wxICON(sample));
 210
 211 #if wxUSE_MENUS
 212     // Make a menubar
 213     wxMenu *file_menu = new wxMenu,
 214            *style_menu = new wxMenu,
 215            *tree_menu = new wxMenu,
 216            *item_menu = new wxMenu;
 217
 218     file_menu->Append(TreeTest_ClearLog, wxT("&Clear log\tCtrl-L"));
 219     file_menu->AppendSeparator();
 220     file_menu->Append(TreeTest_About, wxT("&About..."));
 221     file_menu->AppendSeparator();
 222     file_menu->Append(TreeTest_Quit, wxT("E&xit\tAlt-X"));
 223
 224     style_menu->AppendCheckItem(TreeTest_TogButtons, wxT("Toggle &normal buttons"));
 225     style_menu->AppendCheckItem(TreeTest_TogTwist, wxT("Toggle &twister buttons"));
 226     style_menu->AppendCheckItem(TreeTest_ToggleButtons, wxT("Toggle image &buttons"));
 227     style_menu->AppendSeparator();
 228     style_menu->AppendCheckItem(TreeTest_TogLines, wxT("Toggle &connecting lines"));
 229     style_menu->AppendCheckItem(TreeTest_TogRootLines, wxT("Toggle &lines at root"));
 230     style_menu->AppendCheckItem(TreeTest_TogHideRoot, wxT("Toggle &hidden root"));
 231     style_menu->AppendCheckItem(TreeTest_TogBorder, wxT("Toggle &item border"));
 232     style_menu->AppendCheckItem(TreeTest_TogFullHighlight, wxT("Toggle &full row highlight"));
 233     style_menu->AppendCheckItem(TreeTest_TogEdit, wxT("Toggle &edit mode"));
 234 #ifndef NO_MULTIPLE_SELECTION
 235     style_menu->AppendCheckItem(TreeTest_ToggleSel, wxT("Toggle &selection mode\tCtrl-S"));
 236 #endif // NO_MULTIPLE_SELECTION
 237     style_menu->AppendCheckItem(TreeTest_ToggleImages, wxT("Toggle show ima&ges"));
 238     style_menu->AppendCheckItem(TreeTest_ToggleStates, wxT("Toggle show st&ates"));
 239     style_menu->AppendCheckItem(TreeTest_ToggleAlternateImages, wxT("Toggle alternate images"));
 240     style_menu->AppendCheckItem(TreeTest_ToggleAlternateStates, wxT("Toggle alternate state images"));
 241     style_menu->Append(TreeTest_SetImageSize, wxT("Set image si&ze..."));
 242     style_menu->AppendSeparator();
 243     style_menu->Append(TreeTest_SetFgColour, wxT("Set &foreground colour..."));
 244     style_menu->Append(TreeTest_SetBgColour, wxT("Set &background colour..."));
 245     style_menu->AppendSeparator();
 246     style_menu->Append(TreeTest_ResetStyle, wxT("&Reset to default\tF10"));
 247
 248     tree_menu->Append(TreeTest_Recreate, wxT("&Recreate the tree"));
 249     tree_menu->Append(TreeTest_CollapseAndReset, wxT("C&ollapse and reset"));
 250     tree_menu->AppendSeparator();
 251     tree_menu->Append(TreeTest_AddItem, wxT("Append a &new item"));
 252     tree_menu->Append(TreeTest_InsertItem, wxT("&Insert a new item"));
 253     tree_menu->Append(TreeTest_Delete, wxT("&Delete this item"));
 254     tree_menu->Append(TreeTest_DeleteChildren, wxT("Delete &children"));
 255     tree_menu->Append(TreeTest_DeleteAll, wxT("Delete &all items"));
 256     tree_menu->Append(TreeTest_SelectRoot, wxT("Select root item"));
 257     tree_menu->AppendSeparator();
 258     tree_menu->Append(TreeTest_Count, wxT("Count children of current item"));
 259     tree_menu->Append(TreeTest_CountRec, wxT("Recursively count children of current item"));
 260     tree_menu->AppendSeparator();
 261     tree_menu->Append(TreeTest_Sort, wxT("Sort children of current item"));
 262     tree_menu->Append(TreeTest_SortRev, wxT("Sort in reversed order"));
 263     tree_menu->AppendSeparator();
 264     tree_menu->Append(TreeTest_EnsureVisible, wxT("Make the last item &visible"));
 265     tree_menu->AppendSeparator();
 266     tree_menu->Append(TreeTest_IncIndent, wxT("Add 5 points to indentation\tAlt-I"));
 267     tree_menu->Append(TreeTest_DecIndent, wxT("Reduce indentation by 5 points\tAlt-R"));
 268     tree_menu->AppendSeparator();
 269     tree_menu->Append(TreeTest_IncSpacing, wxT("Add 5 points to spacing\tCtrl-I"));
 270     tree_menu->Append(TreeTest_DecSpacing, wxT("Reduce spacing by 5 points\tCtrl-R"));
 271
 272     item_menu->Append(TreeTest_Dump, wxT("&Dump item children"));
 273     item_menu->Append(TreeTest_Rename, wxT("&Rename item..."));
 274
 275     item_menu->AppendSeparator();
 276     item_menu->Append(TreeTest_SetBold, wxT("Make item &bold"));
 277     item_menu->Append(TreeTest_ClearBold, wxT("Make item &not bold"));
 278     item_menu->AppendSeparator();
 279     item_menu->Append(TreeTest_ToggleIcon, wxT("Toggle the item's &icon"));
 280     item_menu->Append(TreeTest_ToggleState, wxT("Toggle the item's &state"));
 281     item_menu->AppendSeparator();
 282     item_menu->Append(TreeTest_ShowFirstVisible, wxT("Show &first visible"));
 283 #ifdef wxHAS_LAST_VISIBLE
 284     item_menu->Append(TreeTest_ShowLastVisible, wxT("Show &last visible"));
 285 #endif // wxHAS_LAST_VISIBLE
 286     item_menu->Append(TreeTest_ShowNextVisible, wxT("Show &next visible"));
 287     item_menu->Append(TreeTest_ShowPrevVisible, wxT("Show &previous visible"));
 288     item_menu->AppendSeparator();
 289     item_menu->Append(TreeTest_ShowParent, "Show pa&rent");
 290     item_menu->Append(TreeTest_ShowPrevSibling, "Show &previous sibling");
 291     item_menu->Append(TreeTest_ShowNextSibling, "Show &next sibling");
 292
 293 #ifndef NO_MULTIPLE_SELECTION
 294     item_menu->AppendSeparator();
 295     item_menu->Append(TreeTest_DumpSelected, wxT("Dump selected items\tAlt-D"));
 296     item_menu->Append(TreeTest_Select, wxT("Select current item\tAlt-S"));
 297     item_menu->Append(TreeTest_Unselect, wxT("Unselect everything\tAlt-U"));
 298 #endif // NO_MULTIPLE_SELECTION
 299
 300     wxMenuBar *menu_bar = new wxMenuBar;
 301     menu_bar->Append(file_menu, wxT("&File"));
 302     menu_bar->Append(style_menu, wxT("&Style"));
 303     menu_bar->Append(tree_menu, wxT("&Tree"));
 304     menu_bar->Append(item_menu, wxT("&Item"));
 305     SetMenuBar(menu_bar);
 306 #endif // wxUSE_MENUS
 307
 308     m_panel = new wxPanel(this);
 309
 310 #if wxUSE_LOG
 311     // create the controls
 312     m_textCtrl = new wxTextCtrl(m_panel, wxID_ANY, wxT(""),
 313                                 wxDefaultPosition, wxDefaultSize,
 314                                 wxTE_MULTILINE | wxSUNKEN_BORDER);
 315 #endif // wxUSE_LOG
 316
 317     CreateTreeWithDefStyle();
 318
 319     menu_bar->Check(TreeTest_ToggleImages, true);
 320     menu_bar->Check(TreeTest_ToggleStates, true);
 321     menu_bar->Check(TreeTest_ToggleAlternateImages, false);
 322     menu_bar->Check(TreeTest_ToggleAlternateStates, false);
 323
 324 #if wxUSE_STATUSBAR
 325     // create a status bar
 326     CreateStatusBar(2);
 327 #endif // wxUSE_STATUSBAR
 328
 329 #if wxUSE_LOG
 330 #ifdef __WXMOTIF__
 331     // For some reason, we get a memcpy crash in wxLogStream::DoLogStream
 332     // on gcc/wxMotif, if we use wxLogTextCtl. Maybe it's just gcc?
 333     delete wxLog::SetActiveTarget(new wxLogStderr);
 334 #else
 335     // set our text control as the log target
 336     wxLogTextCtrl *logWindow = new wxLogTextCtrl(m_textCtrl);
 337     delete wxLog::SetActiveTarget(logWindow);
 338 #endif
 339 #endif // wxUSE_LOG
 340 }
 341
 342 MyFrame::~MyFrame()
 343 {
 344 #if wxUSE_LOG
 345     delete wxLog::SetActiveTarget(NULL);
 346 #endif // wxUSE_LOG
 347 }
 348
 349 void MyFrame::CreateTreeWithDefStyle()
 350 {
 351     long style = wxTR_DEFAULT_STYLE |
 352 #ifndef NO_VARIABLE_HEIGHT
 353                  wxTR_HAS_VARIABLE_ROW_HEIGHT |
 354 #endif
 355                  wxTR_EDIT_LABELS;
 356
 357     CreateTree(style | wxSUNKEN_BORDER);
 358
 359     // as we don't know what wxTR_DEFAULT_STYLE could contain, test for
 360     // everything
 361     wxMenuBar *mbar = GetMenuBar();
 362     mbar->Check(TreeTest_TogButtons, (style & wxTR_HAS_BUTTONS) != 0);
 363     mbar->Check(TreeTest_TogButtons, (style & wxTR_TWIST_BUTTONS) != 0);
 364     mbar->Check(TreeTest_TogLines, (style & wxTR_NO_LINES) == 0);
 365     mbar->Check(TreeTest_TogRootLines, (style & wxTR_LINES_AT_ROOT) != 0);
 366     mbar->Check(TreeTest_TogHideRoot, (style & wxTR_HIDE_ROOT) != 0);
 367     mbar->Check(TreeTest_TogEdit, (style & wxTR_EDIT_LABELS) != 0);
 368     mbar->Check(TreeTest_TogBorder, (style & wxTR_ROW_LINES) != 0);
 369     mbar->Check(TreeTest_TogFullHighlight, (style & wxTR_FULL_ROW_HIGHLIGHT) != 0);
 370 }
 371
 372 void MyFrame::CreateTree(long style)
 373 {
 374     m_treeCtrl = new MyTreeCtrl(m_panel, TreeTest_Ctrl,
 375                                 wxDefaultPosition, wxDefaultSize,
 376                                 style);
 377
 378     GetMenuBar()->Enable(TreeTest_SelectRoot, !(style & wxTR_HIDE_ROOT));
 379
 380     Resize();
 381 }
 382
 383 void MyFrame::TogStyle(int id, long flag)
 384 {
 385     long style = m_treeCtrl->GetWindowStyle() ^ flag;
 386
 387     // most treectrl styles can't be changed on the fly using the native
 388     // control and the tree must be recreated
 389 #ifndef __WXMSW__
 390     m_treeCtrl->SetWindowStyle(style);
 391 #else // MSW
 392     delete m_treeCtrl;
 393     CreateTree(style);
 394 #endif // !MSW/MSW
 395
 396     GetMenuBar()->Check(id, (style & flag) != 0);
 397 }
 398
 399 void MyFrame::OnIdle(wxIdleEvent& event)
 400 {
 401 #if wxUSE_STATUSBAR
 402     if ( m_treeCtrl )
 403     {
 404         wxTreeItemId idRoot = m_treeCtrl->GetRootItem();
 405         wxString status;
 406         if (idRoot.IsOk())
 407         {
 408             wxTreeItemId idLast = m_treeCtrl->GetLastChild(idRoot);
 409             status = wxString::Format(
 410                 _T("Root/last item is %svisible/%svisible"),
 411                 m_treeCtrl->IsVisible(idRoot) ? _T("") : _T("not "),
 412                 idLast.IsOk() && m_treeCtrl->IsVisible(idLast)
 413                     ? _T("") : _T("not "));
 414         }
 415         else
 416             status = _T("No root item");
 417
 418         SetStatusText(status, 1);
 419     }
 420 #endif // wxUSE_STATUSBAR
 421
 422     event.Skip();
 423 }
 424
 425 void MyFrame::OnSize(wxSizeEvent& event)
 426 {
 427     if ( m_treeCtrl
 428 #if wxUSE_LOG
 429                     && m_textCtrl
 430 #endif // wxUSE_LOG
 431                                   )
 432     {
 433         Resize();
 434     }
 435
 436     event.Skip();
 437 }
 438
 439 void MyFrame::Resize()
 440 {
 441     wxSize size = GetClientSize();
 442     m_treeCtrl->SetSize(0, 0, size.x, size.y
 443 #if wxUSE_LOG
 444                                             *2/3);
 445     m_textCtrl->SetSize(0, 2*size.y/3, size.x, size.y/3
 446 #endif
 447     );
 448 }
 449
 450 void MyFrame::OnQuit(wxCommandEvent& WXUNUSED(event))
 451 {
 452     Close(true);
 453 }
 454
 455 void MyFrame::OnAbout(wxCommandEvent& WXUNUSED(event))
 456 {
 457     wxMessageBox(wxT("Tree test sample\n")
 458                  wxT("(c) Julian Smart 1997, Vadim Zeitlin 1998"),
 459                  wxT("About tree test"),
 460                  wxOK | wxICON_INFORMATION, this);
 461 }
 462
 463 void MyFrame::OnClearLog(wxCommandEvent& WXUNUSED(event))
 464 {
 465     m_textCtrl->Clear();
 466 }
 467
 468 void MyFrame::OnRename(wxCommandEvent& WXUNUSED(event))
 469 {
 470     wxTreeItemId item = m_treeCtrl->GetSelection();
 471
 472     CHECK_ITEM( item );
 473
 474     // old code - now we edit in place
 475 #if 0
 476     static wxString s_text;
 477     s_text = wxGetTextFromUser(wxT("New name: "), wxT("Tree sample question"),
 478             s_text, this);
 479     if ( !s_text.empty() )
 480     {
 481         m_treeCtrl->SetItemText(item, s_text);
 482     }
 483 #endif // 0
 484
 485     // TODO demonstrate creating a custom edit control...
 486     (void)m_treeCtrl->EditLabel(item);
 487 }
 488
 489 void MyFrame::OnCount(wxCommandEvent& WXUNUSED(event))
 490 {
 491     wxTreeItemId item = m_treeCtrl->GetSelection();
 492
 493     CHECK_ITEM( item );
 494
 495     int i = m_treeCtrl->GetChildrenCount( item, false );
 496
 497     wxLogMessage(wxT("%d children"), i);
 498 }
 499
 500 void MyFrame::OnCountRec(wxCommandEvent& WXUNUSED(event))
 501 {
 502     wxTreeItemId item = m_treeCtrl->GetSelection();
 503
 504     CHECK_ITEM( item );
 505
 506     int i = m_treeCtrl->GetChildrenCount( item );
 507
 508     wxLogMessage(wxT("%d children"), i);
 509 }
 510
 511 void MyFrame::DoSort(bool reverse)
 512 {
 513     wxTreeItemId item = m_treeCtrl->GetSelection();
 514
 515     CHECK_ITEM( item );
 516
 517     m_treeCtrl->DoSortChildren(item, reverse);
 518 }
 519
 520 void MyFrame::OnHighlight(wxCommandEvent& WXUNUSED(event))
 521 {
 522     wxTreeItemId id = m_treeCtrl->GetSelection();
 523
 524     CHECK_ITEM( id );
 525
 526     wxRect r;
 527     if ( !m_treeCtrl->GetBoundingRect(id, r, true /* text, not full row */) )
 528     {
 529         wxLogMessage(_T("Failed to get bounding item rect"));
 530         return;
 531     }
 532
 533     wxClientDC dc(m_treeCtrl);
 534     dc.SetBrush(*wxRED);
 535     dc.SetPen(*wxTRANSPARENT_PEN);
 536     dc.DrawRectangle(r);
 537     m_treeCtrl->Update();
 538 }
 539
 540 void MyFrame::OnDump(wxCommandEvent& WXUNUSED(event))
 541 {
 542     wxTreeItemId root = m_treeCtrl->GetSelection();
 543
 544     CHECK_ITEM( root );
 545
 546     m_treeCtrl->GetItemsRecursively(root);
 547 }
 548
 549 #ifndef NO_MULTIPLE_SELECTION
 550
 551 void MyFrame::OnToggleSel(wxCommandEvent& event)
 552 {
 553     TogStyle(event.GetId(), wxTR_MULTIPLE);
 554 }
 555
 556 void MyFrame::OnDumpSelected(wxCommandEvent& WXUNUSED(event))
 557 {
 558     wxArrayTreeItemIds array;
 559
 560     size_t count = m_treeCtrl->GetSelections(array);
 561     wxLogMessage(wxT("%u items selected"), unsigned(count));
 562
 563     for ( size_t n = 0; n < count; n++ )
 564     {
 565         wxLogMessage(wxT("\t%s"), m_treeCtrl->GetItemText(array.Item(n)).c_str());
 566     }
 567 }
 568
 569 void MyFrame::OnSelect(wxCommandEvent& WXUNUSED(event))
 570 {
 571     m_treeCtrl->SelectItem(m_treeCtrl->GetSelection());
 572 }
 573
 574 void MyFrame::OnSelectRoot(wxCommandEvent& WXUNUSED(event))
 575 {
 576     if ( !m_treeCtrl->HasFlag(wxTR_HIDE_ROOT) )
 577         m_treeCtrl->SelectItem(m_treeCtrl->GetRootItem());
 578 }
 579
 580 void MyFrame::OnUnselect(wxCommandEvent& WXUNUSED(event))
 581 {
 582     m_treeCtrl->UnselectAll();
 583 }
 584
 585 #endif // NO_MULTIPLE_SELECTION
 586
 587 void MyFrame::DoSetBold(bool bold)
 588 {
 589     wxTreeItemId item = m_treeCtrl->GetSelection();
 590
 591     CHECK_ITEM( item );
 592
 593     m_treeCtrl->SetItemBold(item, bold);
 594 }
 595
 596 void MyFrame::OnDelete(wxCommandEvent& WXUNUSED(event))
 597 {
 598     wxTreeItemId item = m_treeCtrl->GetSelection();
 599
 600     CHECK_ITEM( item );
 601
 602     m_treeCtrl->Delete(item);
 603 }
 604
 605 void MyFrame::OnDeleteChildren(wxCommandEvent& WXUNUSED(event))
 606 {
 607     wxTreeItemId item = m_treeCtrl->GetSelection();
 608
 609     CHECK_ITEM( item );
 610
 611     m_treeCtrl->DeleteChildren(item);
 612 }
 613
 614 void MyFrame::OnDeleteAll(wxCommandEvent& WXUNUSED(event))
 615 {
 616     m_treeCtrl->DeleteAllItems();
 617 }
 618
 619 void MyFrame::OnRecreate(wxCommandEvent& event)
 620 {
 621     OnDeleteAll(event);
 622     m_treeCtrl->AddTestItemsToTree(5, 2);
 623 }
 624
 625 void MyFrame::OnSetImageSize(wxCommandEvent& WXUNUSED(event))
 626 {
 627     int size = wxGetNumberFromUser(wxT("Enter the size for the images to use"),
 628                                     wxT("Size: "),
 629                                     wxT("TreeCtrl sample"),
 630                                     m_treeCtrl->ImageSize());
 631     if ( size == -1 )
 632         return;
 633
 634     m_treeCtrl->CreateImageList(size);
 635     wxGetApp().SetShowImages(true);
 636 }
 637
 638 void MyFrame::OnToggleImages(wxCommandEvent& WXUNUSED(event))
 639 {
 640     if ( wxGetApp().ShowImages() )
 641     {
 642         m_treeCtrl->CreateImageList(-1);
 643         wxGetApp().SetShowImages(false);
 644     }
 645     else
 646     {
 647         m_treeCtrl->CreateImageList(0);
 648         wxGetApp().SetShowImages(true);
 649     }
 650 }
 651
 652 void MyFrame::OnToggleStates(wxCommandEvent& WXUNUSED(event))
 653 {
 654     if ( wxGetApp().ShowStates() )
 655     {
 656         m_treeCtrl->CreateStateImageList(true);
 657         wxGetApp().SetShowStates(false);
 658     }
 659     else
 660     {
 661         m_treeCtrl->CreateStateImageList(false);
 662         wxGetApp().SetShowStates(true);
 663     }
 664 }
 665
 666 void MyFrame::OnToggleAlternateImages(wxCommandEvent& WXUNUSED(event))
 667 {
 668     bool alternateImages = m_treeCtrl->AlternateImages();
 669
 670     m_treeCtrl->SetAlternateImages(!alternateImages);
 671     m_treeCtrl->CreateImageList(0);
 672 }
 673
 674 void MyFrame::OnToggleAlternateStates(wxCommandEvent& WXUNUSED(event))
 675 {
 676     bool alternateStates = m_treeCtrl->AlternateStates();
 677
 678     m_treeCtrl->SetAlternateStates(!alternateStates);
 679     m_treeCtrl->CreateStateImageList();
 680 }
 681
 682 void MyFrame::OnToggleButtons(wxCommandEvent& WXUNUSED(event))
 683 {
 684 #if USE_GENERIC_TREECTRL || !defined(__WXMSW__)
 685     if ( wxGetApp().ShowButtons() )
 686     {
 687         m_treeCtrl->CreateButtonsImageList(-1);
 688         wxGetApp().SetShowButtons(false);
 689     }
 690     else
 691     {
 692         m_treeCtrl->CreateButtonsImageList(15);
 693         wxGetApp().SetShowButtons(true);
 694     }
 695 #endif
 696 }
 697
 698 void MyFrame::OnCollapseAndReset(wxCommandEvent& WXUNUSED(event))
 699 {
 700     m_treeCtrl->CollapseAndReset(m_treeCtrl->GetRootItem());
 701 }
 702
 703 void MyFrame::OnEnsureVisible(wxCommandEvent& WXUNUSED(event))
 704 {
 705     m_treeCtrl->DoEnsureVisible();
 706 }
 707
 708 void MyFrame::OnInsertItem(wxCommandEvent& WXUNUSED(event))
 709 {
 710     int image = wxGetApp().ShowImages() ? MyTreeCtrl::TreeCtrlIcon_File : -1;
 711     m_treeCtrl->InsertItem(m_treeCtrl->GetRootItem(), image, wxT("2nd item"));
 712 }
 713
 714 void MyFrame::OnAddItem(wxCommandEvent& WXUNUSED(event))
 715 {
 716     static int s_num = 0;
 717
 718     wxString text;
 719     text.Printf(wxT("Item #%d"), ++s_num);
 720
 721     m_treeCtrl->AppendItem(m_treeCtrl->GetRootItem(),
 722                            text /*,
 723                            MyTreeCtrl::TreeCtrlIcon_File */ );
 724 }
 725
 726 void MyFrame::OnIncIndent(wxCommandEvent& WXUNUSED(event))
 727 {
 728     unsigned int indent = m_treeCtrl->GetIndent();
 729     if (indent < 100)
 730         m_treeCtrl->SetIndent( indent+5 );
 731 }
 732
 733 void MyFrame::OnDecIndent(wxCommandEvent& WXUNUSED(event))
 734 {
 735     unsigned int indent = m_treeCtrl->GetIndent();
 736     if (indent > 10)
 737         m_treeCtrl->SetIndent( indent-5 );
 738 }
 739
 740 void MyFrame::OnIncSpacing(wxCommandEvent& WXUNUSED(event))
 741 {
 742     unsigned int indent = m_treeCtrl->GetSpacing();
 743     if (indent < 100)
 744         m_treeCtrl->SetSpacing( indent+5 );
 745 }
 746
 747 void MyFrame::OnDecSpacing(wxCommandEvent& WXUNUSED(event))
 748 {
 749     unsigned int indent = m_treeCtrl->GetSpacing();
 750     if (indent > 10)
 751         m_treeCtrl->SetSpacing( indent-5 );
 752 }
 753
 754 void MyFrame::OnToggleIcon(wxCommandEvent& WXUNUSED(event))
 755 {
 756     wxTreeItemId item = m_treeCtrl->GetSelection();
 757
 758     CHECK_ITEM( item );
 759
 760     m_treeCtrl->DoToggleIcon(item);
 761 }
 762
 763 void MyFrame::OnToggleState(wxCommandEvent& WXUNUSED(event))
 764 {
 765     wxTreeItemId item = m_treeCtrl->GetSelection();
 766
 767     CHECK_ITEM( item );
 768
 769     m_treeCtrl->DoToggleState(item);
 770 }
 771
 772 void MyFrame::DoShowFirstOrLast(TreeFunc0_t pfn, const wxString& label)
 773 {
 774     const wxTreeItemId item = (m_treeCtrl->*pfn)();
 775
 776     if ( !item.IsOk() )
 777         wxLogMessage("There is no %s item", label);
 778     else
 779         wxLogMessage("The %s item is \"%s\"",
 780                      label, m_treeCtrl->GetItemText(item));
 781 }
 782
 783 void MyFrame::DoShowRelativeItem(TreeFunc1_t pfn, const wxString& label)
 784 {
 785     wxTreeItemId item = m_treeCtrl->GetSelection();
 786
 787     CHECK_ITEM( item );
 788
 789     if ((pfn == (TreeFunc1_t) &wxTreeCtrl::GetPrevVisible
 790          || pfn == (TreeFunc1_t) &wxTreeCtrl::GetNextVisible)
 791         && !m_treeCtrl->IsVisible(item))
 792     {
 793         wxLogMessage("The selected item must be visible.");
 794         return;
 795     }
 796
 797     wxTreeItemId new_item = (m_treeCtrl->*pfn)(item);
 798
 799     if ( !new_item.IsOk() )
 800         wxLogMessage("There is no %s item", label);
 801     else
 802         wxLogMessage("The %s item is \"%s\"",
 803                      label, m_treeCtrl->GetItemText(new_item));
 804 }
 805
 806 void MyFrame::OnSetFgColour(wxCommandEvent& WXUNUSED(event))
 807 {
 808     wxColour col = wxGetColourFromUser(this, m_treeCtrl->GetForegroundColour());
 809     if ( col.Ok() )
 810         m_treeCtrl->SetForegroundColour(col);
 811 }
 812
 813 void MyFrame::OnSetBgColour(wxCommandEvent& WXUNUSED(event))
 814 {
 815     wxColour col = wxGetColourFromUser(this, m_treeCtrl->GetBackgroundColour());
 816     if ( col.Ok() )
 817         m_treeCtrl->SetBackgroundColour(col);
 818 }
 819
 820 // MyTreeCtrl implementation
 821 #if USE_GENERIC_TREECTRL
 822 IMPLEMENT_DYNAMIC_CLASS(MyTreeCtrl, wxGenericTreeCtrl)
 823 #else
 824 IMPLEMENT_DYNAMIC_CLASS(MyTreeCtrl, wxTreeCtrl)
 825 #endif
 826
 827 MyTreeCtrl::MyTreeCtrl(wxWindow *parent, const wxWindowID id,
 828                        const wxPoint& pos, const wxSize& size,
 829                        long style)
 830           : wxTreeCtrl(parent, id, pos, size, style),
 831             m_alternateImages(false),
 832             m_alternateStates(false)
 833 {
 834     m_reverseSort = false;
 835
 836     CreateImageList();
 837     CreateStateImageList();
 838
 839     // Add some items to the tree
 840     AddTestItemsToTree(5, 2);
 841 }
 842
 843 void MyTreeCtrl::CreateImageList(int size)
 844 {
 845     if ( size == -1 )
 846     {
 847         SetImageList(NULL);
 848         return;
 849     }
 850     if ( size == 0 )
 851         size = m_imageSize;
 852     else
 853         m_imageSize = size;
 854
 855     // Make an image list containing small icons
 856     wxImageList *images = new wxImageList(size, size, true);
 857
 858     // should correspond to TreeCtrlIcon_xxx enum
 859     wxBusyCursor wait;
 860     wxIcon icons[5];
 861
 862     if (m_alternateImages)
 863     {
 864         icons[TreeCtrlIcon_File] = wxIcon(icon1_xpm);
 865         icons[TreeCtrlIcon_FileSelected] = wxIcon(icon2_xpm);
 866         icons[TreeCtrlIcon_Folder] = wxIcon(icon3_xpm);
 867         icons[TreeCtrlIcon_FolderSelected] = wxIcon(icon4_xpm);
 868         icons[TreeCtrlIcon_FolderOpened] = wxIcon(icon5_xpm);
 869     }
 870     else
 871     {
 872         wxSize iconSize(size, size);
 873
 874         icons[TreeCtrlIcon_File] =
 875         icons[TreeCtrlIcon_FileSelected] = wxArtProvider::GetIcon(wxART_NORMAL_FILE, wxART_LIST, iconSize);
 876         icons[TreeCtrlIcon_Folder] =
 877         icons[TreeCtrlIcon_FolderSelected] =
 878         icons[TreeCtrlIcon_FolderOpened] = wxArtProvider::GetIcon(wxART_FOLDER, wxART_LIST, iconSize);
 879     }
 880
 881     for ( size_t i = 0; i < WXSIZEOF(icons); i++ )
 882     {
 883         int sizeOrig = icons[0].GetWidth();
 884         if ( size == sizeOrig )
 885         {
 886             images->Add(icons[i]);
 887         }
 888         else
 889         {
 890             images->Add(wxBitmap(wxBitmap(icons[i]).ConvertToImage().Rescale(size, size)));
 891         }
 892     }
 893
 894     AssignImageList(images);
 895 }
 896
 897 void MyTreeCtrl::CreateStateImageList(bool del)
 898 {
 899     if ( del )
 900     {
 901         SetStateImageList(NULL);
 902         return;
 903     }
 904
 905     wxImageList *states;
 906     wxBusyCursor wait;
 907
 908     if (m_alternateStates)
 909     {
 910         wxIcon icons[5];
 911         icons[0] = wxIcon(state1_xpm);  // yellow
 912         icons[1] = wxIcon(state2_xpm);  // green
 913         icons[2] = wxIcon(state3_xpm);  // red
 914         icons[3] = wxIcon(state4_xpm);  // blue
 915         icons[4] = wxIcon(state5_xpm);  // black
 916
 917         int width  = icons[0].GetWidth(),
 918             height = icons[0].GetHeight();
 919
 920         // Make an state image list containing small icons
 921         states = new wxImageList(width, height, true);
 922
 923         for ( size_t i = 0; i < WXSIZEOF(icons); i++ )
 924             states->Add(icons[i]);
 925     }
 926     else
 927     {
 928 #if 0
 929         int width  = ::GetSystemMetrics(SM_CXMENUCHECK),
 930             height = ::GetSystemMetrics(SM_CYMENUCHECK);
 931 #else
 932         int width = 16;
 933         int height = 16;
 934 #endif
 935
 936         // make an state checkbox image list
 937         states = new wxImageList(width, height, true);
 938
 939         wxBitmap checkBmp(width, height);
 940         wxRect rect (0, 0, width, height);
 941
 942         wxRendererNative& renderer = wxRendererNative::Get();
 943
 944         // create no checked image
 945         {
 946             // first create bitmap in a memory DC
 947             wxMemoryDC memDC(checkBmp);
 948             memDC.Clear();
 949             // then draw a check mark into it
 950             renderer.DrawCheckBox(this, memDC, rect, 0);
 951         } // select checkBmp out of memDC
 952
 953         states->Add(checkBmp);
 954
 955         // create checked image
 956         {
 957             wxMemoryDC memDC(checkBmp);
 958             renderer.DrawCheckBox(this, memDC, rect, wxCONTROL_CHECKED);
 959         }
 960
 961         states->Add(checkBmp);
 962     }
 963
 964     AssignStateImageList(states);
 965 }
 966
 967 #if USE_GENERIC_TREECTRL || !defined(__WXMSW__)
 968 void MyTreeCtrl::CreateButtonsImageList(int size)
 969 {
 970     if ( size == -1 )
 971     {
 972         SetButtonsImageList(NULL);
 973         return;
 974     }
 975
 976     // Make an image list containing small icons
 977     wxImageList *images = new wxImageList(size, size, true);
 978
 979     // should correspond to TreeCtrlIcon_xxx enum
 980     wxBusyCursor wait;
 981     wxIcon icons[4];
 982
 983     if (m_alternateImages)
 984     {
 985         icons[0] = wxIcon(icon3_xpm);   // closed
 986         icons[1] = wxIcon(icon3_xpm);   // closed, selected
 987         icons[2] = wxIcon(icon5_xpm);   // open
 988         icons[3] = wxIcon(icon5_xpm);   // open, selected
 989     }
 990     else
 991     {
 992         wxSize iconSize(size, size);
 993
 994         icons[0] =                                                                 // closed
 995         icons[1] = wxArtProvider::GetIcon(wxART_FOLDER, wxART_LIST, iconSize);     // closed, selected
 996         icons[2] =                                                                 // open
 997         icons[3] = wxArtProvider::GetIcon(wxART_FOLDER_OPEN, wxART_LIST, iconSize);// open, selected
 998     }
 999
1000    for ( size_t i = 0; i < WXSIZEOF(icons); i++ )
1001     {
1002         int sizeOrig = icons[i].GetWidth();
1003         if ( size == sizeOrig )
1004         {
1005             images->Add(icons[i]);
1006         }
1007         else
1008         {
1009             images->Add(wxBitmap(wxBitmap(icons[i]).ConvertToImage().Rescale(size, size)));
1010         }
1011     }
1012
1013     AssignButtonsImageList(images);
1014 #else
1015 void MyTreeCtrl::CreateButtonsImageList(int WXUNUSED(size))
1016 {
1017 #endif
1018 }
1019
1020 int MyTreeCtrl::OnCompareItems(const wxTreeItemId& item1,
1021                                const wxTreeItemId& item2)
1022 {
1023     if ( m_reverseSort )
1024     {
1025         // just exchange 1st and 2nd items
1026         return wxTreeCtrl::OnCompareItems(item2, item1);
1027     }
1028     else
1029     {
1030         return wxTreeCtrl::OnCompareItems(item1, item2);
1031     }
1032 }
1033
1034 void MyTreeCtrl::AddItemsRecursively(const wxTreeItemId& idParent,
1035                                      size_t numChildren,
1036                                      size_t depth,
1037                                      size_t folder)
1038 {
1039     if ( depth > 0 )
1040     {
1041         bool hasChildren = depth > 1;
1042
1043         wxString str;
1044         for ( size_t n = 0; n < numChildren; n++ )
1045         {
1046             // at depth 1 elements won't have any more children
1047             if ( hasChildren )
1048                 str.Printf(wxT("%s child %u"), wxT("Folder"), unsigned(n + 1));
1049             else
1050                 str.Printf(wxT("%s child %u.%u"), wxT("File"), unsigned(folder), unsigned(n + 1));
1051
1052             // here we pass to AppendItem() normal and selected item images (we
1053             // suppose that selected image follows the normal one in the enum)
1054             int image, imageSel;
1055             if ( wxGetApp().ShowImages() )
1056             {
1057                 image = depth == 1 ? TreeCtrlIcon_File : TreeCtrlIcon_Folder;
1058                 imageSel = image + 1;
1059             }
1060             else
1061             {
1062                 image = imageSel = -1;
1063             }
1064             wxTreeItemId id = AppendItem(idParent, str, image, imageSel,
1065                                          new MyTreeItemData(str));
1066
1067             if ( wxGetApp().ShowStates() )
1068                 SetItemState(id, 0);
1069
1070             // and now we also set the expanded one (only for the folders)
1071             if ( hasChildren && wxGetApp().ShowImages() )
1072             {
1073                 SetItemImage(id, TreeCtrlIcon_FolderOpened,
1074                              wxTreeItemIcon_Expanded);
1075             }
1076
1077             // remember the last child for OnEnsureVisible()
1078             if ( !hasChildren && n == numChildren - 1 )
1079             {
1080                 m_lastItem = id;
1081             }
1082
1083             AddItemsRecursively(id, numChildren, depth - 1, n + 1);
1084         }
1085     }
1086     //else: done!
1087 }
1088
1089 void MyTreeCtrl::AddTestItemsToTree(size_t numChildren,
1090                                     size_t depth)
1091 {
1092     int image = wxGetApp().ShowImages() ? MyTreeCtrl::TreeCtrlIcon_Folder : -1;
1093     wxTreeItemId rootId = AddRoot(wxT("Root"),
1094                                   image, image,
1095                                   new MyTreeItemData(wxT("Root item")));
1096     if ( !HasFlag(wxTR_HIDE_ROOT) && image != -1 )
1097     {
1098         SetItemImage(rootId, TreeCtrlIcon_FolderOpened, wxTreeItemIcon_Expanded);
1099     }
1100
1101     AddItemsRecursively(rootId, numChildren, depth, 0);
1102
1103     // set some colours/fonts for testing
1104     if ( !HasFlag(wxTR_HIDE_ROOT) )
1105         SetItemFont(rootId, *wxITALIC_FONT);
1106
1107     wxTreeItemIdValue cookie;
1108     wxTreeItemId id = GetFirstChild(rootId, cookie);
1109     SetItemTextColour(id, *wxBLUE);
1110
1111     id = GetNextChild(rootId, cookie);
1112     id = GetNextChild(rootId, cookie);
1113     SetItemTextColour(id, *wxRED);
1114     SetItemBackgroundColour(id, *wxLIGHT_GREY);
1115 }
1116
1117 void MyTreeCtrl::GetItemsRecursively(const wxTreeItemId& idParent,
1118                                      wxTreeItemIdValue cookie)
1119 {
1120     wxTreeItemId id;
1121
1122     if ( !cookie )
1123         id = GetFirstChild(idParent, cookie);
1124     else
1125         id = GetNextChild(idParent, cookie);
1126
1127     if ( !id.IsOk() )
1128         return;
1129
1130     wxString text = GetItemText(id);
1131     wxLogMessage(text);
1132
1133     if (ItemHasChildren(id))
1134         GetItemsRecursively(id);
1135
1136     GetItemsRecursively(idParent, cookie);
1137 }
1138
1139 void MyTreeCtrl::DoToggleIcon(const wxTreeItemId& item)
1140 {
1141     int image = GetItemImage(item) == TreeCtrlIcon_Folder
1142                     ? TreeCtrlIcon_File
1143                     : TreeCtrlIcon_Folder;
1144     SetItemImage(item, image, wxTreeItemIcon_Normal);
1145
1146     image = GetItemImage(item, wxTreeItemIcon_Selected) == TreeCtrlIcon_FolderSelected
1147                     ? TreeCtrlIcon_FileSelected
1148                     : TreeCtrlIcon_FolderSelected;
1149     SetItemImage(item, image, wxTreeItemIcon_Selected);
1150 }
1151
1152 void MyTreeCtrl::DoToggleState(const wxTreeItemId& item)
1153 {
1154     if ( m_alternateStates )
1155     {
1156         // sets random state unlike current
1157         int state = GetItemState(item);
1158         int nState;
1159
1160         srand (time(NULL));
1161         do {
1162             nState = rand() % GetStateImageList()->GetImageCount();
1163         } while (nState == state);
1164
1165         SetItemState(item, nState);
1166     }
1167     else
1168     {
1169         // we have only 2 checkbox states, so next state will be reversed
1170         SetItemState(item, wxTREE_ITEMSTATE_NEXT);
1171     }
1172 }
1173
1174 void MyTreeCtrl::LogEvent(const wxChar *name, const wxTreeEvent& event)
1175 {
1176     wxTreeItemId item = event.GetItem();
1177     wxString text;
1178     if ( item.IsOk() )
1179         text << _T('"') << GetItemText(item).c_str() << _T('"');
1180     else
1181         text = _T("invalid item");
1182     wxLogMessage(wxT("%s(%s)"), name, text.c_str());
1183 }
1184
1185 // avoid repetition
1186 #define TREE_EVENT_HANDLER(name)                                 \
1187 void MyTreeCtrl::name(wxTreeEvent& event)                        \
1188 {                                                                \
1189     LogEvent(_T(#name), event);                                  \
1190     SetLastItem(wxTreeItemId());                                 \
1191     event.Skip();                                                \
1192 }
1193
1194 TREE_EVENT_HANDLER(OnBeginRDrag)
1195 TREE_EVENT_HANDLER(OnDeleteItem)
1196 TREE_EVENT_HANDLER(OnGetInfo)
1197 TREE_EVENT_HANDLER(OnSetInfo)
1198 TREE_EVENT_HANDLER(OnItemExpanded)
1199 TREE_EVENT_HANDLER(OnItemExpanding)
1200 TREE_EVENT_HANDLER(OnItemCollapsed)
1201 TREE_EVENT_HANDLER(OnSelChanged)
1202 TREE_EVENT_HANDLER(OnSelChanging)
1203
1204 #undef TREE_EVENT_HANDLER
1205
1206 void LogKeyEvent(const wxChar *name, const wxKeyEvent& event)
1207 {
1208     wxString key;
1209     long keycode = event.GetKeyCode();
1210     {
1211         switch ( keycode )
1212         {
1213             case WXK_BACK: key = wxT("BACK"); break;
1214             case WXK_TAB: key = wxT("TAB"); break;
1215             case WXK_RETURN: key = wxT("RETURN"); break;
1216             case WXK_ESCAPE: key = wxT("ESCAPE"); break;
1217             case WXK_SPACE: key = wxT("SPACE"); break;
1218             case WXK_DELETE: key = wxT("DELETE"); break;
1219             case WXK_START: key = wxT("START"); break;
1220             case WXK_LBUTTON: key = wxT("LBUTTON"); break;
1221             case WXK_RBUTTON: key = wxT("RBUTTON"); break;
1222             case WXK_CANCEL: key = wxT("CANCEL"); break;
1223             case WXK_MBUTTON: key = wxT("MBUTTON"); break;
1224             case WXK_CLEAR: key = wxT("CLEAR"); break;
1225             case WXK_SHIFT: key = wxT("SHIFT"); break;
1226             case WXK_ALT: key = wxT("ALT"); break;
1227             case WXK_CONTROL: key = wxT("CONTROL"); break;
1228             case WXK_MENU: key = wxT("MENU"); break;
1229             case WXK_PAUSE: key = wxT("PAUSE"); break;
1230             case WXK_CAPITAL: key = wxT("CAPITAL"); break;
1231             case WXK_END: key = wxT("END"); break;
1232             case WXK_HOME: key = wxT("HOME"); break;
1233             case WXK_LEFT: key = wxT("LEFT"); break;
1234             case WXK_UP: key = wxT("UP"); break;
1235             case WXK_RIGHT: key = wxT("RIGHT"); break;
1236             case WXK_DOWN: key = wxT("DOWN"); break;
1237             case WXK_SELECT: key = wxT("SELECT"); break;
1238             case WXK_PRINT: key = wxT("PRINT"); break;
1239             case WXK_EXECUTE: key = wxT("EXECUTE"); break;
1240             case WXK_SNAPSHOT: key = wxT("SNAPSHOT"); break;
1241             case WXK_INSERT: key = wxT("INSERT"); break;
1242             case WXK_HELP: key = wxT("HELP"); break;
1243             case WXK_NUMPAD0: key = wxT("NUMPAD0"); break;
1244             case WXK_NUMPAD1: key = wxT("NUMPAD1"); break;
1245             case WXK_NUMPAD2: key = wxT("NUMPAD2"); break;
1246             case WXK_NUMPAD3: key = wxT("NUMPAD3"); break;
1247             case WXK_NUMPAD4: key = wxT("NUMPAD4"); break;
1248             case WXK_NUMPAD5: key = wxT("NUMPAD5"); break;
1249             case WXK_NUMPAD6: key = wxT("NUMPAD6"); break;
1250             case WXK_NUMPAD7: key = wxT("NUMPAD7"); break;
1251             case WXK_NUMPAD8: key = wxT("NUMPAD8"); break;
1252             case WXK_NUMPAD9: key = wxT("NUMPAD9"); break;
1253             case WXK_MULTIPLY: key = wxT("MULTIPLY"); break;
1254             case WXK_ADD: key = wxT("ADD"); break;
1255             case WXK_SEPARATOR: key = wxT("SEPARATOR"); break;
1256             case WXK_SUBTRACT: key = wxT("SUBTRACT"); break;
1257             case WXK_DECIMAL: key = wxT("DECIMAL"); break;
1258             case WXK_DIVIDE: key = wxT("DIVIDE"); break;
1259             case WXK_F1: key = wxT("F1"); break;
1260             case WXK_F2: key = wxT("F2"); break;
1261             case WXK_F3: key = wxT("F3"); break;
1262             case WXK_F4: key = wxT("F4"); break;
1263             case WXK_F5: key = wxT("F5"); break;
1264             case WXK_F6: key = wxT("F6"); break;
1265             case WXK_F7: key = wxT("F7"); break;
1266             case WXK_F8: key = wxT("F8"); break;
1267             case WXK_F9: key = wxT("F9"); break;
1268             case WXK_F10: key = wxT("F10"); break;
1269             case WXK_F11: key = wxT("F11"); break;
1270             case WXK_F12: key = wxT("F12"); break;
1271             case WXK_F13: key = wxT("F13"); break;
1272             case WXK_F14: key = wxT("F14"); break;
1273             case WXK_F15: key = wxT("F15"); break;
1274             case WXK_F16: key = wxT("F16"); break;
1275             case WXK_F17: key = wxT("F17"); break;
1276             case WXK_F18: key = wxT("F18"); break;
1277             case WXK_F19: key = wxT("F19"); break;
1278             case WXK_F20: key = wxT("F20"); break;
1279             case WXK_F21: key = wxT("F21"); break;
1280             case WXK_F22: key = wxT("F22"); break;
1281             case WXK_F23: key = wxT("F23"); break;
1282             case WXK_F24: key = wxT("F24"); break;
1283             case WXK_NUMLOCK: key = wxT("NUMLOCK"); break;
1284             case WXK_SCROLL: key = wxT("SCROLL"); break;
1285             case WXK_PAGEUP: key = wxT("PAGEUP"); break;
1286             case WXK_PAGEDOWN: key = wxT("PAGEDOWN"); break;
1287             case WXK_NUMPAD_SPACE: key = wxT("NUMPAD_SPACE"); break;
1288             case WXK_NUMPAD_TAB: key = wxT("NUMPAD_TAB"); break;
1289             case WXK_NUMPAD_ENTER: key = wxT("NUMPAD_ENTER"); break;
1290             case WXK_NUMPAD_F1: key = wxT("NUMPAD_F1"); break;
1291             case WXK_NUMPAD_F2: key = wxT("NUMPAD_F2"); break;
1292             case WXK_NUMPAD_F3: key = wxT("NUMPAD_F3"); break;
1293             case WXK_NUMPAD_F4: key = wxT("NUMPAD_F4"); break;
1294             case WXK_NUMPAD_HOME: key = wxT("NUMPAD_HOME"); break;
1295             case WXK_NUMPAD_LEFT: key = wxT("NUMPAD_LEFT"); break;
1296             case WXK_NUMPAD_UP: key = wxT("NUMPAD_UP"); break;
1297             case WXK_NUMPAD_RIGHT: key = wxT("NUMPAD_RIGHT"); break;
1298             case WXK_NUMPAD_DOWN: key = wxT("NUMPAD_DOWN"); break;
1299             case WXK_NUMPAD_PAGEUP: key = wxT("NUMPAD_PAGEUP"); break;
1300             case WXK_NUMPAD_PAGEDOWN: key = wxT("NUMPAD_PAGEDOWN"); break;
1301             case WXK_NUMPAD_END: key = wxT("NUMPAD_END"); break;
1302             case WXK_NUMPAD_BEGIN: key = wxT("NUMPAD_BEGIN"); break;
1303             case WXK_NUMPAD_INSERT: key = wxT("NUMPAD_INSERT"); break;
1304             case WXK_NUMPAD_DELETE: key = wxT("NUMPAD_DELETE"); break;
1305             case WXK_NUMPAD_EQUAL: key = wxT("NUMPAD_EQUAL"); break;
1306             case WXK_NUMPAD_MULTIPLY: key = wxT("NUMPAD_MULTIPLY"); break;
1307             case WXK_NUMPAD_ADD: key = wxT("NUMPAD_ADD"); break;
1308             case WXK_NUMPAD_SEPARATOR: key = wxT("NUMPAD_SEPARATOR"); break;
1309             case WXK_NUMPAD_SUBTRACT: key = wxT("NUMPAD_SUBTRACT"); break;
1310             case WXK_NUMPAD_DECIMAL: key = wxT("NUMPAD_DECIMAL"); break;
1311
1312             default:
1313             {
1314                if ( keycode < 128 && wxIsprint((int)keycode) )
1315                    key.Printf(wxT("'%c'"), (char)keycode);
1316                else if ( keycode > 0 && keycode < 27 )
1317                    key.Printf(_("Ctrl-%c"), wxT('A') + keycode - 1);
1318                else
1319                    key.Printf(wxT("unknown (%ld)"), keycode);
1320             }
1321         }
1322     }
1323
1324     wxLogMessage( wxT("%s event: %s (flags = %c%c%c%c)"),
1325                   name,
1326                   key.c_str(),
1327                   event.ControlDown() ? wxT('C') : wxT('-'),
1328                   event.AltDown() ? wxT('A') : wxT('-'),
1329                   event.ShiftDown() ? wxT('S') : wxT('-'),
1330                   event.MetaDown() ? wxT('M') : wxT('-'));
1331 }
1332
1333 void MyTreeCtrl::OnTreeKeyDown(wxTreeEvent& event)
1334 {
1335     LogKeyEvent(wxT("Tree key down "), event.GetKeyEvent());
1336
1337     event.Skip();
1338 }
1339
1340 void MyTreeCtrl::OnBeginDrag(wxTreeEvent& event)
1341 {
1342     // need to explicitly allow drag
1343     if ( event.GetItem() != GetRootItem() )
1344     {
1345         m_draggedItem = event.GetItem();
1346
1347         wxPoint clientpt = event.GetPoint();
1348         wxPoint screenpt = ClientToScreen(clientpt);
1349
1350         wxLogMessage(wxT("OnBeginDrag: started dragging %s at screen coords (%i,%i)"),
1351                      GetItemText(m_draggedItem).c_str(),
1352                      screenpt.x, screenpt.y);
1353
1354         event.Allow();
1355     }
1356     else
1357     {
1358         wxLogMessage(wxT("OnBeginDrag: this item can't be dragged."));
1359     }
1360 }
1361
1362 void MyTreeCtrl::OnEndDrag(wxTreeEvent& event)
1363 {
1364     wxTreeItemId itemSrc = m_draggedItem,
1365                  itemDst = event.GetItem();
1366     m_draggedItem = (wxTreeItemId)0l;
1367
1368     // where to copy the item?
1369     if ( itemDst.IsOk() && !ItemHasChildren(itemDst) )
1370     {
1371         // copy to the parent then
1372         itemDst = GetItemParent(itemDst);
1373     }
1374
1375     if ( !itemDst.IsOk() )
1376     {
1377         wxLogMessage(wxT("OnEndDrag: can't drop here."));
1378
1379         return;
1380     }
1381
1382     wxString text = GetItemText(itemSrc);
1383     wxLogMessage(wxT("OnEndDrag: '%s' copied to '%s'."),
1384                  text.c_str(), GetItemText(itemDst).c_str());
1385
1386     // just do append here - we could also insert it just before/after the item
1387     // on which it was dropped, but this requires slightly more work... we also
1388     // completely ignore the client data and icon of the old item but could
1389     // copy them as well.
1390     //
1391     // Finally, we only copy one item here but we might copy the entire tree if
1392     // we were dragging a folder.
1393     int image = wxGetApp().ShowImages() ? TreeCtrlIcon_File : -1;
1394     wxTreeItemId id = AppendItem(itemDst, text, image);
1395
1396     if ( wxGetApp().ShowStates() )
1397         SetItemState(id, GetItemState(itemSrc));
1398 }
1399
1400 void MyTreeCtrl::OnBeginLabelEdit(wxTreeEvent& event)
1401 {
1402     wxLogMessage(wxT("OnBeginLabelEdit"));
1403
1404     // for testing, prevent this item's label editing
1405     wxTreeItemId itemId = event.GetItem();
1406     if ( IsTestItem(itemId) )
1407     {
1408         wxMessageBox(wxT("You can't edit this item."));
1409
1410         event.Veto();
1411     }
1412     else if ( itemId == GetRootItem() )
1413     {
1414         // test that it is possible to change the text of the item being edited
1415         SetItemText(itemId, _T("Editing root item"));
1416     }
1417 }
1418
1419 void MyTreeCtrl::OnEndLabelEdit(wxTreeEvent& event)
1420 {
1421     wxLogMessage(wxT("OnEndLabelEdit"));
1422
1423     // don't allow anything except letters in the labels
1424     if ( !event.GetLabel().IsWord() )
1425     {
1426         wxMessageBox(wxT("The new label should be a single word."));
1427
1428         event.Veto();
1429     }
1430 }
1431
1432 void MyTreeCtrl::OnItemCollapsing(wxTreeEvent& event)
1433 {
1434     wxLogMessage(wxT("OnItemCollapsing"));
1435
1436     // for testing, prevent the user from collapsing the first child folder
1437     wxTreeItemId itemId = event.GetItem();
1438     if ( IsTestItem(itemId) )
1439     {
1440         wxMessageBox(wxT("You can't collapse this item."));
1441
1442         event.Veto();
1443     }
1444 }
1445
1446 void MyTreeCtrl::OnItemActivated(wxTreeEvent& event)
1447 {
1448     // show some info about this item
1449     wxTreeItemId itemId = event.GetItem();
1450     MyTreeItemData *item = (MyTreeItemData *)GetItemData(itemId);
1451
1452     if ( item != NULL )
1453     {
1454         item->ShowInfo(this);
1455     }
1456
1457     wxLogMessage(wxT("OnItemActivated"));
1458 }
1459
1460 void MyTreeCtrl::OnItemStateClick(wxTreeEvent& event)
1461 {
1462     // toggle item state
1463     wxTreeItemId itemId = event.GetItem();
1464     DoToggleState(itemId);
1465
1466     wxLogMessage(wxT("Item \"%s\" state changed to %d"),
1467                  GetItemText(itemId), GetItemState(itemId));
1468 }
1469
1470 void MyTreeCtrl::OnItemMenu(wxTreeEvent& event)
1471 {
1472     wxTreeItemId itemId = event.GetItem();
1473     MyTreeItemData *item = itemId.IsOk() ? (MyTreeItemData *)GetItemData(itemId)
1474                                          : NULL;
1475     wxPoint clientpt = event.GetPoint();
1476     wxPoint screenpt = ClientToScreen(clientpt);
1477
1478     wxLogMessage(wxT("OnItemMenu for item \"%s\" at screen coords (%i, %i)"),
1479                  item ? item->GetDesc() : _T(""), screenpt.x, screenpt.y);
1480
1481     ShowMenu(itemId, clientpt);
1482     event.Skip();
1483 }
1484
1485 void MyTreeCtrl::OnContextMenu(wxContextMenuEvent& event)
1486 {
1487     wxPoint pt = event.GetPosition();
1488
1489     wxLogMessage(wxT("OnContextMenu at screen coords (%i, %i)"), pt.x, pt.y);
1490 }
1491
1492 void MyTreeCtrl::ShowMenu(wxTreeItemId id, const wxPoint& pt)
1493 {
1494     wxString title;
1495     if ( id.IsOk() )
1496     {
1497         title << wxT("Menu for ") << GetItemText(id);
1498     }
1499     else
1500     {
1501         title = wxT("Menu for no particular item");
1502     }
1503
1504 #if wxUSE_MENUS
1505     wxMenu menu(title);
1506     menu.Append(TreeTest_About, wxT("&About..."));
1507     menu.AppendSeparator();
1508     menu.Append(TreeTest_Highlight, wxT("&Highlight item"));
1509     menu.Append(TreeTest_Dump, wxT("&Dump"));
1510
1511     PopupMenu(&menu, pt);
1512 #endif // wxUSE_MENUS
1513 }
1514
1515 void MyTreeCtrl::OnItemRClick(wxTreeEvent& event)
1516 {
1517     wxTreeItemId itemId = event.GetItem();
1518     MyTreeItemData *item = itemId.IsOk() ? (MyTreeItemData *)GetItemData(itemId)
1519                                          : NULL;
1520
1521     wxLogMessage(wxT("Item \"%s\" right clicked"), item ? item->GetDesc()
1522                                                         : _T(""));
1523
1524     event.Skip();
1525 }
1526
1527 void MyTreeCtrl::OnRMouseDown(wxMouseEvent& event)
1528 {
1529     wxLogMessage(wxT("Right mouse button down"));
1530
1531     event.Skip();
1532 }
1533
1534 void MyTreeCtrl::OnRMouseUp(wxMouseEvent& event)
1535 {
1536     wxLogMessage(wxT("Right mouse button up"));
1537
1538     event.Skip();
1539 }
1540
1541 void MyTreeCtrl::OnRMouseDClick(wxMouseEvent& event)
1542 {
1543     wxTreeItemId id = HitTest(event.GetPosition());
1544     if ( !id )
1545         wxLogMessage(wxT("No item under mouse"));
1546     else
1547     {
1548         MyTreeItemData *item = (MyTreeItemData *)GetItemData(id);
1549         if ( item )
1550             wxLogMessage(wxT("Item '%s' under mouse"), item->GetDesc());
1551     }
1552
1553     event.Skip();
1554 }
1555
1556 static inline const wxChar *Bool2String(bool b)
1557 {
1558     return b ? wxT("") : wxT("not ");
1559 }
1560
1561 void MyTreeItemData::ShowInfo(wxTreeCtrl *tree)
1562 {
1563     wxLogMessage(wxT("Item '%s': %sselected, %sexpanded, %sbold,\n")
1564                  wxT("%u children (%u immediately under this item)."),
1565                  m_desc.c_str(),
1566                  Bool2String(tree->IsSelected(GetId())),
1567                  Bool2String(tree->IsExpanded(GetId())),
1568                  Bool2String(tree->IsBold(GetId())),
1569                  unsigned(tree->GetChildrenCount(GetId())),
1570                  unsigned(tree->GetChildrenCount(GetId(), false)));
1571 }