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