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