]> git.saurik.com Git - wxWidgets.git/blame - src/msw/menu.cpp
added wrapper for <commctrl.h> as well
[wxWidgets.git] / src / msw / menu.cpp
CommitLineData
2bda0e17
KB
1/////////////////////////////////////////////////////////////////////////////
2// Name: menu.cpp
3// Purpose: wxMenu, wxMenuBar, wxMenuItem
4// Author: Julian Smart
5// Modified by: Vadim Zeitlin
6// Created: 04/01/98
7// RCS-ID: $Id$
6c9a19aa
JS
8// Copyright: (c) Julian Smart
9// Licence: wxWindows licence
2bda0e17
KB
10/////////////////////////////////////////////////////////////////////////////
11
c2dcfdef
VZ
12// ===========================================================================
13// declarations
14// ===========================================================================
15
16// ---------------------------------------------------------------------------
17// headers
18// ---------------------------------------------------------------------------
19
2bda0e17 20#ifdef __GNUG__
c626a8b7 21 #pragma implementation "menu.h"
2bda0e17
KB
22#endif
23
24// For compilers that support precompilation, includes "wx.h".
25#include "wx/wxprec.h"
26
27#ifdef __BORLANDC__
c626a8b7 28 #pragma hdrstop
2bda0e17
KB
29#endif
30
1e6feb95
VZ
31#if wxUSE_MENUS
32
2bda0e17 33#ifndef WX_PRECOMP
c626a8b7
VZ
34 #include "wx/frame.h"
35 #include "wx/menu.h"
36 #include "wx/utils.h"
0c589ad0 37 #include "wx/intl.h"
717a57c2 38 #include "wx/log.h"
2bda0e17
KB
39#endif
40
47d67540 41#if wxUSE_OWNER_DRAWN
c626a8b7 42 #include "wx/ownerdrw.h"
2bda0e17
KB
43#endif
44
45#include "wx/msw/private.h"
2bda0e17 46
39d2f9a7
JS
47#ifdef __WXWINCE__
48#include <windows.h>
49#include <windowsx.h>
50#include <tchar.h>
51#include <ole2.h>
52#include <commctrl.h>
53#include <aygshell.h>
54
55#ifndef TBSTYLE_NO_DROPDOWN_ARROW
56#define TBSTYLE_NO_DROPDOWN_ARROW 0x0080
57#endif
58
59#endif
60
2bda0e17 61// other standard headers
2bda0e17
KB
62#include <string.h>
63
c626a8b7
VZ
64// ----------------------------------------------------------------------------
65// global variables
66// ----------------------------------------------------------------------------
67
68extern wxMenu *wxCurrentPopupMenu;
69
b8d3a4f1
VZ
70// ----------------------------------------------------------------------------
71// constants
72// ----------------------------------------------------------------------------
73
74// the (popup) menu title has this special id
75static const int idMenuTitle = -2;
76
77// ----------------------------------------------------------------------------
0472ece7 78// private functions
b8d3a4f1 79// ----------------------------------------------------------------------------
c626a8b7 80
0472ece7
VZ
81// make the given menu item default
82static void SetDefaultMenuItem(HMENU hmenu, UINT id)
83{
4676948b 84#ifndef __WXWINCE__
0472ece7
VZ
85 MENUITEMINFO mii;
86 wxZeroMemory(mii);
87 mii.cbSize = sizeof(MENUITEMINFO);
88 mii.fMask = MIIM_STATE;
89 mii.fState = MFS_DEFAULT;
90
91 if ( !::SetMenuItemInfo(hmenu, id, FALSE, &mii) )
92 {
93 wxLogLastError(wxT("SetMenuItemInfo"));
94 }
4676948b
JS
95#endif
96}
97
98#ifdef __WXWINCE__
99UINT GetMenuState(HMENU hMenu, UINT id, UINT flags)
100{
101 MENUITEMINFO info;
102 wxZeroMemory(info);
103 info.cbSize = sizeof(info);
104 info.fMask = MIIM_STATE;
105 if ( !GetMenuItemInfo(hMenu, id, flags & MF_BYCOMMAND ? FALSE : TRUE, & info) )
106 wxLogLastError(wxT("GetMenuItemInfo"));
107 return info.fState;
0472ece7 108}
4676948b 109#endif
2bda0e17
KB
110
111// ============================================================================
112// implementation
113// ============================================================================
114
0472ece7
VZ
115IMPLEMENT_DYNAMIC_CLASS(wxMenu, wxEvtHandler)
116IMPLEMENT_DYNAMIC_CLASS(wxMenuBar, wxWindow)
117
c2dcfdef
VZ
118// ---------------------------------------------------------------------------
119// wxMenu construction, adding and removing menu items
120// ---------------------------------------------------------------------------
2bda0e17
KB
121
122// Construct a menu with optional title (then use append)
717a57c2 123void wxMenu::Init()
c626a8b7 124{
ad9bb75f 125 m_doBreak = FALSE;
0472ece7 126 m_startRadioGroup = -1;
c626a8b7 127
717a57c2
VZ
128 // create the menu
129 m_hMenu = (WXHMENU)CreatePopupMenu();
130 if ( !m_hMenu )
131 {
f6bcfd97 132 wxLogLastError(wxT("CreatePopupMenu"));
717a57c2
VZ
133 }
134
135 // if we have a title, insert it in the beginning of the menu
c626a8b7
VZ
136 if ( !!m_title )
137 {
ad9bb75f
VZ
138 Append(idMenuTitle, m_title);
139 AppendSeparator();
c626a8b7 140 }
2bda0e17
KB
141}
142
143// The wxWindow destructor will take care of deleting the submenus.
b8d3a4f1 144wxMenu::~wxMenu()
2bda0e17 145{
717a57c2
VZ
146 // we should free Windows resources only if Windows doesn't do it for us
147 // which happens if we're attached to a menubar or a submenu of another
148 // menu
149 if ( !IsAttached() && !GetParent() )
c2dcfdef 150 {
ad9bb75f
VZ
151 if ( !::DestroyMenu(GetHmenu()) )
152 {
f6bcfd97 153 wxLogLastError(wxT("DestroyMenu"));
ad9bb75f 154 }
c2dcfdef 155 }
c626a8b7 156
ad9bb75f
VZ
157#if wxUSE_ACCEL
158 // delete accels
159 WX_CLEAR_ARRAY(m_accels);
160#endif // wxUSE_ACCEL
2bda0e17
KB
161}
162
b8d3a4f1 163void wxMenu::Break()
2bda0e17 164{
717a57c2 165 // this will take effect during the next call to Append()
c2dcfdef 166 m_doBreak = TRUE;
2bda0e17
KB
167}
168
0472ece7
VZ
169void wxMenu::Attach(wxMenuBarBase *menubar)
170{
171 wxMenuBase::Attach(menubar);
172
173 EndRadioGroup();
174}
175
717a57c2
VZ
176#if wxUSE_ACCEL
177
178int wxMenu::FindAccel(int id) const
179{
180 size_t n, count = m_accels.GetCount();
181 for ( n = 0; n < count; n++ )
182 {
183 if ( m_accels[n]->m_command == id )
184 return n;
185 }
186
187 return wxNOT_FOUND;
188}
189
190void wxMenu::UpdateAccel(wxMenuItem *item)
2bda0e17 191{
f6bcfd97 192 if ( item->IsSubMenu() )
717a57c2 193 {
f6bcfd97 194 wxMenu *submenu = item->GetSubMenu();
222ed1d6 195 wxMenuItemList::compatibility_iterator node = submenu->GetMenuItems().GetFirst();
f6bcfd97
BP
196 while ( node )
197 {
198 UpdateAccel(node->GetData());
199
200 node = node->GetNext();
201 }
717a57c2 202 }
f6bcfd97 203 else if ( !item->IsSeparator() )
717a57c2 204 {
f6bcfd97
BP
205 // find the (new) accel for this item
206 wxAcceleratorEntry *accel = wxGetAccelFromString(item->GetText());
717a57c2 207 if ( accel )
f6bcfd97
BP
208 accel->m_command = item->GetId();
209
210 // find the old one
211 int n = FindAccel(item->GetId());
212 if ( n == wxNOT_FOUND )
213 {
214 // no old, add new if any
215 if ( accel )
216 m_accels.Add(accel);
217 else
218 return; // skipping RebuildAccelTable() below
219 }
717a57c2 220 else
f6bcfd97
BP
221 {
222 // replace old with new or just remove the old one if no new
223 delete m_accels[n];
224 if ( accel )
225 m_accels[n] = accel;
226 else
b54e41c5 227 m_accels.RemoveAt(n);
f6bcfd97 228 }
717a57c2 229
f6bcfd97
BP
230 if ( IsAttached() )
231 {
232 m_menuBar->RebuildAccelTable();
233 }
42e69d6b 234 }
f6bcfd97 235 //else: it is a separator, they can't have accels, nothing to do
717a57c2
VZ
236}
237
238#endif // wxUSE_ACCEL
239
240// append a new item or submenu to the menu
241bool wxMenu::DoInsertOrAppend(wxMenuItem *pItem, size_t pos)
242{
243#if wxUSE_ACCEL
244 UpdateAccel(pItem);
d427503c 245#endif // wxUSE_ACCEL
42e69d6b 246
c626a8b7 247 UINT flags = 0;
2bda0e17 248
c2dcfdef
VZ
249 // if "Break" has just been called, insert a menu break before this item
250 // (and don't forget to reset the flag)
c626a8b7
VZ
251 if ( m_doBreak ) {
252 flags |= MF_MENUBREAK;
253 m_doBreak = FALSE;
254 }
255
256 if ( pItem->IsSeparator() ) {
257 flags |= MF_SEPARATOR;
258 }
2bda0e17 259
c2dcfdef
VZ
260 // id is the numeric id for normal menu items and HMENU for submenus as
261 // required by ::AppendMenu() API
c626a8b7 262 UINT id;
c2dcfdef
VZ
263 wxMenu *submenu = pItem->GetSubMenu();
264 if ( submenu != NULL ) {
717a57c2
VZ
265 wxASSERT_MSG( submenu->GetHMenu(), wxT("invalid submenu") );
266
267 submenu->SetParent(this);
2bda0e17 268
c2dcfdef 269 id = (UINT)submenu->GetHMenu();
2bda0e17 270
c626a8b7
VZ
271 flags |= MF_POPUP;
272 }
273 else {
274 id = pItem->GetId();
275 }
2bda0e17 276
39d2f9a7
JS
277#ifdef __WXWINCE__
278 wxString strippedString;
279#endif
280
837e5743 281 LPCTSTR pData;
2bda0e17 282
47d67540 283#if wxUSE_OWNER_DRAWN
c626a8b7
VZ
284 if ( pItem->IsOwnerDrawn() ) { // want to get {Measure|Draw}Item messages?
285 // item draws itself, pass pointer to it in data parameter
286 flags |= MF_OWNERDRAW;
837e5743 287 pData = (LPCTSTR)pItem;
c626a8b7
VZ
288 }
289 else
2bda0e17 290#endif
c626a8b7
VZ
291 {
292 // menu is just a normal string (passed in data parameter)
293 flags |= MF_STRING;
8fb3a512 294
39d2f9a7
JS
295#ifdef __WXWINCE__
296 strippedString = wxStripMenuCodes(pItem->GetText());
297 pData = (wxChar*)strippedString.c_str();
298#else
f5166ed4 299 pData = (wxChar*)pItem->GetText().c_str();
39d2f9a7 300#endif
c626a8b7 301 }
2bda0e17 302
717a57c2
VZ
303 BOOL ok;
304 if ( pos == (size_t)-1 )
305 {
306 ok = ::AppendMenu(GetHmenu(), flags, id, pData);
307 }
308 else
309 {
310 ok = ::InsertMenu(GetHmenu(), pos, flags | MF_BYPOSITION, id, pData);
311 }
312
313 if ( !ok )
c626a8b7 314 {
f6bcfd97 315 wxLogLastError(wxT("Insert or AppendMenu"));
717a57c2
VZ
316
317 return FALSE;
c626a8b7 318 }
42e69d6b 319
0472ece7
VZ
320 // if we just appended the title, highlight it
321#ifdef __WIN32__
322 if ( (int)id == idMenuTitle )
323 {
324 // visually select the menu title
325 SetDefaultMenuItem(GetHmenu(), id);
326 }
42e69d6b
VZ
327#endif // __WIN32__
328
0472ece7
VZ
329 // if we're already attached to the menubar, we must update it
330 if ( IsAttached() && m_menuBar->IsAttached() )
331 {
332 m_menuBar->Refresh();
333 }
334
335 return TRUE;
336}
337
338void wxMenu::EndRadioGroup()
339{
0472ece7
VZ
340 // we're not inside a radio group any longer
341 m_startRadioGroup = -1;
2bda0e17
KB
342}
343
717a57c2 344bool wxMenu::DoAppend(wxMenuItem *item)
2bda0e17 345{
0472ece7
VZ
346 wxCHECK_MSG( item, FALSE, _T("NULL item in wxMenu::DoAppend") );
347
be15b995
VZ
348 bool check = FALSE;
349
546bfbea 350 if ( item->GetKind() == wxITEM_RADIO )
0472ece7 351 {
be15b995
VZ
352 int count = GetMenuItemCount();
353
0472ece7
VZ
354 if ( m_startRadioGroup == -1 )
355 {
356 // start a new radio group
be15b995
VZ
357 m_startRadioGroup = count;
358
359 // for now it has just one element
360 item->SetAsRadioGroupStart();
361 item->SetRadioGroupEnd(m_startRadioGroup);
362
363 // ensure that we have a checked item in the radio group
364 check = TRUE;
365 }
366 else // extend the current radio group
367 {
368 // we need to update its end item
369 item->SetRadioGroupStart(m_startRadioGroup);
222ed1d6 370 wxMenuItemList::compatibility_iterator node = GetMenuItems().Item(m_startRadioGroup);
be15b995
VZ
371
372 if ( node )
373 {
374 node->GetData()->SetRadioGroupEnd(count);
375 }
376 else
377 {
378 wxFAIL_MSG( _T("where is the radio group start item?") );
379 }
0472ece7
VZ
380 }
381 }
382 else // not a radio item
383 {
384 EndRadioGroup();
385 }
386
be15b995
VZ
387 if ( !wxMenuBase::DoAppend(item) || !DoInsertOrAppend(item) )
388 {
389 return FALSE;
390 }
391
392 if ( check )
393 {
394 // check the item initially
395 item->Check(TRUE);
396 }
397
398 return TRUE;
2bda0e17
KB
399}
400
717a57c2 401bool wxMenu::DoInsert(size_t pos, wxMenuItem *item)
2bda0e17 402{
717a57c2 403 return wxMenuBase::DoInsert(pos, item) && DoInsertOrAppend(item, pos);
2bda0e17
KB
404}
405
717a57c2 406wxMenuItem *wxMenu::DoRemove(wxMenuItem *item)
2bda0e17 407{
717a57c2
VZ
408 // we need to find the items position in the child list
409 size_t pos;
222ed1d6 410 wxMenuItemList::compatibility_iterator node = GetMenuItems().GetFirst();
717a57c2 411 for ( pos = 0; node; pos++ )
c626a8b7 412 {
717a57c2 413 if ( node->GetData() == item )
c626a8b7 414 break;
717a57c2
VZ
415
416 node = node->GetNext();
c626a8b7
VZ
417 }
418
717a57c2
VZ
419 // DoRemove() (unlike Remove) can only be called for existing item!
420 wxCHECK_MSG( node, NULL, wxT("bug in wxMenu::Remove logic") );
c626a8b7 421
717a57c2
VZ
422#if wxUSE_ACCEL
423 // remove the corresponding accel from the accel table
424 int n = FindAccel(item->GetId());
425 if ( n != wxNOT_FOUND )
426 {
427 delete m_accels[n];
c626a8b7 428
b54e41c5 429 m_accels.RemoveAt(n);
c626a8b7 430 }
717a57c2
VZ
431 //else: this item doesn't have an accel, nothing to do
432#endif // wxUSE_ACCEL
433
434 // remove the item from the menu
435 if ( !::RemoveMenu(GetHmenu(), (UINT)pos, MF_BYPOSITION) )
436 {
f6bcfd97 437 wxLogLastError(wxT("RemoveMenu"));
c626a8b7
VZ
438 }
439
4bc1afd5 440 if ( IsAttached() && m_menuBar->IsAttached() )
717a57c2
VZ
441 {
442 // otherwise, the chane won't be visible
443 m_menuBar->Refresh();
444 }
2bda0e17 445
717a57c2
VZ
446 // and from internal data structures
447 return wxMenuBase::DoRemove(item);
448}
d427503c 449
42e69d6b
VZ
450// ---------------------------------------------------------------------------
451// accelerator helpers
452// ---------------------------------------------------------------------------
453
717a57c2
VZ
454#if wxUSE_ACCEL
455
42e69d6b
VZ
456// create the wxAcceleratorEntries for our accels and put them into provided
457// array - return the number of accels we have
458size_t wxMenu::CopyAccels(wxAcceleratorEntry *accels) const
459{
460 size_t count = GetAccelCount();
461 for ( size_t n = 0; n < count; n++ )
462 {
974e8d94 463 *accels++ = *m_accels[n];
42e69d6b
VZ
464 }
465
466 return count;
467}
468
d427503c
VZ
469#endif // wxUSE_ACCEL
470
c2dcfdef 471// ---------------------------------------------------------------------------
717a57c2 472// set wxMenu title
c2dcfdef
VZ
473// ---------------------------------------------------------------------------
474
2bda0e17
KB
475void wxMenu::SetTitle(const wxString& label)
476{
c626a8b7
VZ
477 bool hasNoTitle = m_title.IsEmpty();
478 m_title = label;
b8d3a4f1 479
c50f1fb9 480 HMENU hMenu = GetHmenu();
b8d3a4f1 481
c626a8b7 482 if ( hasNoTitle )
b8d3a4f1 483 {
c626a8b7
VZ
484 if ( !label.IsEmpty() )
485 {
717a57c2
VZ
486 if ( !::InsertMenu(hMenu, 0u, MF_BYPOSITION | MF_STRING,
487 (unsigned)idMenuTitle, m_title) ||
488 !::InsertMenu(hMenu, 1u, MF_BYPOSITION, (unsigned)-1, NULL) )
c626a8b7 489 {
f6bcfd97 490 wxLogLastError(wxT("InsertMenu"));
c626a8b7
VZ
491 }
492 }
b8d3a4f1
VZ
493 }
494 else
495 {
c626a8b7
VZ
496 if ( label.IsEmpty() )
497 {
498 // remove the title and the separator after it
499 if ( !RemoveMenu(hMenu, 0, MF_BYPOSITION) ||
500 !RemoveMenu(hMenu, 0, MF_BYPOSITION) )
501 {
f6bcfd97 502 wxLogLastError(wxT("RemoveMenu"));
c626a8b7
VZ
503 }
504 }
505 else
506 {
507 // modify the title
4676948b
JS
508#ifdef __WXWINCE__
509 MENUITEMINFO info;
510 wxZeroMemory(info);
511 info.cbSize = sizeof(info);
512 info.fMask = MIIM_TYPE;
513 info.fType = MFT_STRING;
514 info.cch = m_title.Length();
515 info.dwTypeData = (LPTSTR) m_title.c_str();
516 if ( !SetMenuItemInfo(hMenu, 0, TRUE, & info) )
517 {
518 wxLogLastError(wxT("SetMenuItemInfo"));
519 }
520#else
c626a8b7 521 if ( !ModifyMenu(hMenu, 0u,
717a57c2
VZ
522 MF_BYPOSITION | MF_STRING,
523 (unsigned)idMenuTitle, m_title) )
c626a8b7 524 {
f6bcfd97 525 wxLogLastError(wxT("ModifyMenu"));
c626a8b7 526 }
4676948b 527#endif
c626a8b7 528 }
b8d3a4f1 529 }
b8d3a4f1 530
42e69d6b 531#ifdef __WIN32__
c626a8b7
VZ
532 // put the title string in bold face
533 if ( !m_title.IsEmpty() )
a3f4e9e8 534 {
0472ece7 535 SetDefaultMenuItem(GetHmenu(), (UINT)idMenuTitle);
a3f4e9e8 536 }
717a57c2 537#endif // Win32
2bda0e17
KB
538}
539
c2dcfdef
VZ
540// ---------------------------------------------------------------------------
541// event processing
542// ---------------------------------------------------------------------------
2bda0e17 543
debe6624 544bool wxMenu::MSWCommand(WXUINT WXUNUSED(param), WXWORD id)
2bda0e17 545{
a3f4e9e8
VZ
546 // ignore commands from the menu title
547
548 // NB: VC++ generates wrong assembler for `if ( id != idMenuTitle )'!!
549 if ( id != (WXWORD)idMenuTitle )
550 {
3ca6a5f0
BP
551 // VZ: previosuly, the command int was set to id too which was quite
552 // useless anyhow (as it could be retrieved using GetId()) and
553 // uncompatible with wxGTK, so now we use the command int instead
554 // to pass the checked status
4676948b
JS
555 UINT menuState = ::GetMenuState(GetHmenu(), id, MF_BYCOMMAND) ;
556 SendEvent(id, menuState & MF_CHECKED);
a3f4e9e8
VZ
557 }
558
559 return TRUE;
2bda0e17
KB
560}
561
c2dcfdef
VZ
562// ---------------------------------------------------------------------------
563// other
564// ---------------------------------------------------------------------------
2bda0e17 565
717a57c2
VZ
566wxWindow *wxMenu::GetWindow() const
567{
568 if ( m_invokingWindow != NULL )
569 return m_invokingWindow;
570 else if ( m_menuBar != NULL)
571 return m_menuBar->GetFrame();
572
573 return NULL;
c2dcfdef
VZ
574}
575
576// ---------------------------------------------------------------------------
2bda0e17 577// Menu Bar
c2dcfdef
VZ
578// ---------------------------------------------------------------------------
579
580void wxMenuBar::Init()
2bda0e17 581{
c626a8b7 582 m_eventHandler = this;
c626a8b7 583 m_hMenu = 0;
39d2f9a7
JS
584#ifdef __WXWINCE__
585 m_toolBar = NULL;
586#endif
cba2db0c 587}
2bda0e17 588
c2dcfdef
VZ
589wxMenuBar::wxMenuBar()
590{
591 Init();
592}
593
cba2db0c
JS
594wxMenuBar::wxMenuBar( long WXUNUSED(style) )
595{
c2dcfdef 596 Init();
2bda0e17
KB
597}
598
c2dcfdef 599wxMenuBar::wxMenuBar(int count, wxMenu *menus[], const wxString titles[])
2bda0e17 600{
c2dcfdef
VZ
601 Init();
602
a8cfd0cb 603 m_titles.Alloc(count);
c2dcfdef 604
a8cfd0cb
VZ
605 for ( int i = 0; i < count; i++ )
606 {
607 m_menus.Append(menus[i]);
608 m_titles.Add(titles[i]);
2bda0e17 609
a8cfd0cb
VZ
610 menus[i]->Attach(this);
611 }
2bda0e17
KB
612}
613
b8d3a4f1 614wxMenuBar::~wxMenuBar()
2bda0e17 615{
39d2f9a7
JS
616 // In Windows CE, the menubar is always associated
617 // with a toolbar, which destroys the menu implicitly.
bf95a04f
JS
618#ifdef __WXWINCE__
619 if (GetToolBar())
620 GetToolBar()->SetMenuBar(NULL);
621#else
7a0363dd
JS
622 // we should free Windows resources only if Windows doesn't do it for us
623 // which happens if we're attached to a frame
624 if (m_hMenu && !IsAttached())
625 {
626 ::DestroyMenu((HMENU)m_hMenu);
627 m_hMenu = (WXHMENU)NULL;
628 }
39d2f9a7 629#endif
c2dcfdef 630}
2bda0e17 631
c2dcfdef
VZ
632// ---------------------------------------------------------------------------
633// wxMenuBar helpers
634// ---------------------------------------------------------------------------
635
636void wxMenuBar::Refresh()
637{
065de612 638 wxCHECK_RET( IsAttached(), wxT("can't refresh unattached menubar") );
c2dcfdef 639
39d2f9a7
JS
640#ifdef __WXWINCE__
641 if (GetToolBar())
642 {
643 CommandBar_DrawMenuBar((HWND) GetToolBar()->GetHWND(), 0);
644 }
645#else
1e6feb95 646 DrawMenuBar(GetHwndOf(GetFrame()));
39d2f9a7 647#endif
c2dcfdef
VZ
648}
649
650WXHMENU wxMenuBar::Create()
651{
beb471b5
JS
652 // Note: this totally doesn't work on Smartphone,
653 // since you have to use resources.
654 // We'll have to find another way to add a menu
655 // by changing/adding menu items to an existing menu.
39d2f9a7
JS
656#ifdef __WXWINCE__
657 if ( m_hMenu != 0 )
658 return m_hMenu;
659
660 if (!GetToolBar())
661 return 0;
662
663 HWND hCommandBar = (HWND) GetToolBar()->GetHWND();
664 HMENU hMenu = (HMENU)::SendMessage(hCommandBar, SHCMBM_GETMENU, (WPARAM)0, (LPARAM)0);
665 if (hMenu)
666 {
667 TBBUTTON tbButton;
668 memset(&tbButton, 0, sizeof(TBBUTTON));
669 tbButton.iBitmap = I_IMAGENONE;
670 tbButton.fsState = TBSTATE_ENABLED;
671 tbButton.fsStyle = TBSTYLE_DROPDOWN | TBSTYLE_NO_DROPDOWN_ARROW | TBSTYLE_AUTOSIZE;
672
673 size_t i;
674 for (i = 0; i < GetMenuCount(); i++)
675 {
676 HMENU hPopupMenu = (HMENU) GetMenu(i)->GetHMenu() ;
677 tbButton.dwData = (DWORD)hPopupMenu;
678 wxString label = wxStripMenuCodes(GetLabelTop(i));
679 tbButton.iString = (int) label.c_str();
beb471b5
JS
680
681 int position = i;
39d2f9a7
JS
682
683 tbButton.idCommand = NewControlId();
beb471b5 684 if (!::SendMessage(hCommandBar, TB_INSERTBUTTON, position, (LPARAM)&tbButton))
39d2f9a7
JS
685 {
686 wxLogLastError(wxT("TB_INSERTBUTTON"));
687 }
688 }
689 }
690 m_hMenu = (WXHMENU) hMenu;
691 return m_hMenu;
692#else
3ca6a5f0 693 if ( m_hMenu != 0 )
717a57c2 694 return m_hMenu;
1cf27c63 695
c2dcfdef 696 m_hMenu = (WXHMENU)::CreateMenu();
2bda0e17 697
c2dcfdef 698 if ( !m_hMenu )
c626a8b7 699 {
f6bcfd97 700 wxLogLastError(wxT("CreateMenu"));
c626a8b7 701 }
c2dcfdef 702 else
c626a8b7 703 {
222ed1d6
MB
704 size_t count = GetMenuCount(), i;
705 wxMenuList::iterator it;
706 for ( i = 0, it = m_menus.begin(); i < count; i++, it++ )
c2dcfdef
VZ
707 {
708 if ( !::AppendMenu((HMENU)m_hMenu, MF_POPUP | MF_STRING,
222ed1d6 709 (UINT)(*it)->GetHMenu(),
c2dcfdef
VZ
710 m_titles[i]) )
711 {
f6bcfd97 712 wxLogLastError(wxT("AppendMenu"));
c2dcfdef
VZ
713 }
714 }
c626a8b7 715 }
c626a8b7 716
c2dcfdef 717 return m_hMenu;
39d2f9a7 718#endif
2bda0e17
KB
719}
720
c2dcfdef 721// ---------------------------------------------------------------------------
3dfac970 722// wxMenuBar functions to work with the top level submenus
c2dcfdef
VZ
723// ---------------------------------------------------------------------------
724
3dfac970
VZ
725// NB: we don't support owner drawn top level items for now, if we do these
726// functions would have to be changed to use wxMenuItem as well
2bda0e17 727
a8cfd0cb 728void wxMenuBar::EnableTop(size_t pos, bool enable)
2bda0e17 729{
717a57c2
VZ
730 wxCHECK_RET( IsAttached(), wxT("doesn't work with unattached menubars") );
731
732 int flag = enable ? MF_ENABLED : MF_GRAYED;
2bda0e17 733
c626a8b7 734 EnableMenuItem((HMENU)m_hMenu, pos, MF_BYPOSITION | flag);
adc6fb16
VZ
735
736 Refresh();
2bda0e17
KB
737}
738
a8cfd0cb 739void wxMenuBar::SetLabelTop(size_t pos, const wxString& label)
2bda0e17 740{
717a57c2
VZ
741 wxCHECK_RET( pos < GetMenuCount(), wxT("invalid menu index") );
742
743 m_titles[pos] = label;
744
745 if ( !IsAttached() )
746 {
747 return;
748 }
749 //else: have to modify the existing menu
750
8cd85069 751 UINT id;
c2dcfdef
VZ
752 UINT flagsOld = ::GetMenuState((HMENU)m_hMenu, pos, MF_BYPOSITION);
753 if ( flagsOld == 0xFFFFFFFF )
c626a8b7 754 {
223d09f6 755 wxLogLastError(wxT("GetMenuState"));
c2dcfdef
VZ
756
757 return;
758 }
759
760 if ( flagsOld & MF_POPUP )
761 {
762 // HIBYTE contains the number of items in the submenu in this case
ad9bb75f
VZ
763 flagsOld &= 0xff;
764 id = (UINT)::GetSubMenu((HMENU)m_hMenu, pos);
c626a8b7
VZ
765 }
766 else
8cd85069
VZ
767 {
768 id = pos;
769 }
770
4676948b
JS
771#ifdef __WXWINCE__
772 MENUITEMINFO info;
773 wxZeroMemory(info);
774 info.cbSize = sizeof(info);
775 info.fMask = MIIM_TYPE;
776 info.fType = MFT_STRING;
777 info.cch = label.Length();
778 info.dwTypeData = (LPTSTR) label.c_str();
779 if ( !SetMenuItemInfo(GetHmenu(), id, TRUE, & info) )
780 {
781 wxLogLastError(wxT("SetMenuItemInfo"));
782 }
783
784#else
c50f1fb9 785 if ( ::ModifyMenu(GetHmenu(), pos, MF_BYPOSITION | MF_STRING | flagsOld,
4676948b 786 id, label) == (int)0xFFFFFFFF )
c2dcfdef 787 {
f6bcfd97 788 wxLogLastError(wxT("ModifyMenu"));
c2dcfdef 789 }
4676948b 790#endif
717a57c2
VZ
791
792 Refresh();
2bda0e17
KB
793}
794
a8cfd0cb 795wxString wxMenuBar::GetLabelTop(size_t pos) const
2bda0e17 796{
717a57c2
VZ
797 wxCHECK_MSG( pos < GetMenuCount(), wxEmptyString,
798 wxT("invalid menu index in wxMenuBar::GetLabelTop") );
8cd85069 799
717a57c2 800 return m_titles[pos];
2bda0e17
KB
801}
802
ad9bb75f
VZ
803// ---------------------------------------------------------------------------
804// wxMenuBar construction
805// ---------------------------------------------------------------------------
806
a8cfd0cb 807wxMenu *wxMenuBar::Replace(size_t pos, wxMenu *menu, const wxString& title)
1cf27c63 808{
ad9bb75f
VZ
809 wxMenu *menuOld = wxMenuBarBase::Replace(pos, menu, title);
810 if ( !menuOld )
f7f50f49
VZ
811 return NULL;
812
ad9bb75f 813 m_titles[pos] = title;
a8cfd0cb 814
ad9bb75f 815 if ( IsAttached() )
a8cfd0cb 816 {
ad9bb75f
VZ
817 // can't use ModifyMenu() because it deletes the submenu it replaces
818 if ( !::RemoveMenu(GetHmenu(), (UINT)pos, MF_BYPOSITION) )
a8cfd0cb 819 {
f6bcfd97 820 wxLogLastError(wxT("RemoveMenu"));
a8cfd0cb 821 }
1cf27c63 822
ad9bb75f
VZ
823 if ( !::InsertMenu(GetHmenu(), (UINT)pos,
824 MF_BYPOSITION | MF_POPUP | MF_STRING,
825 (UINT)GetHmenuOf(menu), title) )
826 {
f6bcfd97 827 wxLogLastError(wxT("InsertMenu"));
ad9bb75f
VZ
828 }
829
717a57c2
VZ
830#if wxUSE_ACCEL
831 if ( menuOld->HasAccels() || menu->HasAccels() )
832 {
833 // need to rebuild accell table
834 RebuildAccelTable();
835 }
836#endif // wxUSE_ACCEL
837
ad9bb75f 838 Refresh();
a8cfd0cb 839 }
ad9bb75f
VZ
840
841 return menuOld;
1cf27c63
UM
842}
843
a8cfd0cb 844bool wxMenuBar::Insert(size_t pos, wxMenu *menu, const wxString& title)
1cf27c63 845{
ad9bb75f 846 if ( !wxMenuBarBase::Insert(pos, menu, title) )
a8cfd0cb 847 return FALSE;
1cf27c63 848
ad9bb75f
VZ
849 m_titles.Insert(title, pos);
850
ad9bb75f
VZ
851 if ( IsAttached() )
852 {
39d2f9a7
JS
853#ifdef __WXWINCE__
854 if (!GetToolBar())
855 return FALSE;
856 TBBUTTON tbButton;
857 memset(&tbButton, 0, sizeof(TBBUTTON));
858 tbButton.iBitmap = I_IMAGENONE;
859 tbButton.fsState = TBSTATE_ENABLED;
860 tbButton.fsStyle = TBSTYLE_DROPDOWN | TBSTYLE_NO_DROPDOWN_ARROW | TBSTYLE_AUTOSIZE;
861
862 HMENU hPopupMenu = (HMENU) menu->GetHMenu() ;
863 tbButton.dwData = (DWORD)hPopupMenu;
864 wxString label = wxStripMenuCodes(title);
865 tbButton.iString = (int) label.c_str();
866
867 tbButton.idCommand = NewControlId();
868 if (!::SendMessage((HWND) GetToolBar()->GetHWND(), TB_INSERTBUTTON, pos, (LPARAM)&tbButton))
869 {
870 wxLogLastError(wxT("TB_INSERTBUTTON"));
871 return FALSE;
872 }
873#else
ad9bb75f
VZ
874 if ( !::InsertMenu(GetHmenu(), pos,
875 MF_BYPOSITION | MF_POPUP | MF_STRING,
876 (UINT)GetHmenuOf(menu), title) )
877 {
f6bcfd97 878 wxLogLastError(wxT("InsertMenu"));
ad9bb75f 879 }
39d2f9a7 880#endif
717a57c2
VZ
881#if wxUSE_ACCEL
882 if ( menu->HasAccels() )
883 {
884 // need to rebuild accell table
885 RebuildAccelTable();
886 }
887#endif // wxUSE_ACCEL
888
ad9bb75f 889 Refresh();
a8cfd0cb 890 }
ad9bb75f
VZ
891
892 return TRUE;
1cf27c63
UM
893}
894
ad9bb75f 895bool wxMenuBar::Append(wxMenu *menu, const wxString& title)
2bda0e17 896{
ad9bb75f
VZ
897 WXHMENU submenu = menu ? menu->GetHMenu() : 0;
898 wxCHECK_MSG( submenu, FALSE, wxT("can't append invalid menu to menubar") );
2bda0e17 899
717a57c2
VZ
900 if ( !wxMenuBarBase::Append(menu, title) )
901 return FALSE;
902
717a57c2
VZ
903 m_titles.Add(title);
904
ad9bb75f
VZ
905 if ( IsAttached() )
906 {
39d2f9a7
JS
907#ifdef __WXWINCE__
908 if (!GetToolBar())
909 return FALSE;
910 TBBUTTON tbButton;
911 memset(&tbButton, 0, sizeof(TBBUTTON));
912 tbButton.iBitmap = I_IMAGENONE;
913 tbButton.fsState = TBSTATE_ENABLED;
914 tbButton.fsStyle = TBSTYLE_DROPDOWN | TBSTYLE_NO_DROPDOWN_ARROW | TBSTYLE_AUTOSIZE;
915
916 size_t pos = GetMenuCount();
917 HMENU hPopupMenu = (HMENU) menu->GetHMenu() ;
918 tbButton.dwData = (DWORD)hPopupMenu;
919 wxString label = wxStripMenuCodes(title);
920 tbButton.iString = (int) label.c_str();
921
922 tbButton.idCommand = NewControlId();
923 if (!::SendMessage((HWND) GetToolBar()->GetHWND(), TB_INSERTBUTTON, pos, (LPARAM)&tbButton))
924 {
925 wxLogLastError(wxT("TB_INSERTBUTTON"));
926 return FALSE;
927 }
928#else
ad9bb75f
VZ
929 if ( !::AppendMenu(GetHmenu(), MF_POPUP | MF_STRING,
930 (UINT)submenu, title) )
931 {
932 wxLogLastError(wxT("AppendMenu"));
933 }
39d2f9a7 934#endif
ad9bb75f 935
717a57c2
VZ
936#if wxUSE_ACCEL
937 if ( menu->HasAccels() )
938 {
39d2f9a7 939 // need to rebuild accelerator table
717a57c2
VZ
940 RebuildAccelTable();
941 }
942#endif // wxUSE_ACCEL
943
ad9bb75f
VZ
944 Refresh();
945 }
2bda0e17 946
a8cfd0cb 947 return TRUE;
2bda0e17
KB
948}
949
a8cfd0cb 950wxMenu *wxMenuBar::Remove(size_t pos)
2bda0e17 951{
a8cfd0cb
VZ
952 wxMenu *menu = wxMenuBarBase::Remove(pos);
953 if ( !menu )
954 return NULL;
c626a8b7 955
ad9bb75f
VZ
956 if ( IsAttached() )
957 {
39d2f9a7
JS
958#ifdef __WXWINCE__
959 if (GetToolBar())
960 {
961 if (!::SendMessage((HWND) GetToolBar()->GetHWND(), TB_DELETEBUTTON, (UINT) pos, (LPARAM) 0))
962 {
963 wxLogLastError(wxT("TB_DELETEBUTTON"));
964 }
965 }
966#else
ad9bb75f
VZ
967 if ( !::RemoveMenu(GetHmenu(), (UINT)pos, MF_BYPOSITION) )
968 {
f6bcfd97 969 wxLogLastError(wxT("RemoveMenu"));
ad9bb75f 970 }
39d2f9a7 971#endif
717a57c2
VZ
972#if wxUSE_ACCEL
973 if ( menu->HasAccels() )
974 {
975 // need to rebuild accell table
976 RebuildAccelTable();
977 }
978#endif // wxUSE_ACCEL
979
ad9bb75f
VZ
980 Refresh();
981 }
2bda0e17 982
ba8c1601 983 m_titles.RemoveAt(pos);
2bda0e17 984
a8cfd0cb 985 return menu;
2bda0e17
KB
986}
987
d427503c 988#if wxUSE_ACCEL
717a57c2
VZ
989
990void wxMenuBar::RebuildAccelTable()
991{
992 // merge the accelerators of all menus into one accel table
42e69d6b 993 size_t nAccelCount = 0;
a8cfd0cb 994 size_t i, count = GetMenuCount();
222ed1d6
MB
995 wxMenuList::iterator it;
996 for ( i = 0, it = m_menus.begin(); i < count; i++, it++ )
42e69d6b 997 {
222ed1d6 998 nAccelCount += (*it)->GetAccelCount();
42e69d6b
VZ
999 }
1000
5df1250b 1001 if ( nAccelCount )
42e69d6b 1002 {
5df1250b 1003 wxAcceleratorEntry *accelEntries = new wxAcceleratorEntry[nAccelCount];
42e69d6b 1004
5df1250b 1005 nAccelCount = 0;
222ed1d6 1006 for ( i = 0, it = m_menus.begin(); i < count; i++, it++ )
5df1250b 1007 {
222ed1d6 1008 nAccelCount += (*it)->CopyAccels(&accelEntries[nAccelCount]);
5df1250b
VZ
1009 }
1010
1011 m_accelTable = wxAcceleratorTable(nAccelCount, accelEntries);
42e69d6b 1012
5df1250b
VZ
1013 delete [] accelEntries;
1014 }
717a57c2
VZ
1015}
1016
1017#endif // wxUSE_ACCEL
1018
1019void wxMenuBar::Attach(wxFrame *frame)
1020{
1e6feb95 1021 wxMenuBarBase::Attach(frame);
717a57c2 1022
717a57c2
VZ
1023#if wxUSE_ACCEL
1024 RebuildAccelTable();
d427503c 1025#endif // wxUSE_ACCEL
42e69d6b
VZ
1026}
1027
1cf27c63
UM
1028void wxMenuBar::Detach()
1029{
1e6feb95 1030 wxMenuBarBase::Detach();
2bda0e17
KB
1031}
1032
1e6feb95 1033#endif // wxUSE_MENUS