src/motif/menu.cpp

   1 /////////////////////////////////////////////////////////////////////////////
   2 // Name:        menu.cpp
   3 // Purpose:     wxMenu, wxMenuBar, wxMenuItem
   4 // Author:      Julian Smart
   5 // Modified by:
   6 // Created:     17/09/98
   7 // RCS-ID:      $Id$
   8 // Copyright:   (c) Julian Smart
   9 // Licence:     wxWindows licence
  10 /////////////////////////////////////////////////////////////////////////////
  11
  12
  13 // ============================================================================
  14 // declarations
  15 // ============================================================================
  16
  17 #ifdef __GNUG__
  18     #pragma implementation "menu.h"
  19 #endif
  20
  21 // ----------------------------------------------------------------------------
  22 // headers
  23 // ----------------------------------------------------------------------------
  24
  25 #include "wx/defs.h"
  26
  27 #include "wx/menu.h"
  28 #include "wx/menuitem.h"
  29 #include "wx/log.h"
  30 #include "wx/utils.h"
  31 #include "wx/app.h"
  32 #include "wx/frame.h"
  33 #include "wx/settings.h"
  34
  35 #ifdef __VMS__
  36 #pragma message disable nosimpint
  37 #define XtDisplay XTDISPLAY
  38 #define XtWindow XTWINDOW
  39 #endif
  40 #include <Xm/Label.h>
  41 #include <Xm/LabelG.h>
  42 #include <Xm/CascadeBG.h>
  43 #include <Xm/CascadeB.h>
  44 #include <Xm/SeparatoG.h>
  45 #include <Xm/PushBG.h>
  46 #include <Xm/ToggleB.h>
  47 #include <Xm/ToggleBG.h>
  48 #include <Xm/RowColumn.h>
  49 #ifdef __VMS__
  50 #pragma message enable nosimpint
  51 #endif
  52
  53 #include "wx/motif/private.h"
  54
  55 // other standard headers
  56 #include <string.h>
  57
  58 IMPLEMENT_DYNAMIC_CLASS(wxMenu, wxEvtHandler)
  59 IMPLEMENT_DYNAMIC_CLASS(wxMenuBar, wxEvtHandler)
  60
  61 // ============================================================================
  62 // implementation
  63 // ============================================================================
  64
  65 // ----------------------------------------------------------------------------
  66 // Menus
  67 // ----------------------------------------------------------------------------
  68
  69 // Construct a menu with optional title (then use append)
  70 void wxMenu::Init()
  71 {
  72     // Motif-specific members
  73     m_numColumns = 1;
  74     m_menuWidget = (WXWidget) NULL;
  75     m_popupShell = (WXWidget) NULL;
  76     m_buttonWidget = (WXWidget) NULL;
  77     m_menuId = 0;
  78     m_topLevelMenu  = (wxMenu*) NULL;
  79     m_ownedByMenuBar = FALSE;
  80
  81     if ( !!m_title )
  82     {
  83         Append(wxID_SEPARATOR, m_title) ;
  84         AppendSeparator() ;
  85     }
  86
  87     m_backgroundColour = wxSystemSettings::GetSystemColour(wxSYS_COLOUR_MENU);
  88     m_foregroundColour = wxSystemSettings::GetSystemColour(wxSYS_COLOUR_MENUTEXT);
  89     m_font = wxSystemSettings::GetSystemFont(wxSYS_DEFAULT_GUI_FONT);
  90 }
  91
  92 // The wxWindow destructor will take care of deleting the submenus.
  93 wxMenu::~wxMenu()
  94 {
  95     if (m_menuWidget)
  96     {
  97         if (m_menuParent)
  98             DestroyMenu(TRUE);
  99         else
 100             DestroyMenu(FALSE);
 101     }
 102
 103     // Not sure if this is right
 104     if (m_menuParent && m_menuBar)
 105     {
 106         m_menuParent = NULL;
 107         //      m_menuBar = NULL;
 108     }
 109 }
 110
 111 void wxMenu::Break()
 112 {
 113     m_numColumns++;
 114 }
 115
 116 // function appends a new item or submenu to the menu
 117 bool wxMenu::DoAppend(wxMenuItem *pItem)
 118 {
 119     if (m_menuWidget)
 120     {
 121         // this is a dynamic Append
 122         pItem->CreateItem(m_menuWidget, m_menuBar, m_topLevelMenu);
 123     }
 124
 125     if ( pItem->IsSubMenu() )
 126     {
 127         pItem->GetSubMenu()->m_topLevelMenu = m_topLevelMenu;
 128     }
 129
 130     return wxMenuBase::DoAppend(pItem);
 131 }
 132
 133 wxMenuItem *wxMenu::DoRemove(wxMenuItem *item)
 134 {
 135     item->DestroyItem(TRUE);
 136
 137     return wxMenuBase::DoRemove(item);
 138 }
 139
 140 bool wxMenu::DoInsert(size_t pos, wxMenuItem *item)
 141 {
 142     if ( !wxMenuBase::DoInsert(pos, item) )
 143         return FALSE;
 144
 145     wxFAIL_MSG(wxT("not implemented"));
 146
 147     return FALSE;
 148 }
 149
 150 void wxMenu::SetTitle(const wxString& label)
 151 {
 152     m_title = label;
 153
 154     wxMenuItemList::Node *node = GetMenuItems().GetFirst();
 155     if ( !node )
 156         return;
 157
 158     wxMenuItem *item = node->GetData ();
 159     Widget widget = (Widget) item->GetButtonWidget();
 160     if ( !widget )
 161         return;
 162
 163     wxXmString title_str(label);
 164     XtVaSetValues(widget,
 165                   XmNlabelString, title_str(),
 166                   NULL);
 167 }
 168
 169 bool wxMenu::ProcessCommand(wxCommandEvent & event)
 170 {
 171     bool processed = FALSE;
 172
 173 #if wxUSE_MENU_CALLBACK
 174     // Try a callback
 175     if (m_callback)
 176     {
 177         (void) (*(m_callback)) (*this, event);
 178         processed = TRUE;
 179     }
 180 #endif // wxUSE_MENU_CALLBACK
 181
 182     // Try the menu's event handler
 183     if ( !processed && GetEventHandler())
 184     {
 185         processed = GetEventHandler()->ProcessEvent(event);
 186     }
 187     // Try the window the menu was popped up from (and up
 188     // through the hierarchy)
 189     if ( !processed && GetInvokingWindow())
 190         processed = GetInvokingWindow()->ProcessEvent(event);
 191
 192     return processed;
 193 }
 194
 195 // ----------------------------------------------------------------------------
 196 // Menu Bar
 197 // ----------------------------------------------------------------------------
 198
 199 void wxMenuBar::Init()
 200 {
 201     m_eventHandler = this;
 202     m_menuBarFrame = NULL;
 203     m_mainWidget = (WXWidget) NULL;
 204     m_backgroundColour = wxSystemSettings::GetSystemColour(wxSYS_COLOUR_MENU);
 205     m_foregroundColour = wxSystemSettings::GetSystemColour(wxSYS_COLOUR_MENUTEXT);
 206     m_font = wxSystemSettings::GetSystemFont(wxSYS_DEFAULT_GUI_FONT);
 207 }
 208
 209 wxMenuBar::wxMenuBar(int n, wxMenu *menus[], const wxString titles[])
 210 {
 211     Init();
 212
 213     for ( int i = 0; i < n; i++ )
 214     {
 215         m_menus.Append(menus[i]);
 216         m_titles.Add(titles[i]);
 217     }
 218 }
 219
 220 wxMenuBar::~wxMenuBar()
 221 {
 222     // nothing to do: wxMenuBarBase will delete the menus
 223 }
 224
 225 void wxMenuBar::EnableTop(size_t WXUNUSED(pos), bool WXUNUSED(flag))
 226 {
 227   //    wxFAIL_MSG("TODO");
 228 //  wxLogWarning("wxMenuBar::EnableTop not yet implemented.");
 229 }
 230
 231 void wxMenuBar::SetLabelTop(size_t pos, const wxString& label)
 232 {
 233     wxMenu *menu = GetMenu(pos);
 234     if ( !menu )
 235         return;
 236
 237     Widget w = (Widget)menu->GetButtonWidget();
 238     if (w)
 239     {
 240         wxXmString label_str(label);
 241
 242         XtVaSetValues(w,
 243                       XmNlabelString, label_str(),
 244                       NULL);
 245     }
 246 }
 247
 248 wxString wxMenuBar::GetLabelTop(size_t pos) const
 249 {
 250     wxString str;
 251
 252     wxMenu *menu = GetMenu(pos);
 253     if ( menu )
 254     {
 255         Widget w = (Widget)menu->GetButtonWidget();
 256         if (w)
 257         {
 258             XmString text;
 259             XtVaGetValues(w,
 260                           XmNlabelString, &text,
 261                           NULL);
 262
 263             char *s;
 264             if ( XmStringGetLtoR(text, XmSTRING_DEFAULT_CHARSET, &s) )
 265             {
 266                 str = s;
 267
 268                 XtFree(s);
 269             }
 270         }
 271     }
 272
 273     return str;
 274 }
 275
 276 bool wxMenuBar::Append(wxMenu * menu, const wxString& title)
 277 {
 278     wxCHECK_MSG( menu, FALSE, wxT("invalid menu") );
 279     wxCHECK_MSG( !menu->GetParent() && !menu->GetButtonWidget(), FALSE,
 280                  wxT("menu already appended") );
 281
 282     if ( m_menuBarFrame )
 283     {
 284         WXWidget w = menu->CreateMenu(this, GetMainWidget(), menu, title, TRUE);
 285         wxCHECK_MSG( w, FALSE, wxT("failed to create menu") );
 286         menu->SetButtonWidget(w);
 287     }
 288
 289     //menu->SetMenuBar(this);
 290
 291     m_titles.Add(title);
 292
 293     return wxMenuBarBase::Append(menu, title);
 294 }
 295
 296 bool wxMenuBar::Insert(size_t pos, wxMenu *menu, const wxString& title)
 297 {
 298     if ( !wxMenuBarBase::Insert(pos, menu, title) )
 299         return FALSE;
 300
 301     wxFAIL_MSG(wxT("TODO"));
 302
 303     return FALSE;
 304 }
 305
 306 wxMenu *wxMenuBar::Replace(size_t pos, wxMenu *menu, const wxString& title)
 307 {
 308     if ( !wxMenuBarBase::Replace(pos, menu, title) )
 309         return FALSE;
 310
 311     wxFAIL_MSG(wxT("TODO"));
 312
 313     return NULL;
 314 }
 315
 316 wxMenu *wxMenuBar::Remove(size_t pos)
 317 {
 318     wxMenu *menu = wxMenuBarBase::Remove(pos);
 319     if ( !menu )
 320         return NULL;
 321
 322     if ( m_menuBarFrame )
 323         menu->DestroyMenu(TRUE);
 324
 325     menu->SetMenuBar(NULL);
 326
 327     m_titles.Remove(pos);
 328
 329     return menu;
 330 }
 331
 332 // Find the menu menuString, item itemString, and return the item id.
 333 // Returns -1 if none found.
 334 int wxMenuBar::FindMenuItem (const wxString& menuString, const wxString& itemString) const
 335 {
 336     char buf1[200];
 337     char buf2[200];
 338     wxStripMenuCodes ((char *)(const char *)menuString, buf1);
 339
 340     size_t menuCount = GetMenuCount();
 341     for (size_t i = 0; i < menuCount; i++)
 342     {
 343         wxStripMenuCodes ((char *)(const char *)m_titles[i], buf2);
 344         if (strcmp (buf1, buf2) == 0)
 345             return m_menus[i]->FindItem (itemString);
 346     }
 347     return -1;
 348 }
 349
 350 wxMenuItem *wxMenuBar::FindItem(int id, wxMenu ** itemMenu) const
 351 {
 352     if (itemMenu)
 353         *itemMenu = NULL;
 354
 355     wxMenuItem *item = NULL;
 356     size_t menuCount = GetMenuCount();
 357     for (size_t i = 0; i < menuCount; i++)
 358         if ((item = m_menus[i]->FindItem(id, itemMenu)))
 359             return item;
 360         return NULL;
 361 }
 362
 363 // Create menubar
 364 bool wxMenuBar::CreateMenuBar(wxFrame* parent)
 365 {
 366     if (m_mainWidget)
 367     {
 368         XtVaSetValues((Widget) parent->GetMainWidget(), XmNmenuBar, (Widget) m_mainWidget, NULL);
 369         /*
 370         if (!XtIsManaged((Widget) m_mainWidget))
 371         XtManageChild((Widget) m_mainWidget);
 372         */
 373         XtMapWidget((Widget) m_mainWidget);
 374         return TRUE;
 375     }
 376
 377     Widget menuBarW = XmCreateMenuBar ((Widget) parent->GetMainWidget(), "MenuBar", NULL, 0);
 378     m_mainWidget = (WXWidget) menuBarW;
 379
 380     size_t menuCount = GetMenuCount();
 381     for (size_t i = 0; i < menuCount; i++)
 382     {
 383         wxMenu *menu = GetMenu(i);
 384         wxString title(m_titles[i]);
 385         menu->SetButtonWidget(menu->CreateMenu (this, menuBarW, menu, title, TRUE));
 386
 387         if (strcmp (wxStripMenuCodes(title), "Help") == 0)
 388             XtVaSetValues ((Widget) menuBarW, XmNmenuHelpWidget, (Widget) menu->GetButtonWidget(), NULL);
 389
 390         // tear off menu support
 391 #if (XmVersion >= 1002)
 392         if ( menu->IsTearOff() )
 393         {
 394             XtVaSetValues(GetWidget(menu),
 395                           XmNtearOffModel, XmTEAR_OFF_ENABLED,
 396                           NULL);
 397             Widget tearOff = XmGetTearOffControl(GetWidget(menu));
 398             wxDoChangeForegroundColour((Widget) tearOff, m_foregroundColour);
 399             wxDoChangeBackgroundColour((Widget) tearOff, m_backgroundColour, TRUE);
 400 #endif
 401         }
 402     }
 403
 404     SetBackgroundColour(m_backgroundColour);
 405     SetForegroundColour(m_foregroundColour);
 406     SetFont(m_font);
 407
 408     XtVaSetValues((Widget) parent->GetMainWidget(), XmNmenuBar, (Widget) m_mainWidget, NULL);
 409     XtRealizeWidget ((Widget) menuBarW);
 410     XtManageChild ((Widget) menuBarW);
 411     SetMenuBarFrame(parent);
 412
 413     return TRUE;
 414 }
 415
 416 // Destroy menubar, but keep data structures intact so we can recreate it.
 417 bool wxMenuBar::DestroyMenuBar()
 418 {
 419     if (!m_mainWidget)
 420     {
 421         SetMenuBarFrame((wxFrame*) NULL);
 422         return FALSE;
 423     }
 424
 425     XtUnmanageChild ((Widget) m_mainWidget);
 426     XtUnrealizeWidget ((Widget) m_mainWidget);
 427
 428     size_t menuCount = GetMenuCount();
 429     for (size_t i = 0; i < menuCount; i++)
 430     {
 431         wxMenu *menu = GetMenu(i);
 432         menu->DestroyMenu(TRUE);
 433
 434     }
 435     XtDestroyWidget((Widget) m_mainWidget);
 436     m_mainWidget = (WXWidget) 0;
 437
 438     SetMenuBarFrame((wxFrame*) NULL);
 439
 440     return TRUE;
 441 }
 442
 443 //// Motif-specific
 444 static XtWorkProcId WorkProcMenuId;
 445
 446 /* Since PopupMenu under Motif stills grab right mouse button events
 447 * after it was closed, we need to delete the associated widgets to
 448 * allow next PopUpMenu to appear...
 449 */
 450
 451 int PostDeletionOfMenu( XtPointer* clientData )
 452 {
 453     XtRemoveWorkProc(WorkProcMenuId);
 454     wxMenu *menu = (wxMenu *)clientData;
 455
 456     if (menu->GetMainWidget())
 457     {
 458         wxMenu *menuParent = menu->GetParent();
 459         if ( menuParent )
 460         {
 461             wxMenuItemList::Node *node = menuParent->GetMenuItems().GetFirst();
 462             while ( node )
 463             {
 464                 if ( node->GetData()->GetSubMenu() == menu )
 465                 {
 466                     menuParent->GetMenuItems().DeleteNode(node);
 467
 468                     break;
 469                 }
 470
 471                 node = node->GetNext();
 472             }
 473         }
 474
 475         menu->DestroyMenu(TRUE);
 476     }
 477
 478     // Mark as no longer popped up
 479     menu->m_menuId = -1;
 480
 481     return TRUE;
 482 }
 483
 484 void
 485 wxMenuPopdownCallback(Widget WXUNUSED(w), XtPointer clientData,
 486                       XtPointer WXUNUSED(ptr))
 487 {
 488     wxMenu *menu = (wxMenu *)clientData;
 489
 490     // Added by JOREL Jean-Charles <jjorel@silr.ireste.fr>
 491     /* Since Callbacks of MenuItems are not yet processed, we put a
 492     * background job which will be done when system will be idle.
 493     * What awful hack!! :(
 494     */
 495
 496     WorkProcMenuId = XtAppAddWorkProc(
 497         (XtAppContext) wxTheApp->GetAppContext(),
 498         (XtWorkProc) PostDeletionOfMenu,
 499         (XtPointer) menu );
 500     // Apparently not found in Motif headers
 501     //  XtVaSetValues( w, XmNpopupEnabled, XmPOPUP_DISABLED, NULL );
 502 }
 503
 504 /*
 505 * Create a popup or pulldown menu.
 506 * Submenus of a popup will be pulldown.
 507 *
 508 */
 509
 510 WXWidget wxMenu::CreateMenu (wxMenuBar * menuBar, WXWidget parent, wxMenu * topMenu, const wxString& title, bool pullDown)
 511 {
 512     Widget menu = (Widget) 0;
 513     Widget buttonWidget = (Widget) 0;
 514     Arg args[5];
 515     XtSetArg (args[0], XmNnumColumns, m_numColumns);
 516     XtSetArg (args[1], XmNpacking, XmPACK_COLUMN);
 517
 518     if (!pullDown)
 519     {
 520         menu = XmCreatePopupMenu ((Widget) parent, "popup", args, 2);
 521         XtAddCallback(menu,
 522             XmNunmapCallback,
 523             (XtCallbackProc)wxMenuPopdownCallback,
 524             (XtPointer)this);
 525     }
 526     else
 527     {
 528         char mnem = wxFindMnemonic (title);
 529         wxStripMenuCodes ((char*) (const char*) title, wxBuffer);
 530
 531         menu = XmCreatePulldownMenu ((Widget) parent, "pulldown", args, 2);
 532
 533         wxString title2(wxStripMenuCodes(title));
 534         wxXmString label_str(title2);
 535         buttonWidget = XtVaCreateManagedWidget(title2,
 536 #if wxUSE_GADGETS
 537             xmCascadeButtonGadgetClass, (Widget) parent,
 538 #else
 539             xmCascadeButtonWidgetClass, (Widget) parent,
 540 #endif
 541             XmNlabelString, label_str(),
 542             XmNsubMenuId, menu,
 543             NULL);
 544
 545         if (mnem != 0)
 546             XtVaSetValues (buttonWidget, XmNmnemonic, mnem, NULL);
 547     }
 548
 549     m_menuWidget = (WXWidget) menu;
 550
 551     m_menuBar = menuBar;
 552     m_topLevelMenu = topMenu;
 553
 554     for ( wxMenuItemList::Node *node = GetMenuItems().GetFirst();
 555           node;
 556           node = node->GetNext() )
 557     {
 558         wxMenuItem *item = node->GetData();
 559
 560         item->CreateItem(menu, menuBar, topMenu);
 561     }
 562
 563     SetBackgroundColour(m_backgroundColour);
 564     SetForegroundColour(m_foregroundColour);
 565     SetFont(m_font);
 566
 567     return buttonWidget;
 568 }
 569
 570 // Destroys the Motif implementation of the menu,
 571 // but maintains the wxWindows data structures so we can
 572 // do a CreateMenu again.
 573 void wxMenu::DestroyMenu (bool full)
 574 {
 575     for ( wxMenuItemList::Node *node = GetMenuItems().GetFirst();
 576           node;
 577           node = node->GetNext() )
 578     {
 579         wxMenuItem *item = node->GetData();
 580         item->SetMenuBar((wxMenuBar*) NULL);
 581
 582         item->DestroyItem(full);
 583     }
 584
 585     if (m_buttonWidget)
 586     {
 587         if (full)
 588         {
 589             XtVaSetValues((Widget) m_buttonWidget, XmNsubMenuId, NULL, NULL);
 590             XtDestroyWidget ((Widget) m_buttonWidget);
 591             m_buttonWidget = (WXWidget) 0;
 592         }
 593     }
 594     if (m_menuWidget && full)
 595     {
 596         XtDestroyWidget((Widget) m_menuWidget);
 597         m_menuWidget = (WXWidget) NULL;
 598     }
 599 }
 600
 601 WXWidget wxMenu::FindMenuItem (int id, wxMenuItem ** it) const
 602 {
 603     if (id == m_menuId)
 604     {
 605         if (it)
 606             *it = (wxMenuItem*) NULL;
 607         return m_buttonWidget;
 608     }
 609
 610     for ( wxMenuItemList::Node *node = GetMenuItems().GetFirst();
 611           node;
 612           node = node->GetNext() )
 613     {
 614         wxMenuItem *item = node->GetData ();
 615         if (item->GetId() == id)
 616         {
 617             if (it)
 618                 *it = item;
 619             return item->GetButtonWidget();
 620         }
 621
 622         if (item->GetSubMenu())
 623         {
 624             WXWidget w = item->GetSubMenu()->FindMenuItem (id, it);
 625             if (w)
 626             {
 627                 return w;
 628             }
 629         }
 630     }
 631
 632     if (it)
 633         *it = (wxMenuItem*) NULL;
 634     return (WXWidget) NULL;
 635 }
 636
 637 void wxMenu::SetBackgroundColour(const wxColour& col)
 638 {
 639     m_backgroundColour = col;
 640     if (m_menuWidget)
 641         wxDoChangeBackgroundColour(m_menuWidget, (wxColour&) col);
 642     if (m_buttonWidget)
 643         wxDoChangeBackgroundColour(m_buttonWidget, (wxColour&) col, TRUE);
 644
 645     for ( wxMenuItemList::Node *node = GetMenuItems().GetFirst();
 646           node;
 647           node = node->GetNext() )
 648     {
 649         wxMenuItem* item = node->GetData();
 650         if (item->GetButtonWidget())
 651         {
 652             // This crashes because it uses gadgets
 653             //            wxDoChangeBackgroundColour(item->GetButtonWidget(), (wxColour&) col, TRUE);
 654         }
 655         if (item->GetSubMenu())
 656             item->GetSubMenu()->SetBackgroundColour((wxColour&) col);
 657     }
 658 }
 659
 660 void wxMenu::SetForegroundColour(const wxColour& col)
 661 {
 662     m_foregroundColour = col;
 663     if (m_menuWidget)
 664         wxDoChangeForegroundColour(m_menuWidget, (wxColour&) col);
 665     if (m_buttonWidget)
 666         wxDoChangeForegroundColour(m_buttonWidget, (wxColour&) col);
 667
 668     for ( wxMenuItemList::Node *node = GetMenuItems().GetFirst();
 669           node;
 670           node = node->GetNext() )
 671     {
 672         wxMenuItem* item = node->GetData();
 673         if (item->GetButtonWidget())
 674         {
 675             // This crashes because it uses gadgets
 676             //            wxDoChangeForegroundColour(item->GetButtonWidget(), (wxColour&) col);
 677         }
 678         if (item->GetSubMenu())
 679             item->GetSubMenu()->SetForegroundColour((wxColour&) col);
 680     }
 681 }
 682
 683 void wxMenu::ChangeFont(bool keepOriginalSize)
 684 {
 685     // lesstif 0.87 hangs when setting XmNfontList
 686 #ifndef LESSTIF_VERSION
 687     if (!m_font.Ok() || !m_menuWidget)
 688         return;
 689
 690     XmFontList fontList = (XmFontList) m_font.GetFontList(1.0, XtDisplay((Widget) m_menuWidget));
 691
 692     XtVaSetValues ((Widget) m_menuWidget,
 693         XmNfontList, fontList,
 694         NULL);
 695     if (m_buttonWidget)
 696     {
 697         XtVaSetValues ((Widget) m_buttonWidget,
 698             XmNfontList, fontList,
 699             NULL);
 700     }
 701
 702     for ( wxMenuItemList::Node *node = GetMenuItems().GetFirst();
 703           node;
 704           node = node->GetNext() )
 705     {
 706         wxMenuItem* item = node->GetData();
 707         if (m_menuWidget && item->GetButtonWidget() && m_font.Ok())
 708         {
 709             XtVaSetValues ((Widget) item->GetButtonWidget(),
 710                 XmNfontList, fontList,
 711                 NULL);
 712         }
 713         if (item->GetSubMenu())
 714             item->GetSubMenu()->ChangeFont(keepOriginalSize);
 715     }
 716 #endif
 717 }
 718
 719 void wxMenu::SetFont(const wxFont& font)
 720 {
 721     m_font = font;
 722     ChangeFont();
 723 }
 724
 725 bool wxMenuBar::SetBackgroundColour(const wxColour& col)
 726 {
 727     m_backgroundColour = col;
 728     if (m_mainWidget)
 729         wxDoChangeBackgroundColour(m_mainWidget, (wxColour&) col);
 730
 731     size_t menuCount = GetMenuCount();
 732     for (size_t i = 0; i < menuCount; i++)
 733         m_menus[i]->SetBackgroundColour((wxColour&) col);
 734
 735     return TRUE;
 736 }
 737
 738 bool wxMenuBar::SetForegroundColour(const wxColour& col)
 739 {
 740     m_foregroundColour = col;
 741     if (m_mainWidget)
 742         wxDoChangeForegroundColour(m_mainWidget, (wxColour&) col);
 743
 744     size_t menuCount = GetMenuCount();
 745     for (size_t i = 0; i < menuCount; i++)
 746         m_menus[i]->SetForegroundColour((wxColour&) col);
 747
 748     return TRUE;
 749 }
 750
 751 void wxMenuBar::ChangeFont(bool WXUNUSED(keepOriginalSize))
 752 {
 753     // Nothing to do for menubar, fonts are kept in wxMenus
 754 }
 755
 756 bool wxMenuBar::SetFont(const wxFont& font)
 757 {
 758     m_font = font;
 759     ChangeFont();
 760
 761     size_t menuCount = GetMenuCount();
 762     for (size_t i = 0; i < menuCount; i++)
 763         m_menus[i]->SetFont(font);
 764
 765     return TRUE;
 766 }
 767