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