]> git.saurik.com Git - wxWidgets.git/blame - samples/treectrl/treectrl.cpp
Workaround for Ctrl-A giving a keycode of 1 in EVT_KEY_DOWN on wxGTK
[wxWidgets.git] / samples / treectrl / treectrl.cpp
CommitLineData
457814b5 1/////////////////////////////////////////////////////////////////////////////
5301d933 2// Name: treectrl.cpp
457814b5
JS
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 and Markus Holzem
3a5a2f56 9// Licence: wxWindows license
457814b5
JS
10/////////////////////////////////////////////////////////////////////////////
11
f6bcfd97
BP
12// important: the #pragma argument must be different from treectrl.cpp,
13// otherwise gcc gets confused (as there is also treectrl.cpp in the library
14// which has identical #pragma) and the sample crashes on startup!
457814b5 15#ifdef __GNUG__
f6bcfd97
BP
16 #pragma interface "treetest.cpp"
17 #pragma implementation "treetest.cpp"
457814b5
JS
18#endif
19
20// For compilers that support precompilation, includes "wx/wx.h".
21#include "wx/wxprec.h"
22
23#ifdef __BORLANDC__
3a5a2f56 24 #pragma hdrstop
457814b5
JS
25#endif
26
27#ifndef WX_PRECOMP
3a5a2f56 28 #include "wx/wx.h"
457814b5
JS
29#endif
30
3a5a2f56
VZ
31#include "wx/log.h"
32
91b8de8d 33#include "wx/image.h"
3a5a2f56 34#include "wx/imaglist.h"
457814b5
JS
35#include "wx/treectrl.h"
36
cf724bce
RR
37#include "math.h"
38
2c8e4738
VZ
39#ifdef __WIN32__
40 // this is not supported by native control
7cc8c988 41 #define NO_VARIABLE_HEIGHT
74b31181 42#endif
91b8de8d 43
5301d933 44#include "treectrl.h"
9dfbf520 45
91b8de8d
RR
46// under Windows the icons are in the .rc file
47#ifndef __WXMSW__
2c8e4738
VZ
48 #include "icon1.xpm"
49 #include "icon2.xpm"
50 #include "icon3.xpm"
51 #include "icon4.xpm"
52 #include "icon5.xpm"
53 #include "mondrian.xpm"
91b8de8d
RR
54#endif
55
e1ee62bd 56// verify that the item is ok and insult the user if it is not
4693b20c
MB
57#define CHECK_ITEM( item ) if ( !item.IsOk() ) { \
58 wxMessageBox(wxT("Please select some item first!"), \
59 wxT("Tree sample error"), \
60 wxOK | wxICON_EXCLAMATION, \
61 this); \
62 return; \
5f939e78
VZ
63 }
64
457814b5 65BEGIN_EVENT_TABLE(MyFrame, wxFrame)
7cc8c988
VZ
66 EVT_SIZE(MyFrame::OnSize)
67
618a5e38
RR
68#define MENU_LINK(name) EVT_MENU(TreeTest_##name, MyFrame::On##name)
69 MENU_LINK(Quit)
70 MENU_LINK(About)
71 MENU_LINK(TogButtons)
72 MENU_LINK(TogTwist)
73 MENU_LINK(TogLines)
74 MENU_LINK(TogEdit)
75 MENU_LINK(TogHideRoot)
76 MENU_LINK(TogRootLines)
77 MENU_LINK(TogBorder)
78 MENU_LINK(Dump)
9dfbf520 79#ifndef NO_MULTIPLE_SELECTION
618a5e38
RR
80 MENU_LINK(DumpSelected)
81 MENU_LINK(Select)
82 MENU_LINK(Unselect)
83 MENU_LINK(ToggleSel)
9dfbf520 84#endif // NO_MULTIPLE_SELECTION
618a5e38
RR
85 MENU_LINK(Rename)
86 MENU_LINK(Count)
87 MENU_LINK(CountRec)
88 MENU_LINK(Sort)
89 MENU_LINK(SortRev)
90 MENU_LINK(SetBold)
91 MENU_LINK(ClearBold)
92 MENU_LINK(Delete)
93 MENU_LINK(DeleteChildren)
94 MENU_LINK(DeleteAll)
95 MENU_LINK(Recreate)
96 MENU_LINK(ToggleImages)
97 MENU_LINK(ToggleButtons)
98 MENU_LINK(SetImageSize)
99 MENU_LINK(CollapseAndReset)
100 MENU_LINK(EnsureVisible)
101 MENU_LINK(AddItem)
102 MENU_LINK(InsertItem)
103 MENU_LINK(IncIndent)
104 MENU_LINK(DecIndent)
105 MENU_LINK(IncSpacing)
106 MENU_LINK(DecSpacing)
107 MENU_LINK(ToggleIcon)
108#undef MENU_LINK
109
457814b5
JS
110END_EVENT_TABLE()
111
484523cf
JS
112#if USE_GENERIC_TREECTRL
113BEGIN_EVENT_TABLE(MyTreeCtrl, wxGenericTreeCtrl)
114#else
457814b5 115BEGIN_EVENT_TABLE(MyTreeCtrl, wxTreeCtrl)
484523cf 116#endif
5f939e78
VZ
117 EVT_TREE_BEGIN_DRAG(TreeTest_Ctrl, MyTreeCtrl::OnBeginDrag)
118 EVT_TREE_BEGIN_RDRAG(TreeTest_Ctrl, MyTreeCtrl::OnBeginRDrag)
5888ef1e 119 EVT_TREE_END_DRAG(TreeTest_Ctrl, MyTreeCtrl::OnEndDrag)
5f939e78
VZ
120 EVT_TREE_BEGIN_LABEL_EDIT(TreeTest_Ctrl, MyTreeCtrl::OnBeginLabelEdit)
121 EVT_TREE_END_LABEL_EDIT(TreeTest_Ctrl, MyTreeCtrl::OnEndLabelEdit)
122 EVT_TREE_DELETE_ITEM(TreeTest_Ctrl, MyTreeCtrl::OnDeleteItem)
74b31181 123#if 0 // there are so many of those that logging them causes flicker
5f939e78 124 EVT_TREE_GET_INFO(TreeTest_Ctrl, MyTreeCtrl::OnGetInfo)
74b31181 125#endif
5f939e78
VZ
126 EVT_TREE_SET_INFO(TreeTest_Ctrl, MyTreeCtrl::OnSetInfo)
127 EVT_TREE_ITEM_EXPANDED(TreeTest_Ctrl, MyTreeCtrl::OnItemExpanded)
128 EVT_TREE_ITEM_EXPANDING(TreeTest_Ctrl, MyTreeCtrl::OnItemExpanding)
129 EVT_TREE_ITEM_COLLAPSED(TreeTest_Ctrl, MyTreeCtrl::OnItemCollapsed)
130 EVT_TREE_ITEM_COLLAPSING(TreeTest_Ctrl, MyTreeCtrl::OnItemCollapsing)
e3d0aa77
VZ
131 EVT_TREE_ITEM_RIGHT_CLICK(TreeTest_Ctrl, MyTreeCtrl::OnItemRightClick)
132
133 EVT_RIGHT_UP(MyTreeCtrl::OnRMouseUp)
5f939e78
VZ
134 EVT_TREE_SEL_CHANGED(TreeTest_Ctrl, MyTreeCtrl::OnSelChanged)
135 EVT_TREE_SEL_CHANGING(TreeTest_Ctrl, MyTreeCtrl::OnSelChanging)
136 EVT_TREE_KEY_DOWN(TreeTest_Ctrl, MyTreeCtrl::OnTreeKeyDown)
137 EVT_TREE_ITEM_ACTIVATED(TreeTest_Ctrl, MyTreeCtrl::OnItemActivated)
138 EVT_RIGHT_DCLICK(MyTreeCtrl::OnRMouseDClick)
457814b5
JS
139END_EVENT_TABLE()
140
141IMPLEMENT_APP(MyApp)
142
c89a6106 143bool MyApp::OnInit()
457814b5 144{
5f939e78 145 // Create the main frame window
4693b20c 146 MyFrame *frame = new MyFrame(wxT("wxTreeCtrl Test"), 50, 50, 450, 600);
457814b5 147
5f939e78
VZ
148 // Show the frame
149 frame->Show(TRUE);
150 SetTopWindow(frame);
457814b5 151
5f939e78 152 return TRUE;
3a5a2f56 153}
457814b5 154
457814b5 155
3a5a2f56
VZ
156// My frame constructor
157MyFrame::MyFrame(const wxString& title, int x, int y, int w, int h)
7cc8c988
VZ
158 : wxFrame((wxFrame *)NULL, -1, title, wxPoint(x, y), wxSize(w, h)),
159 m_treeCtrl(NULL), m_textCtrl(NULL)
3a5a2f56 160{
5f939e78
VZ
161 // This reduces flicker effects - even better would be to define
162 // OnEraseBackground to do nothing. When the tree control's scrollbars are
163 // show or hidden, the frame is sent a background erase event.
164 SetBackgroundColour(wxColour(255, 255, 255));
165
166 // Give it an icon
167 SetIcon(wxICON(mondrian));
168
801bb685 169#if wxUSE_MENUS
5f939e78
VZ
170 // Make a menubar
171 wxMenu *file_menu = new wxMenu,
618a5e38 172 *style_menu = new wxMenu,
5f939e78
VZ
173 *tree_menu = new wxMenu,
174 *item_menu = new wxMenu;
175
4693b20c 176 file_menu->Append(TreeTest_About, wxT("&About..."));
5f939e78 177 file_menu->AppendSeparator();
4693b20c 178 file_menu->Append(TreeTest_Quit, wxT("E&xit\tAlt-X"));
5f939e78 179
618a5e38
RR
180 style_menu->Append(TreeTest_TogButtons, "Toggle &normal buttons");
181 style_menu->Append(TreeTest_TogTwist, "Toggle &twister buttons");
182 style_menu->Append(TreeTest_ToggleButtons, "Toggle image &buttons");
183 style_menu->AppendSeparator();
184 style_menu->Append(TreeTest_TogLines, "Toggle &connecting lines");
185 style_menu->Append(TreeTest_TogRootLines, "Toggle &lines at root");
186 style_menu->Append(TreeTest_TogHideRoot, "Toggle &hidden root");
187 style_menu->Append(TreeTest_TogBorder, "Toggle &item border");
188 style_menu->Append(TreeTest_TogEdit, "Toggle &edit mode");
7cc8c988 189#ifndef NO_MULTIPLE_SELECTION
4693b20c 190 style_menu->Append(TreeTest_ToggleSel, wxT("Toggle &selection mode"));
7cc8c988 191#endif // NO_MULTIPLE_SELECTION
4693b20c
MB
192 style_menu->Append(TreeTest_ToggleImages, wxT("Toggle show ima&ges"));
193 style_menu->Append(TreeTest_SetImageSize, wxT("Set image si&ze..."));
618a5e38 194
5f939e78
VZ
195 tree_menu->Append(TreeTest_Recreate, "&Recreate the tree");
196 tree_menu->Append(TreeTest_CollapseAndReset, "C&ollapse and reset");
197 tree_menu->AppendSeparator();
198 tree_menu->Append(TreeTest_AddItem, "Append a &new item");
75c74ca0 199 tree_menu->Append(TreeTest_InsertItem, "&Insert a new item");
5f939e78
VZ
200 tree_menu->Append(TreeTest_Delete, "&Delete this item");
201 tree_menu->Append(TreeTest_DeleteChildren, "Delete &children");
202 tree_menu->Append(TreeTest_DeleteAll, "Delete &all items");
203 tree_menu->AppendSeparator();
5fd11f09
RR
204 tree_menu->Append(TreeTest_Count, "Count children of current item");
205 tree_menu->Append(TreeTest_CountRec, "Recursively count children of current item");
206 tree_menu->AppendSeparator();
5f939e78
VZ
207 tree_menu->Append(TreeTest_Sort, "Sort children of current item");
208 tree_menu->Append(TreeTest_SortRev, "Sort in reversed order");
209 tree_menu->AppendSeparator();
210 tree_menu->Append(TreeTest_EnsureVisible, "Make the last item &visible");
cf724bce
RR
211 tree_menu->AppendSeparator();
212 tree_menu->Append(TreeTest_IncIndent, "Add 5 points to indentation\tAlt-I");
213 tree_menu->Append(TreeTest_DecIndent, "Reduce indentation by 5 points\tAlt-R");
214 tree_menu->AppendSeparator();
215 tree_menu->Append(TreeTest_IncSpacing, "Add 5 points to spacing\tCtrl-I");
216 tree_menu->Append(TreeTest_DecSpacing, "Reduce spacing by 5 points\tCtrl-R");
5f939e78 217
91b8de8d 218 item_menu->Append(TreeTest_Dump, "&Dump item children");
5f939e78 219 item_menu->Append(TreeTest_Rename, "&Rename item...");
91b8de8d 220
5f939e78 221 item_menu->AppendSeparator();
618a5e38
RR
222 item_menu->Append(TreeTest_SetBold, "Make item &bold");
223 item_menu->Append(TreeTest_ClearBold, "Make item &not bold");
9dfbf520 224 item_menu->AppendSeparator();
618a5e38 225 item_menu->Append(TreeTest_ToggleIcon, "Toggle the item's &icon");
9dfbf520
VZ
226
227#ifndef NO_MULTIPLE_SELECTION
228 item_menu->AppendSeparator();
229 item_menu->Append(TreeTest_DumpSelected, "Dump selected items\tAlt-D");
230 item_menu->Append(TreeTest_Select, "Select current item\tAlt-S");
231 item_menu->Append(TreeTest_Unselect, "Unselect everything\tAlt-U");
7cc8c988 232#endif // NO_MULTIPLE_SELECTION
5f939e78
VZ
233
234 wxMenuBar *menu_bar = new wxMenuBar;
235 menu_bar->Append(file_menu, "&File");
618a5e38 236 menu_bar->Append(style_menu, "&Style");
5f939e78
VZ
237 menu_bar->Append(tree_menu, "&Tree");
238 menu_bar->Append(item_menu, "&Item");
239 SetMenuBar(menu_bar);
240
618a5e38 241 //menu_bar->Check(TreeTest_ToggleImages, TRUE);
801bb685 242#endif // wxUSE_MENUS
2c8e4738 243
5f939e78
VZ
244 m_treeCtrl = new MyTreeCtrl(this, TreeTest_Ctrl,
245 wxDefaultPosition, wxDefaultSize,
618a5e38 246 wxTR_TWIST_BUTTONS | wxTR_NO_LINES |
5ea47806 247 wxTR_EDIT_LABELS |
89124b1a 248#ifndef NO_VARIABLE_HEIGHT
74b31181 249 wxTR_HAS_VARIABLE_ROW_HEIGHT |
89124b1a 250#endif
74b31181 251 wxSUNKEN_BORDER);
31405c01 252
c22886bd 253// m_treeCtrl->SetBackgroundColour( *wxLIGHT_GREY );
31405c01 254
7cc8c988 255 m_textCtrl = new wxTextCtrl(this, -1, "",
5f939e78
VZ
256 wxDefaultPosition, wxDefaultSize,
257 wxTE_MULTILINE | wxSUNKEN_BORDER);
258
5f939e78
VZ
259 // create a status bar with 3 panes
260 CreateStatusBar(3);
261 SetStatusText("", 0);
3a5a2f56 262
a367b9b3 263#ifdef __WXMOTIF__
5f939e78
VZ
264 // For some reason, we get a memcpy crash in wxLogStream::DoLogStream
265 // on gcc/wxMotif, if we use wxLogTextCtl. Maybe it's just gcc?
266 delete wxLog::SetActiveTarget(new wxLogStderr);
a367b9b3 267#else
5f939e78 268 // set our text control as the log target
7cc8c988 269 wxLogTextCtrl *logWindow = new wxLogTextCtrl(m_textCtrl);
5f939e78 270 delete wxLog::SetActiveTarget(logWindow);
a367b9b3 271#endif
457814b5
JS
272}
273
c89a6106 274MyFrame::~MyFrame()
457814b5 275{
5f939e78 276 delete wxLog::SetActiveTarget(NULL);
457814b5
JS
277}
278
618a5e38
RR
279void MyFrame::TogStyle(long flag)
280{
281 m_treeCtrl->SetWindowStyle(m_treeCtrl->GetWindowStyle() ^ flag);
282}
283
7cc8c988
VZ
284void MyFrame::OnSize(wxSizeEvent& event)
285{
286 if ( m_treeCtrl && m_textCtrl )
287 {
288 Resize(GetClientSize());
289 }
290
291 event.Skip();
292}
293
294void MyFrame::Resize(const wxSize& size)
295{
296 m_treeCtrl->SetSize(0, 0, size.x, 2*size.y/3);
297 m_textCtrl->SetSize(0, 2*size.y/3, size.x, size.y/3);
298}
299
3a5a2f56 300void MyFrame::OnQuit(wxCommandEvent& WXUNUSED(event))
457814b5 301{
5f939e78 302 Close(TRUE);
457814b5
JS
303}
304
3a5a2f56 305void MyFrame::OnAbout(wxCommandEvent& WXUNUSED(event))
457814b5 306{
5f939e78 307 wxMessageBox("Tree test sample\n"
5ea47806 308 "(c) Julian Smart 1997, Vadim Zeitlin 1998",
5f939e78
VZ
309 "About tree test",
310 wxOK | wxICON_INFORMATION, this);
e1ee62bd
VZ
311}
312
313void MyFrame::OnRename(wxCommandEvent& WXUNUSED(event))
314{
5f939e78 315 wxTreeItemId item = m_treeCtrl->GetSelection();
e1ee62bd 316
5f939e78 317 CHECK_ITEM( item );
e1ee62bd 318
5ea47806
VZ
319 // old code - now we edit in place
320#if 0
5f939e78
VZ
321 static wxString s_text;
322 s_text = wxGetTextFromUser("New name: ", "Tree sample question",
323 s_text, this);
324 if ( !s_text.IsEmpty() )
325 {
326 m_treeCtrl->SetItemText(item, s_text);
327 }
5ea47806
VZ
328#endif // 0
329
330 // TODO demonstrate creating a custom edit control...
331 (void)m_treeCtrl->EditLabel(item);
e1ee62bd
VZ
332}
333
5fd11f09
RR
334void MyFrame::OnCount(wxCommandEvent& WXUNUSED(event))
335{
336 wxTreeItemId item = m_treeCtrl->GetSelection();
337
338 CHECK_ITEM( item );
339
340 int i = m_treeCtrl->GetChildrenCount( item, FALSE );
75c74ca0 341
247e5b16 342 wxLogMessage(wxT("%d children"), i);
5fd11f09
RR
343}
344
345void MyFrame::OnCountRec(wxCommandEvent& WXUNUSED(event))
346{
347 wxTreeItemId item = m_treeCtrl->GetSelection();
348
349 CHECK_ITEM( item );
350
351 int i = m_treeCtrl->GetChildrenCount( item );
75c74ca0 352
247e5b16 353 wxLogMessage(wxT("%d children"), i);
5fd11f09
RR
354}
355
e1ee62bd
VZ
356void MyFrame::DoSort(bool reverse)
357{
5f939e78 358 wxTreeItemId item = m_treeCtrl->GetSelection();
e1ee62bd 359
5f939e78 360 CHECK_ITEM( item );
457814b5 361
5f939e78 362 m_treeCtrl->DoSortChildren(item, reverse);
457814b5
JS
363}
364
4832f7c0
VZ
365void MyFrame::OnDump(wxCommandEvent& WXUNUSED(event))
366{
5f939e78 367 wxTreeItemId root = m_treeCtrl->GetSelection();
e1ee62bd 368
5f939e78 369 CHECK_ITEM( root );
e1ee62bd 370
5f939e78 371 m_treeCtrl->GetItemsRecursively(root, -1);
4832f7c0
VZ
372}
373
9dfbf520
VZ
374#ifndef NO_MULTIPLE_SELECTION
375
7cc8c988
VZ
376void MyFrame::OnToggleSel(wxCommandEvent& WXUNUSED(event))
377{
618a5e38
RR
378 TogStyle(wxTR_MULTIPLE);
379#if 0
7cc8c988
VZ
380 long style = m_treeCtrl->GetWindowStyle();
381 if ( style & wxTR_MULTIPLE )
382 style &= ~wxTR_MULTIPLE;
383 else
384 style |= wxTR_MULTIPLE;
385
386 delete m_treeCtrl;
387
388 m_treeCtrl = new MyTreeCtrl(this, TreeTest_Ctrl,
389 wxDefaultPosition, wxDefaultSize,
390 style);
391 Resize(GetClientSize());
618a5e38 392#endif
7cc8c988
VZ
393}
394
91b8de8d
RR
395void MyFrame::OnDumpSelected(wxCommandEvent& WXUNUSED(event))
396{
9dfbf520 397 wxArrayTreeItemIds array;
91b8de8d 398
9dfbf520 399 size_t count = m_treeCtrl->GetSelections(array);
247e5b16 400 wxLogMessage(wxT("%u items selected"), count);
91b8de8d 401
9dfbf520
VZ
402 for ( size_t n = 0; n < count; n++ )
403 {
4693b20c 404 wxLogMessage(wxT("\t%s"), m_treeCtrl->GetItemText(array.Item(n)).c_str());
9dfbf520
VZ
405 }
406}
407
408void MyFrame::OnSelect(wxCommandEvent& event)
409{
410 m_treeCtrl->SelectItem(m_treeCtrl->GetSelection());
411}
412
413void MyFrame::OnUnselect(wxCommandEvent& event)
414{
415 m_treeCtrl->UnselectAll();
91b8de8d
RR
416}
417
9dfbf520
VZ
418#endif // NO_MULTIPLE_SELECTION
419
add28c55
VZ
420void MyFrame::DoSetBold(bool bold)
421{
5f939e78 422 wxTreeItemId item = m_treeCtrl->GetSelection();
e1ee62bd 423
5f939e78 424 CHECK_ITEM( item );
e1ee62bd 425
5f939e78 426 m_treeCtrl->SetItemBold(item, bold);
add28c55
VZ
427}
428
ff5bf259
VZ
429void MyFrame::OnDelete(wxCommandEvent& WXUNUSED(event))
430{
5f939e78 431 wxTreeItemId item = m_treeCtrl->GetSelection();
e1ee62bd 432
5f939e78 433 CHECK_ITEM( item );
e1ee62bd 434
5f939e78 435 m_treeCtrl->Delete(item);
ff5bf259
VZ
436}
437
372edb9d
VZ
438void MyFrame::OnDeleteChildren(wxCommandEvent& WXUNUSED(event))
439{
5f939e78 440 wxTreeItemId item = m_treeCtrl->GetSelection();
e1ee62bd 441
5f939e78 442 CHECK_ITEM( item );
e1ee62bd 443
5f939e78 444 m_treeCtrl->DeleteChildren(item);
372edb9d
VZ
445}
446
ff5bf259
VZ
447void MyFrame::OnDeleteAll(wxCommandEvent& WXUNUSED(event))
448{
5f939e78 449 m_treeCtrl->DeleteAllItems();
ff5bf259
VZ
450}
451
452void MyFrame::OnRecreate(wxCommandEvent& event)
453{
5f939e78 454 OnDeleteAll(event);
618a5e38 455 m_treeCtrl->AddTestItemsToTree(5, 2);
ff5bf259
VZ
456}
457
2c8e4738
VZ
458void MyFrame::OnSetImageSize(wxCommandEvent& event)
459{
618a5e38 460 int size = wxGetNumberFromUser("Enter the size for the images to use",
2c8e4738
VZ
461 "Size: ",
462 "TreeCtrl sample",
618a5e38 463 m_treeCtrl->ImageSize());
2c8e4738
VZ
464 if ( size == -1 )
465 return;
466
618a5e38
RR
467 m_treeCtrl->CreateImageList(size);
468 wxGetApp().SetShowImages(TRUE);
2c8e4738
VZ
469}
470
471void MyFrame::OnToggleImages(wxCommandEvent& event)
472{
f6bcfd97
BP
473 if ( wxGetApp().ShowImages() )
474 {
475 m_treeCtrl->CreateImageList(-1);
f6bcfd97
BP
476 wxGetApp().SetShowImages(FALSE);
477 }
478 else
479 {
618a5e38 480 m_treeCtrl->CreateImageList(0);
f6bcfd97
BP
481 wxGetApp().SetShowImages(TRUE);
482 }
618a5e38 483}
2c8e4738 484
618a5e38
RR
485void MyFrame::OnToggleButtons(wxCommandEvent& event)
486{
a3e377a3 487#if USE_GENERIC_TREECTRL || !defined(__WXMSW__)
618a5e38
RR
488 if ( wxGetApp().ShowButtons() )
489 {
490 m_treeCtrl->CreateButtonsImageList(-1);
491 wxGetApp().SetShowButtons(FALSE);
492 }
493 else
494 {
495 m_treeCtrl->CreateButtonsImageList(15);
496 wxGetApp().SetShowButtons(TRUE);
497 }
a3e377a3 498#endif
2c8e4738
VZ
499}
500
dd3646fd
VZ
501void MyFrame::OnCollapseAndReset(wxCommandEvent& event)
502{
5f939e78 503 m_treeCtrl->CollapseAndReset(m_treeCtrl->GetRootItem());
dd3646fd
VZ
504}
505
f65635b5
VZ
506void MyFrame::OnEnsureVisible(wxCommandEvent& event)
507{
508 m_treeCtrl->DoEnsureVisible();
509}
510
75c74ca0
VZ
511void MyFrame::OnInsertItem(wxCommandEvent& WXUNUSED(event))
512{
2c8e4738
VZ
513 int image = wxGetApp().ShowImages() ? MyTreeCtrl::TreeCtrlIcon_File : -1;
514 m_treeCtrl->InsertItem(m_treeCtrl->GetRootItem(), image, "2nd item");
75c74ca0
VZ
515}
516
5f939e78
VZ
517void MyFrame::OnAddItem(wxCommandEvent& WXUNUSED(event))
518{
519 static int s_num = 0;
520
521 wxString text;
4693b20c 522 text.Printf(wxT("Item #%d"), ++s_num);
5f939e78
VZ
523
524 m_treeCtrl->AppendItem(m_treeCtrl->GetRootItem(),
112c5086
RR
525 text /*,
526 MyTreeCtrl::TreeCtrlIcon_File */ );
5f939e78
VZ
527}
528
cf724bce
RR
529void MyFrame::OnIncIndent(wxCommandEvent& WXUNUSED(event))
530{
531 unsigned int indent = m_treeCtrl->GetIndent();
532 if (indent < 100)
533 m_treeCtrl->SetIndent( indent+5 );
534}
535
536void MyFrame::OnDecIndent(wxCommandEvent& WXUNUSED(event))
537{
538 unsigned int indent = m_treeCtrl->GetIndent();
539 if (indent > 10)
540 m_treeCtrl->SetIndent( indent-5 );
541}
542
543void MyFrame::OnIncSpacing(wxCommandEvent& WXUNUSED(event))
544{
545 unsigned int indent = m_treeCtrl->GetSpacing();
546 if (indent < 100)
547 m_treeCtrl->SetSpacing( indent+5 );
548}
549
550void MyFrame::OnDecSpacing(wxCommandEvent& WXUNUSED(event))
551{
552 unsigned int indent = m_treeCtrl->GetSpacing();
553 if (indent > 10)
554 m_treeCtrl->SetSpacing( indent-5 );
555}
556
9dfbf520
VZ
557void MyFrame::OnToggleIcon(wxCommandEvent& WXUNUSED(event))
558{
559 wxTreeItemId item = m_treeCtrl->GetSelection();
560
561 CHECK_ITEM( item );
562
563 m_treeCtrl->DoToggleIcon(item);
564}
565
3a5a2f56 566// MyTreeCtrl implementation
484523cf
JS
567#if USE_GENERIC_TREECTRL
568IMPLEMENT_DYNAMIC_CLASS(MyTreeCtrl, wxGenericTreeCtrl)
569#else
23fd5130 570IMPLEMENT_DYNAMIC_CLASS(MyTreeCtrl, wxTreeCtrl)
484523cf 571#endif
23fd5130 572
3a5a2f56
VZ
573MyTreeCtrl::MyTreeCtrl(wxWindow *parent, const wxWindowID id,
574 const wxPoint& pos, const wxSize& size,
575 long style)
576 : wxTreeCtrl(parent, id, pos, size, style)
457814b5 577{
2c8e4738 578 m_reverseSort = FALSE;
91b8de8d 579
2c8e4738 580 CreateImageList();
91b8de8d 581
2c8e4738 582 // Add some items to the tree
618a5e38 583 AddTestItemsToTree(5, 2);
2c8e4738
VZ
584}
585
586void MyTreeCtrl::CreateImageList(int size)
587{
2c8e4738
VZ
588 if ( size == -1 )
589 {
618a5e38
RR
590 SetImageList(NULL);
591 return;
2c8e4738 592 }
618a5e38
RR
593 if ( size == 0 )
594 size = m_imageSize;
f6bcfd97 595 else
618a5e38
RR
596 m_imageSize = size;
597
598 // Make an image list containing small icons
599 wxImageList *images = new wxImageList(size, size, TRUE);
e1ee62bd 600
618a5e38 601 // should correspond to TreeCtrlIcon_xxx enum
f60d0f94 602#if defined(__WXMSW__) && defined(__WIN16__)
618a5e38
RR
603 images->Add(wxBitmap("bitmap1", wxBITMAP_TYPE_BMP_RESOURCE));
604 images->Add(wxBitmap("bitmap2", wxBITMAP_TYPE_BMP_RESOURCE));
605 images->Add(wxBitmap("bitmap3", wxBITMAP_TYPE_BMP_RESOURCE));
606 images->Add(wxBitmap("bitmap4", wxBITMAP_TYPE_BMP_RESOURCE));
607 images->Add(wxBitmap("bitmap5", wxBITMAP_TYPE_BMP_RESOURCE));
f6bcfd97 608#else // !MSW
618a5e38
RR
609 wxBusyCursor wait;
610 wxIcon icons[5];
611 icons[0] = wxICON(icon1);
612 icons[1] = wxICON(icon2);
613 icons[2] = wxICON(icon3);
614 icons[3] = wxICON(icon4);
615 icons[4] = wxICON(icon5);
616
617 int sizeOrig = icons[0].GetWidth();
618 for ( size_t i = 0; i < WXSIZEOF(icons); i++ )
619 {
620 if ( size == sizeOrig )
2c8e4738 621 {
618a5e38 622 images->Add(icons[i]);
2c8e4738 623 }
618a5e38
RR
624 else
625 {
626 images->Add(wxImage(icons[i]).Rescale(size, size).
627 ConvertToBitmap());
628 }
629 }
f6bcfd97 630#endif // MSW/!MSW
618a5e38
RR
631
632 AssignImageList(images);
633}
634
635void MyTreeCtrl::CreateButtonsImageList(int size)
636{
a3e377a3 637#if USE_GENERIC_TREECTRL || !defined(__WXMSW__)
618a5e38
RR
638 if ( size == -1 )
639 {
640 SetButtonsImageList(NULL);
641 return;
642 }
643
644 // Make an image list containing small icons
645 wxImageList *images = new wxImageList(size, size, TRUE);
646
647 // should correspond to TreeCtrlIcon_xxx enum
648#if defined(__WXMSW__) && defined(__WIN16__)
649 images->Add(wxBitmap("bitmap1", wxBITMAP_TYPE_BMP_RESOURCE));
650 images->Add(wxBitmap("bitmap2", wxBITMAP_TYPE_BMP_RESOURCE));
651 images->Add(wxBitmap("bitmap3", wxBITMAP_TYPE_BMP_RESOURCE));
652 images->Add(wxBitmap("bitmap4", wxBITMAP_TYPE_BMP_RESOURCE));
653 images->Add(wxBitmap("bitmap5", wxBITMAP_TYPE_BMP_RESOURCE));
654#else // !MSW
655 wxBusyCursor wait;
656 wxIcon icons[4];
657 icons[0] = wxICON(icon3); // closed
658 icons[1] = wxICON(icon3); // closed, selected
659 icons[2] = wxICON(icon5); // open
660 icons[3] = wxICON(icon5); // open, selected
661
662 for ( size_t i = 0; i < WXSIZEOF(icons); i++ )
663 {
664 int sizeOrig = icons[i].GetWidth();
665 if ( size == sizeOrig )
666 {
667 images->Add(icons[i]);
668 }
669 else
670 {
671 images->Add(wxImage(icons[i]).Rescale(size, size).
672 ConvertToBitmap());
673 }
2c8e4738 674 }
618a5e38 675#endif // MSW/!MSW
457814b5 676
618a5e38 677 AssignButtonsImageList(images);
a3e377a3 678#endif
457814b5
JS
679}
680
3a5a2f56 681MyTreeCtrl::~MyTreeCtrl()
457814b5 682{
457814b5
JS
683}
684
e1ee62bd
VZ
685int MyTreeCtrl::OnCompareItems(const wxTreeItemId& item1,
686 const wxTreeItemId& item2)
687{
5f939e78
VZ
688 if ( m_reverseSort )
689 {
690 // just exchange 1st and 2nd items
691 return wxTreeCtrl::OnCompareItems(item2, item1);
692 }
693 else
694 {
695 return wxTreeCtrl::OnCompareItems(item1, item2);
696 }
e1ee62bd
VZ
697}
698
3a5a2f56
VZ
699void MyTreeCtrl::AddItemsRecursively(const wxTreeItemId& idParent,
700 size_t numChildren,
4832f7c0
VZ
701 size_t depth,
702 size_t folder)
457814b5 703{
f65635b5 704 if ( depth > 0 )
3a5a2f56 705 {
74b31181
VZ
706 bool hasChildren = depth > 1;
707
f65635b5
VZ
708 wxString str;
709 for ( size_t n = 0; n < numChildren; n++ )
710 {
711 // at depth 1 elements won't have any more children
74b31181 712 if ( hasChildren )
4693b20c 713 str.Printf(wxT("%s child %d"), wxT("Folder"), n + 1);
74b31181 714 else
4693b20c 715 str.Printf(wxT("%s child %d.%d"), wxT("File"), folder, n + 1);
f65635b5 716
74b31181
VZ
717 // here we pass to AppendItem() normal and selected item images (we
718 // suppose that selected image follows the normal one in the enum)
2c8e4738
VZ
719 int image, imageSel;
720 if ( wxGetApp().ShowImages() )
721 {
722 image = depth == 1 ? TreeCtrlIcon_File : TreeCtrlIcon_Folder;
723 imageSel = image + 1;
724 }
725 else
726 {
727 image = imageSel = -1;
728 }
729 wxTreeItemId id = AppendItem(idParent, str, image, imageSel,
f65635b5
VZ
730 new MyTreeItemData(str));
731
74b31181 732 // and now we also set the expanded one (only for the folders)
2c8e4738 733 if ( hasChildren && wxGetApp().ShowImages() )
74b31181
VZ
734 {
735 SetItemImage(id, TreeCtrlIcon_FolderOpened,
736 wxTreeItemIcon_Expanded);
737 }
738
f65635b5 739 // remember the last child for OnEnsureVisible()
74b31181 740 if ( !hasChildren && n == numChildren - 1 )
f65635b5
VZ
741 {
742 m_lastItem = id;
743 }
744
745 AddItemsRecursively(id, numChildren, depth - 1, n + 1);
746 }
3a5a2f56 747 }
f65635b5 748 //else: done!
457814b5
JS
749}
750
3a5a2f56
VZ
751void MyTreeCtrl::AddTestItemsToTree(size_t numChildren,
752 size_t depth)
457814b5 753{
2c8e4738 754 int image = wxGetApp().ShowImages() ? MyTreeCtrl::TreeCtrlIcon_Folder : -1;
5f939e78 755 wxTreeItemId rootId = AddRoot("Root",
2c8e4738 756 image, image,
5f939e78 757 new MyTreeItemData("Root item"));
2c8e4738
VZ
758 if ( image != -1 )
759 {
760 SetItemImage(rootId, TreeCtrlIcon_FolderOpened, wxTreeItemIcon_Expanded);
761 }
457814b5 762
5f939e78 763 AddItemsRecursively(rootId, numChildren, depth, 0);
9ec64fa7
VZ
764
765 // set some colours/fonts for testing
766 SetItemFont(rootId, *wxITALIC_FONT);
767
768 long cookie;
769 wxTreeItemId id = GetFirstChild(rootId, cookie);
770 SetItemTextColour(id, *wxBLUE);
771
772 id = GetNextChild(rootId, cookie);
773 id = GetNextChild(rootId, cookie);
774 SetItemTextColour(id, *wxRED);
775 SetItemBackgroundColour(id, *wxLIGHT_GREY);
4832f7c0
VZ
776}
777
778void MyTreeCtrl::GetItemsRecursively(const wxTreeItemId& idParent, long cookie)
779{
5f939e78 780 wxTreeItemId id;
4832f7c0 781
5f939e78
VZ
782 if( cookie == -1 )
783 id = GetFirstChild(idParent, cookie);
784 else
785 id = GetNextChild(idParent, cookie);
4832f7c0 786
5f939e78
VZ
787 if(id <= 0)
788 return;
4832f7c0 789
9dfbf520 790 wxString text = GetItemText(id);
5f939e78 791 wxLogMessage(text);
4832f7c0 792
5f939e78
VZ
793 if (ItemHasChildren(id))
794 GetItemsRecursively(id,-1);
4832f7c0 795
5f939e78 796 GetItemsRecursively(idParent, cookie);
457814b5
JS
797}
798
9dfbf520
VZ
799void MyTreeCtrl::DoToggleIcon(const wxTreeItemId& item)
800{
801 int image = GetItemImage(item) == TreeCtrlIcon_Folder ? TreeCtrlIcon_File
802 : TreeCtrlIcon_Folder;
803
804 SetItemImage(item, image);
805}
806
4832f7c0 807
3a5a2f56 808// avoid repetition
4693b20c
MB
809#define TREE_EVENT_HANDLER(name) \
810void MyTreeCtrl::name(wxTreeEvent& event) \
811{ \
812 wxLogMessage(wxT(#name)); \
813 event.Skip(); \
5f939e78 814}
457814b5 815
3a5a2f56 816TREE_EVENT_HANDLER(OnBeginRDrag)
3a5a2f56
VZ
817TREE_EVENT_HANDLER(OnDeleteItem)
818TREE_EVENT_HANDLER(OnGetInfo)
819TREE_EVENT_HANDLER(OnSetInfo)
820TREE_EVENT_HANDLER(OnItemExpanded)
821TREE_EVENT_HANDLER(OnItemExpanding)
822TREE_EVENT_HANDLER(OnItemCollapsed)
823TREE_EVENT_HANDLER(OnSelChanged)
824TREE_EVENT_HANDLER(OnSelChanging)
3dbeaa52 825TREE_EVENT_HANDLER(OnTreeKeyDown)
3a5a2f56
VZ
826
827#undef TREE_EVENT_HANDLER
828
5888ef1e
VZ
829void MyTreeCtrl::OnBeginDrag(wxTreeEvent& event)
830{
831 // need to explicitly allow drag
832 if ( event.GetItem() != GetRootItem() )
833 {
834 m_draggedItem = event.GetItem();
835
4693b20c 836 wxLogMessage(wxT("OnBeginDrag: started dragging %s"),
5888ef1e
VZ
837 GetItemText(m_draggedItem).c_str());
838
839 event.Allow();
840 }
841 else
842 {
4693b20c 843 wxLogMessage(wxT("OnBeginDrag: this item can't be dragged."));
5888ef1e
VZ
844 }
845}
846
847void MyTreeCtrl::OnEndDrag(wxTreeEvent& event)
848{
849 wxTreeItemId itemSrc = m_draggedItem,
850 itemDst = event.GetItem();
e97320d4 851 m_draggedItem = (wxTreeItemId)0l;
5888ef1e
VZ
852
853 // where to copy the item?
854 if ( itemDst.IsOk() && !ItemHasChildren(itemDst) )
855 {
856 // copy to the parent then
857 itemDst = GetParent(itemDst);
858 }
859
860 if ( !itemDst.IsOk() )
861 {
4693b20c 862 wxLogMessage(wxT("OnEndDrag: can't drop here."));
5888ef1e
VZ
863
864 return;
865 }
866
867 wxString text = GetItemText(itemSrc);
4693b20c 868 wxLogMessage(wxT("OnEndDrag: '%s' copied to '%s'."),
5888ef1e
VZ
869 text.c_str(), GetItemText(itemDst).c_str());
870
871 // just do append here - we could also insert it just before/after the item
872 // on which it was dropped, but this requires slightly more work... we also
873 // completely ignore the client data and icon of the old item but could
874 // copy them as well.
875 //
876 // Finally, we only copy one item here but we might copy the entire tree if
877 // we were dragging a folder.
2c8e4738
VZ
878 int image = wxGetApp().ShowImages() ? TreeCtrlIcon_File : -1;
879 AppendItem(itemDst, text, image);
5888ef1e
VZ
880}
881
5ea47806
VZ
882void MyTreeCtrl::OnBeginLabelEdit(wxTreeEvent& event)
883{
4693b20c 884 wxLogMessage(wxT("OnBeginLabelEdit"));
5ea47806 885
618a5e38 886 // for testing, prevent this item's label editing
5ea47806
VZ
887 wxTreeItemId itemId = event.GetItem();
888 if ( IsTestItem(itemId) )
889 {
4693b20c 890 wxMessageBox(wxT("You can't edit this item."));
5ea47806
VZ
891
892 event.Veto();
893 }
894}
895
896void MyTreeCtrl::OnEndLabelEdit(wxTreeEvent& event)
897{
4693b20c 898 wxLogMessage(wxT("OnEndLabelEdit"));
5ea47806
VZ
899
900 // don't allow anything except letters in the labels
901 if ( !event.GetLabel().IsWord() )
902 {
4693b20c 903 wxMessageBox(wxT("The label should contain only letters."));
5ea47806
VZ
904
905 event.Veto();
906 }
907}
908
3a5a2f56 909void MyTreeCtrl::OnItemCollapsing(wxTreeEvent& event)
457814b5 910{
4693b20c 911 wxLogMessage(wxT("OnItemCollapsing"));
f135ff73 912
5f939e78
VZ
913 // for testing, prevent the user from collapsing the first child folder
914 wxTreeItemId itemId = event.GetItem();
5ea47806 915 if ( IsTestItem(itemId) )
5f939e78 916 {
4693b20c 917 wxMessageBox(wxT("You can't collapse this item."));
457814b5 918
5f939e78
VZ
919 event.Veto();
920 }
457814b5
JS
921}
922
477350ce 923void MyTreeCtrl::OnItemActivated(wxTreeEvent& event)
457814b5 924{
5f939e78 925 // show some info about this item
477350ce 926 wxTreeItemId itemId = event.GetItem();
5f939e78 927 MyTreeItemData *item = (MyTreeItemData *)GetItemData(itemId);
457814b5 928
5f939e78
VZ
929 if ( item != NULL )
930 {
931 item->ShowInfo(this);
932 }
457814b5 933
4693b20c 934 wxLogMessage(wxT("OnItemActivated"));
5f939e78
VZ
935}
936
e3d0aa77
VZ
937void MyTreeCtrl::OnItemRightClick(wxTreeEvent& event)
938{
939 ShowMenu(event.GetItem(), event.GetPoint());
940}
941
942void MyTreeCtrl::OnRMouseUp(wxMouseEvent& event)
943{
944 wxPoint pt = event.GetPosition();
945 ShowMenu(HitTest(pt), pt);
946}
947
948void MyTreeCtrl::ShowMenu(wxTreeItemId id, const wxPoint& pt)
949{
950 wxString title;
951 if ( id.IsOk() )
952 {
953 title << _T("Menu for ") << GetItemText(id);
954 }
955 else
956 {
957 title = _T("Menu for no particular item");
958 }
959
801bb685 960#if wxUSE_MENUS
e3d0aa77
VZ
961 wxMenu menu(title);
962 menu.Append(TreeTest_About, _T("&About..."));
963 menu.Append(TreeTest_Dump, _T("&Dump"));
964
965 PopupMenu(&menu, pt);
801bb685 966#endif // wxUSE_MENUS
e3d0aa77
VZ
967}
968
5f939e78
VZ
969void MyTreeCtrl::OnRMouseDClick(wxMouseEvent& event)
970{
971 wxTreeItemId id = HitTest(event.GetPosition());
972 if ( !id )
4693b20c 973 wxLogMessage(wxT("No item under mouse"));
5f939e78
VZ
974 else
975 {
976 MyTreeItemData *item = (MyTreeItemData *)GetItemData(id);
977 if ( item )
4693b20c 978 wxLogMessage(wxT("Item '%s' under mouse"), item->GetDesc());
5f939e78 979 }
457814b5
JS
980}
981
4693b20c 982static inline const wxChar *Bool2String(bool b)
457814b5 983{
4693b20c 984 return b ? wxT("") : wxT("not ");
457814b5
JS
985}
986
9769e589 987void MyTreeItemData::ShowInfo(wxTreeCtrl *tree)
457814b5 988{
4693b20c
MB
989 wxLogMessage(wxT("Item '%s': %sselected, %sexpanded, %sbold,\n")
990 wxT("%u children (%u immediately under this item)."),
5f939e78
VZ
991 m_desc.c_str(),
992 Bool2String(tree->IsSelected(GetId())),
993 Bool2String(tree->IsExpanded(GetId())),
994 Bool2String(tree->IsBold(GetId())),
995 tree->GetChildrenCount(GetId()),
996 tree->GetChildrenCount(GetId(), FALSE));
457814b5 997}