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