src/os2/menu.cpp

   1 /////////////////////////////////////////////////////////////////////////////
   2 // Name:        menu.cpp
   3 // Purpose:     wxMenu, wxMenuBar, wxMenuItem
   4 // Author:      David Webster
   5 // Modified by:
   6 // Created:     10/10/99
   7 // RCS-ID:      $Id$
   8 // Copyright:   (c) David Webster
   9 // Licence:     wxWindows licence
  10 /////////////////////////////////////////////////////////////////////////////
  11
  12 #ifdef __GNUG__
  13     #pragma implementation "menu.h"
  14 #endif
  15
  16 // For compilers that support precompilation, includes "wx.h".
  17 #include "wx/wxprec.h"
  18
  19 #ifndef WX_PRECOMP
  20     #include "wx/app.h"
  21     #include "wx/frame.h"
  22     #include "wx/menu.h"
  23     #include "wx/utils.h"
  24     #include "wx/intl.h"
  25     #include "wx/log.h"
  26 #endif
  27
  28 #if wxUSE_OWNER_DRAWN
  29     #include "wx/ownerdrw.h"
  30 #endif
  31
  32 #include "wx/os2/private.h"
  33
  34 // other standard headers
  35 #include <string.h>
  36
  37 // ----------------------------------------------------------------------------
  38 // global variables
  39 // ----------------------------------------------------------------------------
  40
  41 extern wxMenu*                      wxCurrentPopupMenu;
  42
  43 // ----------------------------------------------------------------------------
  44 // constants
  45 // ----------------------------------------------------------------------------
  46
  47 //
  48 // The (popup) menu title has this special id
  49 //
  50 static const int                    idMenuTitle = -2;
  51
  52 //
  53 // The unique ID for Menus
  54 //
  55 #ifdef __VISAGECPP__
  56 USHORT                              wxMenu::m_nextMenuId = 0;
  57 #else
  58 static USHORT                       wxMenu::m_nextMenuId = 0;
  59 #endif
  60
  61 // ----------------------------------------------------------------------------
  62 // macros
  63 // ----------------------------------------------------------------------------
  64
  65     IMPLEMENT_DYNAMIC_CLASS(wxMenu, wxEvtHandler)
  66     IMPLEMENT_DYNAMIC_CLASS(wxMenuBar, wxEvtHandler)
  67
  68 // ----------------------------------------------------------------------------
  69 // static function for translating menu labels
  70 // ----------------------------------------------------------------------------
  71
  72 static wxString TextToLabel(const wxString& rTitle)
  73 {
  74     wxString Title;
  75     const wxChar *pc;
  76     for (pc = rTitle; *pc != wxT('\0'); pc++ )
  77     {
  78         if (*pc == wxT('&') )
  79         {
  80             if (*(pc+1) == wxT('&'))
  81             {
  82                 pc++;
  83                 Title << wxT('&');
  84             }
  85             else
  86                 Title << wxT('~');
  87         }
  88 //         else if (*pc == wxT('/'))
  89 //         {
  90 //             Title << wxT('\\');
  91 //         }
  92         else
  93         {
  94             if ( *pc == wxT('~') )
  95             {
  96                 // tildes must be doubled to prevent them from being
  97                 // interpreted as accelerator character prefix by PM ???
  98                 Title << *pc;
  99             }
 100             Title << *pc;
 101         }
 102     }
 103     return Title;
 104 }
 105
 106 // ============================================================================
 107 // implementation
 108 // ============================================================================
 109
 110 // ---------------------------------------------------------------------------
 111 // wxMenu construction, adding and removing menu items
 112 // ---------------------------------------------------------------------------
 113
 114 //
 115 // Construct a menu with optional title (then use append)
 116 //
 117 void wxMenu::Init()
 118 {
 119     m_bDoBreak = FALSE;
 120
 121     //
 122     // Create the menu (to be used as a submenu or a popup)
 123     //
 124     if ((m_hMenu =  ::WinCreateWindow( HWND_DESKTOP
 125                                       ,WC_MENU
 126                                       ,"Menu"
 127                                       ,0L
 128                                       ,0L
 129                                       ,0L
 130                                       ,0L
 131                                       ,0L
 132                                       ,NULLHANDLE
 133                                       ,HWND_TOP
 134                                       ,0L
 135                                       ,NULL
 136                                       ,NULL
 137                                      )) == 0)
 138     {
 139         wxLogLastError("WinLoadMenu");
 140     }
 141     m_vMenuData.iPosition   = 0;
 142     m_vMenuData.afStyle     = MIS_SUBMENU | MIS_TEXT;
 143     m_vMenuData.afAttribute = (USHORT)0;
 144     m_vMenuData.id          = m_nextMenuId++;
 145     m_vMenuData.hwndSubMenu = m_hMenu;
 146     m_vMenuData.hItem       = NULLHANDLE;
 147
 148     //
 149     // If we have a title, insert it in the beginning of the menu
 150     //
 151     if (!m_title.IsEmpty())
 152     {
 153         Append( idMenuTitle
 154                ,m_title
 155               );
 156         AppendSeparator();
 157     }
 158 } // end of wxMenu::Init
 159
 160 //
 161 // The wxWindow destructor will take care of deleting the submenus.
 162 //
 163 wxMenu::~wxMenu()
 164 {
 165     //
 166     // We should free PM resources only if PM doesn't do it for us
 167     // which happens if we're attached to a menubar or a submenu of another
 168     // menu
 169     if (!IsAttached() && !GetParent())
 170     {
 171         if (!::WinDestroyWindow((HWND)GetHmenu()) )
 172         {
 173             wxLogLastError("WinDestroyWindow");
 174         }
 175     }
 176
 177 #if wxUSE_ACCEL
 178     //
 179     // Delete accels
 180     //
 181 #if (!(defined(__VISAGECPP__) && (__IBMCPP__ < 400 || __IBMC__ < 400 )))
 182     WX_CLEAR_ARRAY(m_vAccels);
 183 #endif
 184 #endif // wxUSE_ACCEL
 185 } // end of wxMenu::~wxMenu
 186
 187 void wxMenu::Break()
 188 {
 189     // this will take effect during the next call to Append()
 190     m_bDoBreak = TRUE;
 191 } // end of wxMenu::Break
 192
 193 #if wxUSE_ACCEL
 194
 195 int wxMenu::FindAccel(
 196   int                               nId
 197 ) const
 198 {
 199     size_t                          n;
 200     size_t                          nCount = m_vAccels.GetCount();
 201
 202     for (n = 0; n < nCount; n++)
 203     {
 204         if (m_vAccels[n]->m_command == nId)
 205             return n;
 206     }
 207     return wxNOT_FOUND;
 208 } // end of wxMenu::FindAccel
 209
 210 void wxMenu::UpdateAccel(
 211   wxMenuItem*                       pItem
 212 )
 213 {
 214     //
 215     // Find the (new) accel for this item
 216     //
 217     wxAcceleratorEntry*             pAccel = wxGetAccelFromString(pItem->GetText());
 218
 219     if (pAccel)
 220         pAccel->m_command = pItem->GetId();
 221
 222     //
 223     // Find the old one
 224     //
 225     int                             n = FindAccel(pItem->GetId());
 226
 227     if (n == wxNOT_FOUND)
 228     {
 229         //
 230         // No old, add new if any
 231         //
 232         if (pAccel)
 233             m_vAccels.Add(pAccel);
 234         else
 235             return;     // skipping RebuildAccelTable() below
 236     }
 237     else
 238     {
 239         //
 240         // Replace old with new or just remove the old one if no new
 241         //
 242         delete                      m_vAccels[n];
 243
 244         if (pAccel)
 245             m_vAccels[n] = pAccel;
 246         else
 247             m_vAccels.Remove(n);
 248     }
 249
 250     if (IsAttached())
 251     {
 252         m_menuBar->RebuildAccelTable();
 253     }
 254 } // wxMenu::UpdateAccel
 255
 256 #endif // wxUSE_ACCEL
 257
 258 //
 259 // Append a new item or submenu to the menu
 260 //
 261 bool wxMenu::DoInsertOrAppend(
 262   wxMenuItem*                       pItem
 263 , size_t                            nPos
 264 )
 265 {
 266     ERRORID                         vError;
 267     wxString                        sError;
 268 #if wxUSE_ACCEL
 269     UpdateAccel(pItem);
 270 #endif // wxUSE_ACCEL
 271
 272     //
 273     // rItem is the member MENUITEM for the  menu items and the submenu's
 274     // MENUITEM for submenus as required by ::MM_INSERTITEM message API
 275     //
 276
 277     wxMenu*                         pSubmenu = pItem->GetSubMenu();
 278     MENUITEM    &rItem = (pSubmenu != NULL)?pSubmenu->m_vMenuData:
 279                                             pItem->m_vMenuData;
 280     if(pSubmenu != NULL)
 281     {
 282         wxASSERT_MSG(pSubmenu->GetHMenu(), wxT("invalid submenu"));
 283         pSubmenu->SetParent(this);
 284         rItem.afStyle |= MIS_SUBMENU | MIS_TEXT;
 285     }
 286
 287     //
 288     // If "Break" has just been called, insert a menu break before this item
 289     // (and don't forget to reset the flag)
 290     //
 291     if (m_bDoBreak)
 292     {
 293         rItem.afStyle |= MIS_BREAK;
 294         m_bDoBreak = FALSE;
 295     }
 296
 297     if (pItem->IsSeparator())
 298     {
 299         vItem.afStyle |= MIS_SEPARATOR;
 300     }
 301
 302     //
 303     // Id is the numeric id for normal menu items and HMENU for submenus as
 304     // required by ::MM_INSERTITEM message API
 305     //
 306
 307     wxMenu*                         pSubmenu = pItem->GetSubMenu();
 308
 309     if (pSubmenu != NULL)
 310     {
 311         wxASSERT_MSG(pSubmenu->GetHMenu(), wxT("invalid submenu"));
 312         pSubmenu->SetParent(this);
 313
 314         vItem.iPosition = 0; // submenus have a 0 position
 315         vItem.id = (USHORT)pSubmenu->GetHMenu();
 316         vItem.afStyle |= MIS_SUBMENU | MIS_TEXT;
 317     }
 318     else
 319     {
 320         vItem.id = pItem->GetId();
 321     }
 322
 323     BYTE*                           pData;
 324
 325 #if wxUSE_OWNER_DRAWN
 326     if (pItem->IsOwnerDrawn())
 327     {
 328         //
 329         // Want to get {Measure|Draw}Item messages?
 330         // item draws itself, pass pointer to it in data parameter
 331         // Will eventually need to set the image handle somewhere into vItem.hItem
 332         //
 333         rItem.afStyle |= MIS_OWNERDRAW;
 334         pData = (BYTE*)pItem;
 335         // vItem.hItem = ????
 336     }
 337     else
 338 #endif
 339     {
 340         //
 341         // Menu is just a normal string (passed in data parameter)
 342         //
 343         vItem.afStyle |= MIS_TEXT;
 344         pData = (char*)pItem->GetText().c_str();
 345     }
 346
 347     if (nPos == (size_t)-1)
 348     {
 349         rItem.iPosition = MIT_END;
 350     }
 351     else
 352     {
 353         rItem.iPosition = nPos;
 354     }
 355
 356     APIRET                          rc;
 357
 358     rc = (APIRET)::WinSendMsg( GetHmenu()
 359                               ,MM_INSERTITEM
 360                               ,(MPARAM)&rItem
 361                               ,(MPARAM)pData
 362                              );
 363     if (rc == MIT_MEMERROR || rc == MIT_ERROR)
 364     {
 365         vError = ::WinGetLastError(vHabmain);
 366         sError = wxPMErrorToStr(vError);
 367         wxLogError("Error inserting or appending a menuitem. Error: %s\n", sError);
 368         wxLogLastError("Insert or AppendMenu");
 369         return FALSE;
 370     }
 371     else
 372     {
 373         //
 374         // If we're already attached to the menubar, we must update it
 375         //
 376         if (IsAttached())
 377         {
 378             m_menuBar->Refresh();
 379         }
 380         return TRUE;
 381     }
 382     return FALSE;
 383 } // end of wxMenu::DoInsertOrAppend
 384
 385 bool wxMenu::DoAppend(
 386   wxMenuItem*                       pItem
 387 )
 388 {
 389     return wxMenuBase::DoAppend(pItem) && DoInsertOrAppend(pItem);
 390 }
 391
 392 bool wxMenu::DoInsert(
 393   size_t                            nPos
 394 , wxMenuItem*                       pItem
 395 )
 396 {
 397     return ( wxMenuBase::DoInsert( nPos
 398                                   ,pItem) &&
 399              DoInsertOrAppend( pItem
 400                               ,nPos
 401                              ));
 402 } // end of wxMenu::DoInsert
 403
 404 wxMenuItem* wxMenu::DoRemove(
 405   wxMenuItem*                       pItem
 406 )
 407 {
 408     //
 409     // We need to find the items position in the child list
 410     //
 411     size_t                          nPos;
 412     wxMenuItemList::Node*           pNode = GetMenuItems().GetFirst();
 413
 414     for (nPos = 0; pNode; nPos++)
 415     {
 416         if (pNode->GetData() == pItem)
 417             break;
 418         pNode = pNode->GetNext();
 419     }
 420
 421     //
 422     // DoRemove() (unlike Remove) can only be called for existing item!
 423     //
 424     wxCHECK_MSG(pNode, NULL, wxT("bug in wxMenu::Remove logic"));
 425
 426 #if wxUSE_ACCEL
 427     //
 428     // Remove the corresponding accel from the accel table
 429     //
 430     int                             n = FindAccel(pItem->GetId());
 431
 432     if (n != wxNOT_FOUND)
 433     {
 434         delete m_vAccels[n];
 435         m_vAccels.Remove(n);
 436     }
 437
 438 #endif // wxUSE_ACCEL
 439     //
 440     // Remove the item from the menu
 441     //
 442     ::WinSendMsg( GetHmenu()
 443                  ,MM_REMOVEITEM
 444                  ,MPFROM2SHORT(pItem->GetId(), TRUE)
 445                  ,(MPARAM)0
 446                 );
 447     if (IsAttached())
 448     {
 449         //
 450         // Otherwise, the chane won't be visible
 451         //
 452         m_menuBar->Refresh();
 453     }
 454
 455     //
 456     // And from internal data structures
 457     //
 458     return wxMenuBase::DoRemove(pItem);
 459 } // end of wxMenu::DoRemove
 460
 461 // ---------------------------------------------------------------------------
 462 // accelerator helpers
 463 // ---------------------------------------------------------------------------
 464
 465 #if wxUSE_ACCEL
 466
 467 //
 468 // Create the wxAcceleratorEntries for our accels and put them into provided
 469 // array - return the number of accels we have
 470 //
 471 size_t wxMenu::CopyAccels(
 472   wxAcceleratorEntry*               pAccels
 473 ) const
 474 {
 475     size_t                          nCount = GetAccelCount();
 476
 477     for (size_t n = 0; n < nCount; n++)
 478     {
 479         *pAccels++ = *m_vAccels[n];
 480     }
 481     return nCount;
 482 } // end of wxMenu::CopyAccels
 483
 484 #endif // wxUSE_ACCEL
 485
 486 // ---------------------------------------------------------------------------
 487 // set wxMenu title
 488 // ---------------------------------------------------------------------------
 489
 490 void wxMenu::SetTitle(
 491   const wxString&                   rLabel
 492 )
 493 {
 494     bool                            bHasNoTitle = m_title.IsEmpty();
 495     HWND                            hMenu = GetHmenu();
 496
 497     m_title = rLabel;
 498     if (bHasNoTitle)
 499     {
 500         if (!rLabel.IsEmpty())
 501         {
 502             if (!::WinSetWindowText(hMenu, rLabel.c_str()))
 503             {
 504                 wxLogLastError("SetMenuTitle");
 505             }
 506         }
 507     }
 508     else
 509     {
 510         if (rLabel.IsEmpty() )
 511         {
 512             ::WinSendMsg( GetHmenu()
 513                          ,MM_REMOVEITEM
 514                          ,MPFROM2SHORT(hMenu, TRUE)
 515                          ,(MPARAM)0
 516                         );
 517         }
 518         else
 519         {
 520             //
 521             // Modify the title
 522             //
 523             if (!::WinSetWindowText(hMenu, rLabel.c_str()))
 524             {
 525                 wxLogLastError("SetMenuTitle");
 526             }
 527         }
 528     }
 529 } // end of wxMenu::SetTitle
 530
 531 // ---------------------------------------------------------------------------
 532 // event processing
 533 // ---------------------------------------------------------------------------
 534
 535 bool wxMenu::OS2Command(
 536   WXUINT                            WXUNUSED(uParam)
 537 , WXWORD                            vId
 538 )
 539 {
 540     //
 541     // Ignore commands from the menu title
 542     //
 543
 544     if (vId != (WXWORD)idMenuTitle)
 545     {
 546         wxCommandEvent              vEvent(wxEVT_COMMAND_MENU_SELECTED);
 547
 548         vEvent.SetEventObject(this);
 549         vEvent.SetId(vId);
 550         vEvent.SetInt(vId);
 551         ProcessCommand(vEvent);
 552     }
 553     return TRUE;
 554 } // end of wxMenu::OS2Command
 555
 556 bool wxMenu::ProcessCommand(
 557   wxCommandEvent&                   rEvent
 558 )
 559 {
 560     bool                            bProcessed = FALSE;
 561
 562 #if wxUSE_MENU_CALLBACK
 563     //
 564     // Try a callback
 565     //
 566     if (m_callback)
 567     {
 568         (void)(*(m_callback))(*this, rEvent);
 569         bProcessed = TRUE;
 570     }
 571 #endif // wxUSE_MENU_CALLBACK
 572
 573     //
 574     // Try the menu's event handler
 575     //
 576     if (!bProcessed && GetEventHandler())
 577     {
 578         bProcessed = GetEventHandler()->ProcessEvent(rEvent);
 579     }
 580
 581     //
 582     // Try the window the menu was popped up from (and up through the
 583     // hierarchy)
 584     wxWindow*                       pWin = GetInvokingWindow();
 585
 586     if (!bProcessed && pWin)
 587         bProcessed = pWin->GetEventHandler()->ProcessEvent(rEvent);
 588     return bProcessed;
 589 } // end of wxMenu::ProcessCommand
 590
 591 // ---------------------------------------------------------------------------
 592 // other
 593 // ---------------------------------------------------------------------------
 594
 595 void wxMenu::Attach(
 596   wxMenuBar*                        pMenubar
 597 )
 598 {
 599     //
 600     // Menu can be in at most one menubar because otherwise they would both
 601     // delete the menu pointer
 602     //
 603     wxASSERT_MSG(!m_menuBar, wxT("menu belongs to 2 menubars, expect a crash"));
 604     m_menuBar = pMenubar;
 605 } // end of
 606
 607 void wxMenu::Detach()
 608 {
 609     wxASSERT_MSG( m_menuBar, wxT("can't detach menu if it's not attached") );
 610     m_menuBar = NULL;
 611 } // end of wxMenu::Detach
 612
 613 wxWindow* wxMenu::GetWindow() const
 614 {
 615     if (m_invokingWindow != NULL)
 616         return m_invokingWindow;
 617     else if ( m_menuBar != NULL)
 618         return m_menuBar->GetFrame();
 619
 620     return NULL;
 621 } // end of wxMenu::GetWindow
 622
 623 // ---------------------------------------------------------------------------
 624 // Menu Bar
 625 // ---------------------------------------------------------------------------
 626
 627 void wxMenuBar::Init()
 628 {
 629     m_eventHandler = this;
 630     m_pMenuBarFrame = NULL;
 631     m_hMenu = 0;
 632 } // end of wxMenuBar::Init
 633
 634 wxMenuBar::wxMenuBar()
 635 {
 636     Init();
 637 } // end of wxMenuBar::wxMenuBar
 638
 639 wxMenuBar::wxMenuBar(
 640  long                               WXUNUSED(lStyle)
 641 )
 642 {
 643     Init();
 644 } // end of wxMenuBar::wxMenuBar
 645
 646 wxMenuBar::wxMenuBar(
 647   int                               nCount
 648 , wxMenu*                           vMenus[]
 649 , const wxString                    sTitles[]
 650 )
 651 {
 652     Init();
 653
 654     m_titles.Alloc(nCount);
 655     for ( int i = 0; i < nCount; i++ )
 656     {
 657         m_menus.Append(vMenus[i]);
 658         m_titles.Add(sTitles[i]);
 659         vMenus[i]->Attach(this);
 660     }
 661 } // end of wxMenuBar::wxMenuBar
 662
 663 wxMenuBar::~wxMenuBar()
 664 {
 665 } // end of wxMenuBar::~wxMenuBar
 666
 667 // ---------------------------------------------------------------------------
 668 // wxMenuBar helpers
 669 // ---------------------------------------------------------------------------
 670
 671 void wxMenuBar::Refresh()
 672 {
 673     wxCHECK_RET( IsAttached(), wxT("can't refresh unatteched menubar") );
 674
 675     WinSendMsg(GetWinHwnd(m_pMenuBarFrame), WM_UPDATEFRAME, (MPARAM)FCF_MENU, (MPARAM)0);
 676 } // end of wxMenuBar::Refresh
 677
 678 WXHMENU wxMenuBar::Create()
 679 {
 680     MENUITEM                        vItem;
 681     HWND                            hFrame;
 682
 683     if (m_hMenu != 0 )
 684         return m_hMenu;
 685
 686     wxCHECK_MSG(!m_hMenu, TRUE, wxT("menubar already created"));
 687
 688     //
 689     // Menubars should be associated with a frame otherwise they are popups
 690     //
 691     if (m_pMenuBarFrame != NULL)
 692         hFrame = GetWinHwnd(m_pMenuBarFrame);
 693     else
 694         hFrame = HWND_DESKTOP;
 695     //
 696     // Create an empty menu and then fill it with insertions
 697     //
 698     if ((m_hMenu =  ::WinCreateWindow( hFrame
 699                                       ,WC_MENU
 700                                       ,(PSZ)NULL
 701                                       ,MS_ACTIONBAR | WS_SYNCPAINT | WS_VISIBLE
 702                                       ,0L
 703                                       ,0L
 704                                       ,0L
 705                                       ,0L
 706                                       ,hFrame
 707                                       ,HWND_TOP
 708                                       ,FID_MENU
 709                                       ,NULL
 710                                       ,NULL
 711                                      )) == 0)
 712     {
 713         wxLogLastError("WinLoadMenu");
 714     }
 715     else
 716     {
 717         size_t                      nCount = GetMenuCount();
 718
 719         for (size_t i = 0; i < nCount; i++)
 720         {
 721             APIRET                  rc;
 722             ERRORID                 vError;
 723             wxString                sError;
 724             HWND                    hSubMenu;
 725
 726             //
 727             // Set the parent and owner of the submenues to be the menubar, not the desktop
 728             //
 729             hSubMenu = m_menus[i]->m_vMenuData.hwndSubMenu;
 730             if (!::WinSetParent(m_menus[i]->m_vMenuData.hwndSubMenu, m_hMenu, FALSE))
 731             {
 732                 vError = ::WinGetLastError(vHabmain);
 733                 sError = wxPMErrorToStr(vError);
 734                 wxLogError("Error setting parent for submenu. Error: %s\n", sError);
 735                 return NULLHANDLE;
 736             }
 737
 738             if (!::WinSetOwner(m_menus[i]->m_vMenuData.hwndSubMenu, m_hMenu))
 739             {
 740                 vError = ::WinGetLastError(vHabmain);
 741                 sError = wxPMErrorToStr(vError);
 742                 wxLogError("Error setting parent for submenu. Error: %s\n", sError);
 743                 return NULLHANDLE;
 744             }
 745
 746             m_menus[i]->m_vMenuData.iPosition = i;
 747
 748             rc = (APIRET)::WinSendMsg(m_hMenu, MM_INSERTITEM, (MPARAM)&m_menus[i]->m_vMenuData, (MPARAM)m_titles[i].c_str());
 749             if (rc == MIT_MEMERROR || rc == MIT_ERROR)
 750             {
 751                 vError = ::WinGetLastError(vHabmain);
 752                 sError = wxPMErrorToStr(vError);
 753                 wxLogError("Error inserting or appending a menuitem. Error: %s\n", sError);
 754                 return NULLHANDLE;
 755             }
 756         }
 757     }
 758     return m_hMenu;
 759 } // end of wxMenuBar::Create
 760
 761 // ---------------------------------------------------------------------------
 762 // wxMenuBar functions to work with the top level submenus
 763 // ---------------------------------------------------------------------------
 764
 765 //
 766 // NB: we don't support owner drawn top level items for now, if we do these
 767 //     functions would have to be changed to use wxMenuItem as well
 768 //
 769 void wxMenuBar::EnableTop(
 770   size_t                            nPos
 771 , bool                              bEnable
 772 )
 773 {
 774     wxCHECK_RET(IsAttached(), wxT("doesn't work with unattached menubars"));
 775     USHORT                          uFlag = 0;
 776     SHORT                           nId;
 777
 778     if(!bEnable)
 779        uFlag = MIA_DISABLED;
 780
 781     nId = SHORT1FROMMR(::WinSendMsg((HWND)m_hMenu, MM_ITEMIDFROMPOSITION, MPFROMSHORT(nPos), (MPARAM)0));
 782     if (nId == MIT_ERROR)
 783     {
 784         wxLogLastError("LogLastError");
 785         return;
 786     }
 787     ::WinSendMsg((HWND)m_hMenu, MM_SETITEMATTR, MPFROM2SHORT(nId, TRUE), MPFROM2SHORT(MIA_DISABLED, uFlag));
 788     Refresh();
 789 } // end of wxMenuBar::EnableTop
 790
 791 void wxMenuBar::SetLabelTop(
 792   size_t                            nPos
 793 , const wxString&                   rLabel
 794 )
 795 {
 796     SHORT                           nId;
 797     MENUITEM                        vItem;
 798
 799     wxCHECK_RET(nPos < GetMenuCount(), wxT("invalid menu index"));
 800     m_titles[nPos] = rLabel;
 801
 802     if (!IsAttached())
 803     {
 804         return;
 805     }
 806
 807     nId = SHORT1FROMMR(::WinSendMsg((HWND)m_hMenu, MM_ITEMIDFROMPOSITION, MPFROMSHORT(nPos), (MPARAM)0));
 808     if (nId == MIT_ERROR)
 809     {
 810         wxLogLastError("LogLastError");
 811         return;
 812     }
 813     if(!::WinSendMsg( (HWND)m_hMenu
 814                      ,MM_QUERYITEM
 815                      ,MPFROM2SHORT(nId, TRUE)
 816                      ,MPARAM(&vItem)
 817                     ))
 818     {
 819         wxLogLastError("QueryItem");
 820     }
 821     nId = vItem.id;
 822
 823     if (::WinSendMsg(GetHmenu(), MM_SETITEMTEXT, MPFROMSHORT(nId), (MPARAM)rLabel.c_str()));
 824     {
 825         wxLogLastError("ModifyMenu");
 826     }
 827     Refresh();
 828 } // end of wxMenuBar::SetLabelTop
 829
 830 wxString wxMenuBar::GetLabelTop(
 831   size_t                            nPos
 832 ) const
 833 {
 834     wxCHECK_MSG( nPos < GetMenuCount(), wxEmptyString,
 835                  wxT("invalid menu index in wxMenuBar::GetLabelTop") );
 836     return m_titles[nPos];
 837 } // end of wxMenuBar::GetLabelTop
 838
 839 // ---------------------------------------------------------------------------
 840 // wxMenuBar construction
 841 // ---------------------------------------------------------------------------
 842
 843 wxMenu* wxMenuBar::Replace(
 844   size_t                             nPos
 845 , wxMenu*                            pMenu
 846 , const wxString&                    rTitle
 847 )
 848 {
 849     SHORT                            nId;
 850     wxString                         Title = TextToLabel(rTitle);
 851     wxMenu*                          pMenuOld = wxMenuBarBase::Replace( nPos
 852                                                                        ,pMenu
 853                                                                        ,Title
 854                                                                       );
 855
 856
 857     nId = SHORT1FROMMR(::WinSendMsg((HWND)m_hMenu, MM_ITEMIDFROMPOSITION, MPFROMSHORT(nPos), (MPARAM)0));
 858     if (nId == MIT_ERROR)
 859     {
 860         wxLogLastError("LogLastError");
 861         return NULL;
 862     }
 863     if (!pMenuOld)
 864         return FALSE;
 865     m_titles[nPos] = Title;
 866     if (IsAttached())
 867     {
 868         ::WinSendMsg((HWND)m_hMenu, MM_REMOVEITEM, MPFROM2SHORT(nId, TRUE), (MPARAM)0);
 869         ::WinSendMsg((HWND)m_hMenu, MM_INSERTITEM, (MPARAM)&pMenu->m_vMenuData, (MPARAM)Title.c_str());
 870
 871 #if wxUSE_ACCEL
 872         if (pMenuOld->HasAccels() || pMenu->HasAccels())
 873         {
 874             //
 875             // Need to rebuild accell table
 876             //
 877             RebuildAccelTable();
 878         }
 879 #endif // wxUSE_ACCEL
 880         Refresh();
 881     }
 882     return pMenuOld;
 883 } // end of wxMenuBar::Replace
 884
 885 bool wxMenuBar::Insert(
 886   size_t                            nPos
 887 , wxMenu*                           pMenu
 888 , const wxString&                   rTitle
 889 )
 890 {
 891     wxString Title = TextToLabel(rTitle);
 892     if (!wxMenuBarBase::Insert( nPos
 893                                ,pMenu
 894                                ,Title
 895                               ))
 896         return FALSE;
 897
 898     m_titles.Insert( Title
 899                     ,nPos
 900                    );
 901
 902     pMenu->Attach(this);
 903
 904     if (IsAttached())
 905     {
 906         ::WinSendMsg((HWND)m_hMenu, MM_INSERTITEM, (MPARAM)&pMenu->m_vMenuData, (MPARAM)Title.c_str());
 907 #if wxUSE_ACCEL
 908         if (pMenu->HasAccels())
 909         {
 910             // need to rebuild accell table
 911             RebuildAccelTable();
 912         }
 913 #endif // wxUSE_ACCEL
 914         Refresh();
 915     }
 916     return TRUE;
 917 } // end of wxMenuBar::Insert
 918
 919 bool wxMenuBar::Append(
 920   wxMenu*                           pMenu
 921 , const wxString&                   rTitle
 922 )
 923 {
 924     WXHMENU                         hSubmenu = pMenu ? pMenu->GetHMenu() : 0;
 925
 926     wxCHECK_MSG(hSubmenu, FALSE, wxT("can't append invalid menu to menubar"));
 927
 928     wxString Title = TextToLabel(rTitle);
 929     if (!wxMenuBarBase::Append(pMenu, Title))
 930         return FALSE;
 931
 932     pMenu->Attach(this);
 933     m_titles.Add(Title);
 934
 935     if ( IsAttached() )
 936     {
 937         pMenu->m_vMenuData.iPosition = MIT_END;
 938         ::WinSendMsg((HWND)m_hMenu, MM_INSERTITEM, (MPARAM)&pMenu->m_vMenuData, (MPARAM)Title.c_str());
 939 #if wxUSE_ACCEL
 940         if (pMenu->HasAccels())
 941         {
 942             //
 943             // Need to rebuild accell table
 944             //
 945             RebuildAccelTable();
 946         }
 947 #endif // wxUSE_ACCEL
 948         Refresh();
 949     }
 950     return TRUE;
 951 } // end of wxMenuBar::Append
 952
 953 wxMenu* wxMenuBar::Remove(
 954   size_t                            nPos
 955 )
 956 {
 957     wxMenu*                         pMenu = wxMenuBarBase::Remove(nPos);
 958     SHORT                           nId;
 959
 960     if (!pMenu)
 961         return NULL;
 962
 963     nId = SHORT1FROMMR(::WinSendMsg((HWND)GetHmenu(), MM_ITEMIDFROMPOSITION, MPFROMSHORT(nPos), (MPARAM)0));
 964     if (nId == MIT_ERROR)
 965     {
 966         wxLogLastError("LogLastError");
 967         return NULL;
 968     }
 969     if (IsAttached())
 970     {
 971         ::WinSendMsg((HWND)GetHmenu(), MM_REMOVEITEM, MPFROM2SHORT(nId, TRUE), (MPARAM)0);
 972         pMenu->Detach();
 973
 974 #if wxUSE_ACCEL
 975         if (pMenu->HasAccels())
 976         {
 977             //
 978             // Need to rebuild accell table
 979             //
 980             RebuildAccelTable();
 981         }
 982 #endif // wxUSE_ACCEL
 983         Refresh();
 984     }
 985     m_titles.Remove(nPos);
 986     return pMenu;
 987 } // end of wxMenuBar::Remove
 988
 989 #if wxUSE_ACCEL
 990
 991 void wxMenuBar::RebuildAccelTable()
 992 {
 993     //
 994     // Merge the accelerators of all menus into one accel table
 995     //
 996     size_t                          nAccelCount = 0;
 997     size_t                          i;
 998     size_t                          nCount = GetMenuCount();
 999
1000     for (i = 0; i < nCount; i++)
1001     {
1002         nAccelCount += m_menus[i]->GetAccelCount();
1003     }
1004
1005     if (nAccelCount)
1006     {
1007         wxAcceleratorEntry*         pAccelEntries = new wxAcceleratorEntry[nAccelCount];
1008
1009         nAccelCount = 0;
1010         for (i = 0; i < nCount; i++)
1011         {
1012             nAccelCount += m_menus[i]->CopyAccels(&pAccelEntries[nAccelCount]);
1013         }
1014         m_vAccelTable = wxAcceleratorTable( nAccelCount
1015                                            ,pAccelEntries
1016                                           );
1017         delete [] pAccelEntries;
1018     }
1019 } // end of wxMenuBar::RebuildAccelTable
1020
1021 #endif // wxUSE_ACCEL
1022
1023 void wxMenuBar::Attach(
1024   wxFrame*                          pFrame
1025 )
1026 {
1027     wxASSERT_MSG( !IsAttached(), wxT("menubar already attached!") );
1028     m_pMenuBarFrame = pFrame;
1029
1030 #if wxUSE_ACCEL
1031     RebuildAccelTable();
1032     //
1033     // Ensure the accelerator table is set to the frame (not the client!)
1034     //
1035     if (!::WinSetAccelTable( vHabmain
1036                             ,(HWND)pFrame->GetFrame()
1037                             ,m_vAccelTable.GetHACCEL()
1038                            ))
1039         wxLogLastError("WinSetAccelTable");
1040 #endif // wxUSE_ACCEL
1041 } // end of wxMenuBar::Attach
1042
1043 void wxMenuBar::Detach()
1044 {
1045     ::WinDestroyWindow((HWND)m_hMenu);
1046     m_hMenu = (WXHMENU)NULL;
1047     m_pMenuBarFrame = NULL;
1048 } // end of wxMenuBar::Detach
1049
1050 // ---------------------------------------------------------------------------
1051 // wxMenuBar searching for menu items
1052 // ---------------------------------------------------------------------------
1053
1054 //
1055 // Find the itemString in menuString, and return the item id or wxNOT_FOUND
1056 //
1057 int wxMenuBar::FindMenuItem(
1058   const wxString&                   rMenuString
1059 , const wxString&                   rItemString
1060 ) const
1061 {
1062     wxString                        sMenuLabel = wxStripMenuCodes(rMenuString);
1063     size_t                          nCount = GetMenuCount();
1064
1065     for (size_t i = 0; i < nCount; i++)
1066     {
1067         wxString                    sTitle = wxStripMenuCodes(m_titles[i]);
1068
1069         if (rMenuString == sTitle)
1070             return m_menus[i]->FindItem(rItemString);
1071     }
1072     return wxNOT_FOUND;
1073 } // end of wxMenuBar::FindMenuItem
1074
1075 wxMenuItem* wxMenuBar::FindItem(
1076   int                               nId
1077 , wxMenu**                          ppItemMenu
1078 ) const
1079 {
1080     if (ppItemMenu)
1081         *ppItemMenu = NULL;
1082
1083     wxMenuItem*                     pItem = NULL;
1084     size_t                          nCount = GetMenuCount();
1085
1086     for (size_t i = 0; !pItem && (i < nCount); i++)
1087     {
1088         pItem = m_menus[i]->FindItem( nId
1089                                      ,ppItemMenu
1090                                     );
1091     }
1092     return pItem;
1093 } // end of wxMenuBar::FindItem
1094
1095