]> git.saurik.com Git - wxWidgets.git/blob - samples/menu/menu.cpp
Warning fix for eVC4 build.
[wxWidgets.git] / samples / menu / menu.cpp
1 /////////////////////////////////////////////////////////////////////////////
2 // Name: samples/menu.cpp
3 // Purpose: wxMenu/wxMenuBar sample
4 // Author: Vadim Zeitlin
5 // Modified by:
6 // Created: 01.11.99
7 // RCS-ID: $Id$
8 // Copyright: (c) 1999 Vadim Zeitlin
9 // Licence: wxWindows licence
10 /////////////////////////////////////////////////////////////////////////////
11
12 // ============================================================================
13 // declarations
14 // ============================================================================
15
16 // ----------------------------------------------------------------------------
17 // headers
18 // ----------------------------------------------------------------------------
19
20 // For compilers that support precompilation, includes "wx/wx.h".
21 #include "wx/wxprec.h"
22
23 #ifdef __BORLANDC__
24 #pragma hdrstop
25 #endif
26
27 #ifndef WX_PRECOMP
28 #include "wx/app.h"
29 #include "wx/frame.h"
30 #include "wx/menu.h"
31 #include "wx/msgdlg.h"
32 #include "wx/log.h"
33 #include "wx/textctrl.h"
34 #include "wx/textdlg.h"
35 #endif
36
37 #if !wxUSE_MENUS
38 // nice try...
39 #error "menu sample requires wxUSE_MENUS=1"
40 #endif // wxUSE_MENUS
41
42 // not all ports have support for EVT_CONTEXT_MENU yet, don't define
43 // USE_CONTEXT_MENU for those which don't
44 #if defined(__WXMOTIF__) || defined(__WXPM__) || defined(__WXX11__) || defined(__WXMGL__)
45 #define USE_CONTEXT_MENU 0
46 #else
47 #define USE_CONTEXT_MENU 1
48 #endif
49
50 // this sample is usefull when new port is developed
51 // and usually new port has majority of flags turned off
52 #if wxUSE_LOG && wxUSE_TEXTCTRL
53 #define USE_LOG_WINDOW 1
54 #else
55 #define USE_LOG_WINDOW 0
56 #endif
57
58 #if wxUSE_OWNER_DRAWN || defined(__WXGTK__)
59 #include "copy.xpm"
60 #endif
61
62 // ----------------------------------------------------------------------------
63 // classes
64 // ----------------------------------------------------------------------------
65
66 // Define a new application
67 class MyApp: public wxApp
68 {
69 public:
70 bool OnInit();
71 };
72
73 // Define a new frame
74 class MyFrame: public wxFrame
75 {
76 public:
77 MyFrame();
78
79 virtual ~MyFrame();
80
81 void LogMenuEvent(const wxCommandEvent& event);
82
83 protected:
84 void OnQuit(wxCommandEvent& event);
85 #if USE_LOG_WINDOW
86 void OnClearLog(wxCommandEvent& event);
87 #endif
88
89 void OnAbout(wxCommandEvent& event);
90
91 void OnDummy(wxCommandEvent& event);
92
93 void OnAppendMenuItem(wxCommandEvent& event);
94 void OnAppendSubMenu(wxCommandEvent& event);
95 void OnDeleteMenuItem(wxCommandEvent& event);
96 void OnInsertMenuItem(wxCommandEvent& event);
97 void OnCheckMenuItem(wxCommandEvent& event);
98 void OnEnableMenuItem(wxCommandEvent& event);
99 void OnGetLabelMenuItem(wxCommandEvent& event);
100 #if wxUSE_TEXTDLG
101 void OnSetLabelMenuItem(wxCommandEvent& event);
102 #endif
103 void OnGetMenuItemInfo(wxCommandEvent& event);
104 #if wxUSE_TEXTDLG
105 void OnFindMenuItem(wxCommandEvent& event);
106 #endif
107
108 void OnAppendMenu(wxCommandEvent& event);
109 void OnInsertMenu(wxCommandEvent& event);
110 void OnDeleteMenu(wxCommandEvent& event);
111 void OnToggleMenu(wxCommandEvent& event);
112 void OnEnableMenu(wxCommandEvent& event);
113 void OnGetLabelMenu(wxCommandEvent& event);
114 void OnSetLabelMenu(wxCommandEvent& event);
115 #if wxUSE_TEXTDLG
116 void OnFindMenu(wxCommandEvent& event);
117 #endif
118
119 void OnTestNormal(wxCommandEvent& event);
120 void OnTestCheck(wxCommandEvent& event);
121 void OnTestRadio(wxCommandEvent& event);
122
123 void OnUpdateSubMenuNormal(wxUpdateUIEvent& event);
124 void OnUpdateSubMenuCheck(wxUpdateUIEvent& event);
125 void OnUpdateSubMenuRadio(wxUpdateUIEvent& event);
126
127 #if USE_CONTEXT_MENU
128 void OnContextMenu(wxContextMenuEvent& event);
129 #else
130 void OnRightUp(wxMouseEvent& event)
131 { ShowContextMenu(event.GetPosition()); }
132 #endif
133
134 void OnMenuOpen(wxMenuEvent& event)
135 {
136 #if USE_LOG_WINDOW
137 LogMenuOpenOrClose(event, _T("opened")); event.Skip();
138 #endif
139 }
140 void OnMenuClose(wxMenuEvent& event)
141 {
142 #if USE_LOG_WINDOW
143 LogMenuOpenOrClose(event, _T("closed")); event.Skip();
144 #endif
145 }
146
147 void OnUpdateCheckMenuItemUI(wxUpdateUIEvent& event);
148
149 void OnSize(wxSizeEvent& event);
150
151 private:
152 void LogMenuOpenOrClose(const wxMenuEvent& event, const wxChar *what);
153 void ShowContextMenu(const wxPoint& pos);
154
155 wxMenu *CreateDummyMenu(wxString *title);
156
157 wxMenuItem *GetLastMenuItem() const;
158
159 // the menu previously detached from the menubar (may be NULL)
160 wxMenu *m_menu;
161
162 // the count of dummy menus already created
163 size_t m_countDummy;
164
165 #if USE_LOG_WINDOW
166 // the control used for logging
167 wxTextCtrl *m_textctrl;
168 #endif
169
170 // the previous log target
171 wxLog *m_logOld;
172
173 DECLARE_EVENT_TABLE()
174 };
175
176 // A small helper class which intercepts all menu events and logs them
177 class MyEvtHandler : public wxEvtHandler
178 {
179 public:
180 MyEvtHandler(MyFrame *frame) { m_frame = frame; }
181
182 void OnMenuEvent(wxCommandEvent& event)
183 {
184 m_frame->LogMenuEvent(event);
185
186 event.Skip();
187 }
188
189 private:
190 MyFrame *m_frame;
191
192 DECLARE_EVENT_TABLE()
193 };
194
195 // ----------------------------------------------------------------------------
196 // constants
197 // ----------------------------------------------------------------------------
198
199 enum
200 {
201 Menu_File_Quit = wxID_EXIT,
202 #if USE_LOG_WINDOW
203 Menu_File_ClearLog,
204 #endif
205
206 Menu_MenuBar_Toggle = 200,
207 Menu_MenuBar_Append,
208 Menu_MenuBar_Insert,
209 Menu_MenuBar_Delete,
210 Menu_MenuBar_Enable,
211 Menu_MenuBar_GetLabel,
212 #if wxUSE_TEXTDLG
213 Menu_MenuBar_SetLabel,
214 Menu_MenuBar_FindMenu,
215 #endif
216
217 Menu_Menu_Append = 300,
218 Menu_Menu_AppendSub,
219 Menu_Menu_Insert,
220 Menu_Menu_Delete,
221 Menu_Menu_Enable,
222 Menu_Menu_Check,
223 Menu_Menu_GetLabel,
224 #if wxUSE_TEXTDLG
225 Menu_Menu_SetLabel,
226 #endif
227 Menu_Menu_GetInfo,
228 #if wxUSE_TEXTDLG
229 Menu_Menu_FindItem,
230 #endif
231
232 Menu_Test_Normal = 400,
233 Menu_Test_Check,
234 Menu_Test_Radio1,
235 Menu_Test_Radio2,
236 Menu_Test_Radio3,
237
238 Menu_SubMenu = 450,
239 Menu_SubMenu_Normal,
240 Menu_SubMenu_Check,
241 Menu_SubMenu_Radio1,
242 Menu_SubMenu_Radio2,
243 Menu_SubMenu_Radio3,
244
245 Menu_Dummy_First = 500,
246 Menu_Dummy_Second,
247 Menu_Dummy_Third,
248 Menu_Dummy_Fourth,
249 Menu_Dummy_Last,
250
251 Menu_Help_About = wxID_ABOUT,
252
253 Menu_Popup_ToBeDeleted = 2000,
254 Menu_Popup_ToBeGreyed,
255 Menu_Popup_ToBeChecked,
256 Menu_Popup_Submenu,
257
258 Menu_Max
259 };
260
261 // ----------------------------------------------------------------------------
262 // event tables
263 // ----------------------------------------------------------------------------
264
265 BEGIN_EVENT_TABLE(MyFrame, wxFrame)
266 EVT_MENU(Menu_File_Quit, MyFrame::OnQuit)
267 #if USE_LOG_WINDOW
268 EVT_MENU(Menu_File_ClearLog, MyFrame::OnClearLog)
269 #endif
270
271 EVT_MENU(Menu_Help_About, MyFrame::OnAbout)
272
273 EVT_MENU(Menu_MenuBar_Toggle, MyFrame::OnToggleMenu)
274 EVT_MENU(Menu_MenuBar_Append, MyFrame::OnAppendMenu)
275 EVT_MENU(Menu_MenuBar_Insert, MyFrame::OnInsertMenu)
276 EVT_MENU(Menu_MenuBar_Delete, MyFrame::OnDeleteMenu)
277 EVT_MENU(Menu_MenuBar_Enable, MyFrame::OnEnableMenu)
278 EVT_MENU(Menu_MenuBar_GetLabel, MyFrame::OnGetLabelMenu)
279 #if wxUSE_TEXTDLG
280 EVT_MENU(Menu_MenuBar_SetLabel, MyFrame::OnSetLabelMenu)
281 EVT_MENU(Menu_MenuBar_FindMenu, MyFrame::OnFindMenu)
282 #endif
283
284 EVT_MENU(Menu_Menu_Append, MyFrame::OnAppendMenuItem)
285 EVT_MENU(Menu_Menu_AppendSub, MyFrame::OnAppendSubMenu)
286 EVT_MENU(Menu_Menu_Insert, MyFrame::OnInsertMenuItem)
287 EVT_MENU(Menu_Menu_Delete, MyFrame::OnDeleteMenuItem)
288 EVT_MENU(Menu_Menu_Enable, MyFrame::OnEnableMenuItem)
289 EVT_MENU(Menu_Menu_Check, MyFrame::OnCheckMenuItem)
290 EVT_MENU(Menu_Menu_GetLabel, MyFrame::OnGetLabelMenuItem)
291 #if wxUSE_TEXTDLG
292 EVT_MENU(Menu_Menu_SetLabel, MyFrame::OnSetLabelMenuItem)
293 #endif
294 EVT_MENU(Menu_Menu_GetInfo, MyFrame::OnGetMenuItemInfo)
295 #if wxUSE_TEXTDLG
296 EVT_MENU(Menu_Menu_FindItem, MyFrame::OnFindMenuItem)
297 #endif
298
299 EVT_MENU(Menu_Test_Normal, MyFrame::OnTestNormal)
300 EVT_MENU(Menu_Test_Check, MyFrame::OnTestCheck)
301 EVT_MENU(Menu_Test_Radio1, MyFrame::OnTestRadio)
302 EVT_MENU(Menu_Test_Radio2, MyFrame::OnTestRadio)
303 EVT_MENU(Menu_Test_Radio3, MyFrame::OnTestRadio)
304
305 EVT_UPDATE_UI(Menu_SubMenu_Normal, MyFrame::OnUpdateSubMenuNormal)
306 EVT_UPDATE_UI(Menu_SubMenu_Check, MyFrame::OnUpdateSubMenuCheck)
307 EVT_UPDATE_UI(Menu_SubMenu_Radio1, MyFrame::OnUpdateSubMenuRadio)
308 EVT_UPDATE_UI(Menu_SubMenu_Radio2, MyFrame::OnUpdateSubMenuRadio)
309 EVT_UPDATE_UI(Menu_SubMenu_Radio3, MyFrame::OnUpdateSubMenuRadio)
310
311 EVT_MENU_RANGE(Menu_Dummy_First, Menu_Dummy_Last, MyFrame::OnDummy)
312
313 EVT_UPDATE_UI(Menu_Menu_Check, MyFrame::OnUpdateCheckMenuItemUI)
314
315 #if USE_CONTEXT_MENU
316 EVT_CONTEXT_MENU(MyFrame::OnContextMenu)
317 #else
318 EVT_RIGHT_UP(MyFrame::OnRightUp)
319 #endif
320
321 EVT_MENU_OPEN(MyFrame::OnMenuOpen)
322 EVT_MENU_CLOSE(MyFrame::OnMenuClose)
323
324 EVT_SIZE(MyFrame::OnSize)
325 END_EVENT_TABLE()
326
327 BEGIN_EVENT_TABLE(MyEvtHandler, wxEvtHandler)
328 EVT_MENU(wxID_ANY, MyEvtHandler::OnMenuEvent)
329 END_EVENT_TABLE()
330
331 // ============================================================================
332 // implementation
333 // ============================================================================
334
335 // ----------------------------------------------------------------------------
336 // MyApp
337 // ----------------------------------------------------------------------------
338
339 IMPLEMENT_APP(MyApp)
340
341 // The `main program' equivalent, creating the windows and returning the
342 // main frame
343 bool MyApp::OnInit()
344 {
345 // Create the main frame window
346 MyFrame* frame = new MyFrame;
347
348 frame->Show(true);
349
350 #if wxUSE_STATUSBAR
351 frame->SetStatusText(_T("Welcome to wxWidgets menu sample"));
352 #endif // wxUSE_STATUSBAR
353
354 SetTopWindow(frame);
355
356 return true;
357 }
358
359 // ----------------------------------------------------------------------------
360 // MyFrame
361 // ----------------------------------------------------------------------------
362
363 // Define my frame constructor
364 MyFrame::MyFrame()
365 : wxFrame((wxFrame *)NULL, wxID_ANY, _T("wxWidgets menu sample"))
366 {
367 #if USE_LOG_WINDOW
368 m_textctrl = NULL;
369 #endif
370 m_menu = NULL;
371 m_countDummy = 0;
372 m_logOld = NULL;
373
374 #if wxUSE_STATUSBAR
375 CreateStatusBar();
376 #endif // wxUSE_STATUSBAR
377
378 // create the menubar
379 wxMenu *fileMenu = new wxMenu;
380
381 wxMenu *stockSubMenu = new wxMenu;
382 stockSubMenu->Append(wxID_ADD);
383 stockSubMenu->Append(wxID_APPLY);
384 stockSubMenu->Append(wxID_BOLD);
385 stockSubMenu->Append(wxID_CANCEL);
386 stockSubMenu->Append(wxID_CLEAR);
387 stockSubMenu->Append(wxID_CLOSE);
388 stockSubMenu->Append(wxID_COPY);
389 stockSubMenu->Append(wxID_CUT);
390 stockSubMenu->Append(wxID_DELETE);
391 stockSubMenu->Append(wxID_FIND);
392 stockSubMenu->Append(wxID_REPLACE);
393 stockSubMenu->Append(wxID_BACKWARD);
394 stockSubMenu->Append(wxID_DOWN);
395 stockSubMenu->Append(wxID_FORWARD);
396 stockSubMenu->Append(wxID_UP);
397 stockSubMenu->Append(wxID_HELP);
398 stockSubMenu->Append(wxID_HOME);
399 stockSubMenu->Append(wxID_INDENT);
400 stockSubMenu->Append(wxID_INDEX);
401 stockSubMenu->Append(wxID_ITALIC);
402 stockSubMenu->Append(wxID_JUSTIFY_CENTER);
403 stockSubMenu->Append(wxID_JUSTIFY_FILL);
404 stockSubMenu->Append(wxID_JUSTIFY_LEFT);
405 stockSubMenu->Append(wxID_JUSTIFY_RIGHT);
406 stockSubMenu->Append(wxID_NEW);
407 stockSubMenu->Append(wxID_NO);
408 stockSubMenu->Append(wxID_OK);
409 stockSubMenu->Append(wxID_OPEN);
410 stockSubMenu->Append(wxID_PASTE);
411 stockSubMenu->Append(wxID_PREFERENCES);
412 stockSubMenu->Append(wxID_PRINT);
413 stockSubMenu->Append(wxID_PREVIEW);
414 stockSubMenu->Append(wxID_PROPERTIES);
415 stockSubMenu->Append(wxID_EXIT);
416 stockSubMenu->Append(wxID_REDO);
417 stockSubMenu->Append(wxID_REFRESH);
418 stockSubMenu->Append(wxID_REMOVE);
419 stockSubMenu->Append(wxID_REVERT_TO_SAVED);
420 stockSubMenu->Append(wxID_SAVE);
421 stockSubMenu->Append(wxID_SAVEAS);
422 stockSubMenu->Append(wxID_STOP);
423 stockSubMenu->Append(wxID_UNDELETE);
424 stockSubMenu->Append(wxID_UNDERLINE);
425 stockSubMenu->Append(wxID_UNDO);
426 stockSubMenu->Append(wxID_UNINDENT);
427 stockSubMenu->Append(wxID_YES);
428 stockSubMenu->Append(wxID_ZOOM_100);
429 stockSubMenu->Append(wxID_ZOOM_FIT);
430 stockSubMenu->Append(wxID_ZOOM_IN);
431 stockSubMenu->Append(wxID_ZOOM_OUT);
432 fileMenu->AppendSubMenu(stockSubMenu, _T("&Standard items demo"));
433
434 #if USE_LOG_WINDOW
435 wxMenuItem *item = new wxMenuItem(fileMenu, Menu_File_ClearLog,
436 _T("Clear &log\tCtrl-L"));
437 #if wxUSE_OWNER_DRAWN || defined(__WXGTK__)
438 item->SetBitmap(copy_xpm);
439 #endif
440 fileMenu->Append(item);
441 fileMenu->AppendSeparator();
442 #endif // USE_LOG_WINDOW
443
444 fileMenu->Append(Menu_File_Quit, _T("E&xit\tAlt-X"), _T("Quit menu sample"));
445
446 wxMenu *menubarMenu = new wxMenu;
447 menubarMenu->Append(Menu_MenuBar_Append, _T("&Append menu\tCtrl-A"),
448 _T("Append a menu to the menubar"));
449 menubarMenu->Append(Menu_MenuBar_Insert, _T("&Insert menu\tCtrl-I"),
450 _T("Insert a menu into the menubar"));
451 menubarMenu->Append(Menu_MenuBar_Delete, _T("&Delete menu\tCtrl-D"),
452 _T("Delete the last menu from the menubar"));
453 menubarMenu->Append(Menu_MenuBar_Toggle, _T("&Toggle menu\tCtrl-T"),
454 _T("Toggle the first menu in the menubar"), true);
455 menubarMenu->AppendSeparator();
456 menubarMenu->Append(Menu_MenuBar_Enable, _T("&Enable menu\tCtrl-E"),
457 _T("Enable or disable the last menu"), true);
458 menubarMenu->AppendSeparator();
459 menubarMenu->Append(Menu_MenuBar_GetLabel, _T("&Get menu label\tCtrl-G"),
460 _T("Get the label of the last menu"));
461 #if wxUSE_TEXTDLG
462 menubarMenu->Append(Menu_MenuBar_SetLabel, _T("&Set menu label\tCtrl-S"),
463 _T("Change the label of the last menu"));
464 menubarMenu->AppendSeparator();
465 menubarMenu->Append(Menu_MenuBar_FindMenu, _T("&Find menu from label\tCtrl-F"),
466 _T("Find a menu by searching for its label"));
467 #endif
468
469 wxMenu* subMenu = new wxMenu;
470 subMenu->Append(Menu_SubMenu_Normal, _T("&Normal submenu item"), _T("Disabled submenu item"));
471 subMenu->AppendCheckItem(Menu_SubMenu_Check, _T("&Check submenu item"), _T("Check submenu item"));
472 subMenu->AppendRadioItem(Menu_SubMenu_Radio1, _T("Radio item &1"), _T("Radio item"));
473 subMenu->AppendRadioItem(Menu_SubMenu_Radio2, _T("Radio item &2"), _T("Radio item"));
474 subMenu->AppendRadioItem(Menu_SubMenu_Radio3, _T("Radio item &3"), _T("Radio item"));
475
476 menubarMenu->Append(Menu_SubMenu, _T("Submenu"), subMenu);
477
478 wxMenu *menuMenu = new wxMenu;
479 menuMenu->Append(Menu_Menu_Append, _T("&Append menu item\tAlt-A"),
480 _T("Append a menu item to the last menu"));
481 menuMenu->Append(Menu_Menu_AppendSub, _T("&Append sub menu\tAlt-S"),
482 _T("Append a sub menu to the last menu"));
483 menuMenu->Append(Menu_Menu_Insert, _T("&Insert menu item\tAlt-I"),
484 _T("Insert a menu item in head of the last menu"));
485 menuMenu->Append(Menu_Menu_Delete, _T("&Delete menu item\tAlt-D"),
486 _T("Delete the last menu item from the last menu"));
487 menuMenu->AppendSeparator();
488 menuMenu->Append(Menu_Menu_Enable, _T("&Enable menu item\tAlt-E"),
489 _T("Enable or disable the last menu item"), true);
490 menuMenu->Append(Menu_Menu_Check, _T("&Check menu item\tAlt-C"),
491 _T("Check or uncheck the last menu item"), true);
492 menuMenu->AppendSeparator();
493 menuMenu->Append(Menu_Menu_GetInfo, _T("Get menu item in&fo\tAlt-F"),
494 _T("Show the state of the last menu item"));
495 #if wxUSE_TEXTDLG
496 menuMenu->Append(Menu_Menu_SetLabel, _T("Set menu item label\tAlt-L"),
497 _T("Set the label of a menu item"));
498 #endif
499 #if wxUSE_TEXTDLG
500 menuMenu->AppendSeparator();
501 menuMenu->Append(Menu_Menu_FindItem, _T("Find menu item from label"),
502 _T("Find a menu item by searching for its label"));
503 #endif
504
505 wxMenu *testMenu = new wxMenu;
506 testMenu->Append(Menu_Test_Normal, _T("&Normal item"));
507 testMenu->AppendSeparator();
508 testMenu->AppendCheckItem(Menu_Test_Check, _T("&Check item"));
509 testMenu->AppendSeparator();
510 testMenu->AppendRadioItem(Menu_Test_Radio1, _T("Radio item &1"));
511 testMenu->AppendRadioItem(Menu_Test_Radio2, _T("Radio item &2"));
512 testMenu->AppendRadioItem(Menu_Test_Radio3, _T("Radio item &3"));
513
514 wxMenu *helpMenu = new wxMenu;
515 helpMenu->Append(Menu_Help_About, _T("&About\tF1"), _T("About menu sample"));
516
517 wxMenuBar* menuBar = new wxMenuBar( wxMB_DOCKABLE );
518
519 menuBar->Append(fileMenu, _T("&File"));
520 menuBar->Append(menubarMenu, _T("Menu&bar"));
521 menuBar->Append(menuMenu, _T("&Menu"));
522 menuBar->Append(testMenu, _T("&Test"));
523 menuBar->Append(helpMenu, _T("&Help"));
524
525 // these items should be initially checked
526 menuBar->Check(Menu_MenuBar_Toggle, true);
527 menuBar->Check(Menu_MenuBar_Enable, true);
528 menuBar->Check(Menu_Menu_Enable, true);
529 menuBar->Check(Menu_Menu_Check, false);
530
531 // associate the menu bar with the frame
532 SetMenuBar(menuBar);
533
534 // intercept all menu events and log them in this custom event handler
535 PushEventHandler(new MyEvtHandler(this));
536
537 #if USE_LOG_WINDOW
538 // create the log text window
539 m_textctrl = new wxTextCtrl(this, wxID_ANY, wxEmptyString,
540 wxDefaultPosition, wxDefaultSize,
541 wxTE_MULTILINE);
542 m_textctrl->SetEditable(false);
543
544 wxLog::SetTimestamp(NULL);
545 m_logOld = wxLog::SetActiveTarget(new wxLogTextCtrl(m_textctrl));
546
547 wxLogMessage(_T("Brief explanations: the commands or the \"Menu\" menu ")
548 _T("append/insert/delete items to/from the last menu.\n")
549 _T("The commands from \"Menubar\" menu work with the ")
550 _T("menubar itself.\n\n")
551 _T("Right click the band below to test popup menus.\n"));
552 #endif
553 #ifdef __POCKETPC__
554 EnableContextMenu();
555 #endif
556 }
557
558 MyFrame::~MyFrame()
559 {
560 delete m_menu;
561
562 // delete the event handler installed in ctor
563 PopEventHandler(true);
564
565 #if USE_LOG_WINDOW
566 // restore old logger
567 delete wxLog::SetActiveTarget(m_logOld);
568 #endif
569 }
570
571 wxMenu *MyFrame::CreateDummyMenu(wxString *title)
572 {
573 wxMenu *menu = new wxMenu;
574 menu->Append(Menu_Dummy_First, _T("&First item\tCtrl-F1"));
575 menu->AppendSeparator();
576 menu->AppendCheckItem(Menu_Dummy_Second, _T("&Second item\tCtrl-F2"));
577
578 if ( title )
579 {
580 title->Printf(_T("Dummy menu &%u"), (unsigned)++m_countDummy);
581 }
582
583 return menu;
584 }
585
586 wxMenuItem *MyFrame::GetLastMenuItem() const
587 {
588 wxMenuBar *menubar = GetMenuBar();
589 wxMenu *menu = menubar->GetMenu(menubar->GetMenuCount() - 1);
590
591 wxMenuItemList::compatibility_iterator node = menu->GetMenuItems().GetLast();
592 if ( !node )
593 {
594 wxLogWarning(_T("No last item in the last menu!"));
595
596 return NULL;
597 }
598 else
599 {
600 return node->GetData();
601 }
602 }
603
604 void MyFrame::LogMenuEvent(const wxCommandEvent& event)
605 {
606 int id = event.GetId();
607
608 wxString msg = wxString::Format(_T("Menu command %d"), id);
609
610 // catch all checkable menubar items and also the check item from the popup
611 // menu
612 wxMenuItem *item = GetMenuBar()->FindItem(id);
613 if ( (item && item->IsCheckable()) || id == Menu_Popup_ToBeChecked )
614 {
615 msg += wxString::Format(_T(" (the item is currently %schecked)"),
616 event.IsChecked() ? _T("") : _T("not "));
617 }
618
619 wxLogMessage(msg);
620 }
621
622 // ----------------------------------------------------------------------------
623 // menu callbacks
624 // ----------------------------------------------------------------------------
625
626 void MyFrame::OnQuit(wxCommandEvent& WXUNUSED(event))
627 {
628 Close(true);
629 }
630
631 #if USE_LOG_WINDOW
632 void MyFrame::OnClearLog(wxCommandEvent& WXUNUSED(event))
633 {
634 m_textctrl->Clear();
635 }
636 #endif
637
638 void MyFrame::OnAbout(wxCommandEvent& WXUNUSED(event))
639 {
640 (void)wxMessageBox(_T("wxWidgets menu sample\n(c) 1999-2001 Vadim Zeitlin"),
641 _T("About wxWidgets menu sample"),
642 wxICON_INFORMATION);
643 }
644
645 void MyFrame::OnDeleteMenu(wxCommandEvent& WXUNUSED(event))
646 {
647 wxMenuBar *mbar = GetMenuBar();
648
649 size_t count = mbar->GetMenuCount();
650 if ( count == 2 )
651 {
652 // don't let delete the first 2 menus
653 wxLogError(_T("Can't delete any more menus"));
654 }
655 else
656 {
657 delete mbar->Remove(count - 1);
658 }
659 }
660
661 void MyFrame::OnInsertMenu(wxCommandEvent& WXUNUSED(event))
662 {
663 wxString title;
664 wxMenu *menu = CreateDummyMenu(&title);
665 GetMenuBar()->Insert(0, menu, title);
666 }
667
668 void MyFrame::OnAppendMenu(wxCommandEvent& WXUNUSED(event))
669 {
670 wxString title;
671 wxMenu *menu = CreateDummyMenu(&title);
672 GetMenuBar()->Append(menu, title);
673 }
674
675 void MyFrame::OnToggleMenu(wxCommandEvent& WXUNUSED(event))
676 {
677 wxMenuBar *mbar = GetMenuBar();
678 if ( !m_menu )
679 {
680 // hide the menu
681 m_menu = mbar->Remove(0);
682 }
683 else
684 {
685 // restore it
686 mbar->Insert(0, m_menu, _T("&File"));
687 m_menu = NULL;
688 }
689 }
690
691 void MyFrame::OnEnableMenu(wxCommandEvent& event)
692 {
693 wxMenuBar *mbar = GetMenuBar();
694 size_t count = mbar->GetMenuCount();
695
696 mbar->EnableTop(count - 1, event.IsChecked());
697 }
698
699 void MyFrame::OnGetLabelMenu(wxCommandEvent& WXUNUSED(event))
700 {
701 wxMenuBar *mbar = GetMenuBar();
702 size_t count = mbar->GetMenuCount();
703
704 wxCHECK_RET( count, _T("no last menu?") );
705
706 wxLogMessage(_T("The label of the last menu item is '%s'"),
707 mbar->GetLabelTop(count - 1).c_str());
708 }
709
710 #if wxUSE_TEXTDLG
711 void MyFrame::OnSetLabelMenu(wxCommandEvent& WXUNUSED(event))
712 {
713 wxMenuBar *mbar = GetMenuBar();
714 size_t count = mbar->GetMenuCount();
715
716 wxCHECK_RET( count, _T("no last menu?") );
717
718 wxString label = wxGetTextFromUser
719 (
720 _T("Enter new label: "),
721 _T("Change last menu text"),
722 mbar->GetLabelTop(count - 1),
723 this
724 );
725
726 if ( !label.empty() )
727 {
728 mbar->SetLabelTop(count - 1, label);
729 }
730 }
731
732 void MyFrame::OnFindMenu(wxCommandEvent& WXUNUSED(event))
733 {
734 wxMenuBar *mbar = GetMenuBar();
735 size_t count = mbar->GetMenuCount();
736
737 wxCHECK_RET( count, _T("no last menu?") );
738
739 wxString label = wxGetTextFromUser
740 (
741 _T("Enter label to search for: "),
742 _T("Find menu"),
743 wxEmptyString,
744 this
745 );
746
747 if ( !label.empty() )
748 {
749 int index = mbar->FindMenu(label);
750
751 if (index == wxNOT_FOUND)
752 {
753 wxLogWarning(_T("No menu with label '%s'"), label.c_str());
754 }
755 else
756 {
757 wxLogMessage(_T("Menu %d has label '%s'"), index, label.c_str());
758 }
759 }
760 }
761 #endif
762
763 void MyFrame::OnDummy(wxCommandEvent& event)
764 {
765 wxLogMessage(_T("Dummy item #%d"), event.GetId() - Menu_Dummy_First + 1);
766 }
767
768 void MyFrame::OnAppendMenuItem(wxCommandEvent& WXUNUSED(event))
769 {
770 wxMenuBar *menubar = GetMenuBar();
771 wxMenu *menu = menubar->GetMenu(menubar->GetMenuCount() - 1);
772
773 menu->AppendSeparator();
774 menu->Append(Menu_Dummy_Third, _T("&Third dummy item\tCtrl-F3"),
775 _T("Checkable item"), true);
776 }
777
778 void MyFrame::OnAppendSubMenu(wxCommandEvent& WXUNUSED(event))
779 {
780 wxMenuBar *menubar = GetMenuBar();
781
782 wxMenu *menu = menubar->GetMenu(menubar->GetMenuCount() - 2);
783
784 menu->Append(Menu_Dummy_Last, _T("&Dummy sub menu"),
785 CreateDummyMenu(NULL), _T("Dummy sub menu help"));
786 }
787
788 void MyFrame::OnDeleteMenuItem(wxCommandEvent& WXUNUSED(event))
789 {
790 wxMenuBar *menubar = GetMenuBar();
791 wxMenu *menu = menubar->GetMenu(menubar->GetMenuCount() - 1);
792
793 size_t count = menu->GetMenuItemCount();
794 if ( !count )
795 {
796 wxLogWarning(_T("No items to delete!"));
797 }
798 else
799 {
800 menu->Destroy(menu->GetMenuItems().Item(count - 1)->GetData());
801 }
802 }
803
804 void MyFrame::OnInsertMenuItem(wxCommandEvent& WXUNUSED(event))
805 {
806 wxMenuBar *menubar = GetMenuBar();
807 wxMenu *menu = menubar->GetMenu(menubar->GetMenuCount() - 1);
808
809 menu->Insert(0, wxMenuItem::New(menu, Menu_Dummy_Fourth,
810 _T("Fourth dummy item\tCtrl-F4")));
811 menu->Insert(1, wxMenuItem::New(menu, wxID_SEPARATOR));
812 }
813
814 void MyFrame::OnEnableMenuItem(wxCommandEvent& WXUNUSED(event))
815 {
816 wxMenuItem *item = GetLastMenuItem();
817
818 if ( item )
819 {
820 item->Enable(!item->IsEnabled());
821 }
822 }
823
824 void MyFrame::OnCheckMenuItem(wxCommandEvent& WXUNUSED(event))
825 {
826 wxMenuItem *item = GetLastMenuItem();
827
828 item->Toggle();
829 }
830
831 void MyFrame::OnUpdateCheckMenuItemUI(wxUpdateUIEvent& event)
832 {
833 wxLogNull nolog;
834
835 wxMenuItem *item = GetLastMenuItem();
836
837 event.Enable(item && item->IsCheckable());
838 }
839
840 void MyFrame::OnGetLabelMenuItem(wxCommandEvent& WXUNUSED(event))
841 {
842 wxMenuItem *item = GetLastMenuItem();
843
844 if ( item )
845 {
846 wxLogMessage(_T("The label of the last menu item is '%s'"),
847 item->GetLabel().c_str());
848 }
849 }
850
851 #if wxUSE_TEXTDLG
852 void MyFrame::OnSetLabelMenuItem(wxCommandEvent& WXUNUSED(event))
853 {
854 wxMenuItem *item = GetLastMenuItem();
855
856 if ( item )
857 {
858 wxString label = wxGetTextFromUser
859 (
860 _T("Enter new label: "),
861 _T("Change last menu item text"),
862 item->GetLabel(),
863 this
864 );
865 label.Replace( _T("\\t"), _T("\t") );
866
867 if ( !label.empty() )
868 {
869 item->SetText(label);
870 }
871 }
872 }
873 #endif
874
875 void MyFrame::OnGetMenuItemInfo(wxCommandEvent& WXUNUSED(event))
876 {
877 wxMenuItem *item = GetLastMenuItem();
878
879 if ( item )
880 {
881 wxString msg;
882 msg << _T("The item is ") << (item->IsEnabled() ? _T("enabled")
883 : _T("disabled"))
884 << _T('\n');
885
886 if ( item->IsCheckable() )
887 {
888 msg << _T("It is checkable and ") << (item->IsChecked() ? _T("") : _T("un"))
889 << _T("checked\n");
890 }
891
892 #if wxUSE_ACCEL
893 wxAcceleratorEntry *accel = item->GetAccel();
894 if ( accel )
895 {
896 msg << _T("Its accelerator is ");
897
898 int flags = accel->GetFlags();
899 if ( flags & wxACCEL_ALT )
900 msg << _T("Alt-");
901 if ( flags & wxACCEL_CTRL )
902 msg << _T("Ctrl-");
903 if ( flags & wxACCEL_SHIFT )
904 msg << _T("Shift-");
905
906 int code = accel->GetKeyCode();
907 switch ( code )
908 {
909 case WXK_F1:
910 case WXK_F2:
911 case WXK_F3:
912 case WXK_F4:
913 case WXK_F5:
914 case WXK_F6:
915 case WXK_F7:
916 case WXK_F8:
917 case WXK_F9:
918 case WXK_F10:
919 case WXK_F11:
920 case WXK_F12:
921 msg << _T('F') << code - WXK_F1 + 1;
922 break;
923
924 // if there are any other keys wxGetAccelFromString() may return,
925 // we should process them here
926
927 default:
928 if ( wxIsalnum(code) )
929 {
930 msg << (wxChar)code;
931
932 break;
933 }
934
935 wxFAIL_MSG( _T("unknown keyboard accel") );
936 }
937
938 delete accel;
939 }
940 else
941 {
942 msg << _T("It doesn't have an accelerator");
943 }
944 #endif // wxUSE_ACCEL
945
946 wxLogMessage(msg);
947 }
948 }
949
950 #if wxUSE_TEXTDLG
951 void MyFrame::OnFindMenuItem(wxCommandEvent& WXUNUSED(event))
952 {
953 wxMenuBar *mbar = GetMenuBar();
954 size_t count = mbar->GetMenuCount();
955
956 wxCHECK_RET( count, _T("no last menu?") );
957
958 wxString label = wxGetTextFromUser
959 (
960 _T("Enter label to search for: "),
961 _T("Find menu item"),
962 wxEmptyString,
963 this
964 );
965
966 if ( !label.empty() )
967 {
968 size_t menuindex;
969 int index = wxNOT_FOUND;
970
971 for (menuindex = 0; (menuindex < count) && (index == wxNOT_FOUND); ++menuindex)
972 {
973 index = mbar->FindMenuItem(mbar->GetMenu(menuindex)->GetTitle(), label);
974 }
975 if (index == wxNOT_FOUND)
976 {
977 wxLogWarning(_T("No menu item with label '%s'"), label.c_str());
978 }
979 else
980 {
981 wxLogMessage(_T("Menu item %d in menu %lu has label '%s'"),
982 index, (unsigned long)menuindex, label.c_str());
983 }
984 }
985 }
986 #endif
987
988 void MyFrame::ShowContextMenu(const wxPoint& pos)
989 {
990 wxMenu menu;
991
992 menu.Append(Menu_Help_About, _T("&About"));
993 menu.Append(Menu_Popup_Submenu, _T("&Submenu"), CreateDummyMenu(NULL));
994 menu.Append(Menu_Popup_ToBeDeleted, _T("To be &deleted"));
995 menu.AppendCheckItem(Menu_Popup_ToBeChecked, _T("To be &checked"));
996 menu.Append(Menu_Popup_ToBeGreyed, _T("To be &greyed"),
997 _T("This menu item should be initially greyed out"));
998 menu.AppendSeparator();
999 menu.Append(Menu_File_Quit, _T("E&xit"));
1000
1001 menu.Delete(Menu_Popup_ToBeDeleted);
1002 menu.Check(Menu_Popup_ToBeChecked, true);
1003 menu.Enable(Menu_Popup_ToBeGreyed, false);
1004
1005 PopupMenu(&menu, pos.x, pos.y);
1006
1007 // test for destroying items in popup menus
1008 #if 0 // doesn't work in wxGTK!
1009 menu.Destroy(Menu_Popup_Submenu);
1010
1011 PopupMenu( &menu, event.GetX(), event.GetY() );
1012 #endif // 0
1013 }
1014
1015 void MyFrame::OnTestNormal(wxCommandEvent& WXUNUSED(event))
1016 {
1017 wxLogMessage(_T("Normal item selected"));
1018 }
1019
1020 void MyFrame::OnTestCheck(wxCommandEvent& event)
1021 {
1022 wxLogMessage(_T("Check item %schecked"),
1023 event.IsChecked() ? _T("") : _T("un"));
1024 }
1025
1026 void MyFrame::OnTestRadio(wxCommandEvent& event)
1027 {
1028 wxLogMessage(_T("Radio item %d selected"),
1029 event.GetId() - Menu_Test_Radio1 + 1);
1030 }
1031
1032 #if USE_LOG_WINDOW
1033 void MyFrame::LogMenuOpenOrClose(const wxMenuEvent& event, const wxChar *what)
1034 {
1035 wxString msg;
1036 msg << _T("A ")
1037 << ( event.IsPopup() ? _T("popup ") : _T("") )
1038 << _T("menu has been ")
1039 << what
1040 << _T(".");
1041
1042 wxLogStatus(this, msg.c_str());
1043 }
1044 #endif
1045
1046 void MyFrame::OnUpdateSubMenuNormal(wxUpdateUIEvent& event)
1047 {
1048 event.Enable(false);
1049 }
1050
1051 void MyFrame::OnUpdateSubMenuCheck(wxUpdateUIEvent& event)
1052 {
1053 event.Enable(true);
1054 }
1055
1056 void MyFrame::OnUpdateSubMenuRadio(wxUpdateUIEvent& event)
1057 {
1058 int which = (event.GetId() - Menu_SubMenu_Radio1 + 1);
1059 if (which == 2)
1060 event.Check(true);
1061 else
1062 event.Check(false);
1063 }
1064
1065 #if USE_CONTEXT_MENU
1066 void MyFrame::OnContextMenu(wxContextMenuEvent& event)
1067 {
1068 wxPoint point = event.GetPosition();
1069 // If from keyboard
1070 if (point.x == -1 && point.y == -1) {
1071 wxSize size = GetSize();
1072 point.x = size.x / 2;
1073 point.y = size.y / 2;
1074 } else {
1075 point = ScreenToClient(point);
1076 }
1077 ShowContextMenu(point);
1078 }
1079 #endif
1080
1081 void MyFrame::OnSize(wxSizeEvent& WXUNUSED(event))
1082 {
1083 #if USE_LOG_WINDOW
1084 if ( !m_textctrl )
1085 return;
1086
1087 // leave a band below for popup menu testing
1088 wxSize size = GetClientSize();
1089 m_textctrl->SetSize(0, 0, size.x, (3*size.y)/4);
1090 #endif
1091
1092 // this is really ugly but we have to do it as we can't just call
1093 // event.Skip() because wxFrameBase would make the text control fill the
1094 // entire frame then
1095 #ifdef __WXUNIVERSAL__
1096 PositionMenuBar();
1097 #endif // __WXUNIVERSAL__
1098 }
1099