]> git.saurik.com Git - wxWidgets.git/blob - src/msw/menu.cpp
reverted wrong change of rev 1.129 and fixed the first part of bug 1422217 in a bette...
[wxWidgets.git] / src / msw / menu.cpp
1 /////////////////////////////////////////////////////////////////////////////
2 // Name: src/msw/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$
8 // Copyright: (c) Julian Smart
9 // Licence: wxWindows licence
10 /////////////////////////////////////////////////////////////////////////////
11
12 // ===========================================================================
13 // declarations
14 // ===========================================================================
15
16 // ---------------------------------------------------------------------------
17 // headers
18 // ---------------------------------------------------------------------------
19
20 // For compilers that support precompilation, includes "wx.h".
21 #include "wx/wxprec.h"
22
23 #ifdef __BORLANDC__
24 #pragma hdrstop
25 #endif
26
27 #if wxUSE_MENUS
28
29 #include "wx/menu.h"
30
31 #ifndef WX_PRECOMP
32 #include "wx/msw/wrapcctl.h" // include <commctrl.h> "properly"
33 #include "wx/frame.h"
34 #include "wx/utils.h"
35 #include "wx/intl.h"
36 #include "wx/log.h"
37 #endif
38
39 #if wxUSE_OWNER_DRAWN
40 #include "wx/ownerdrw.h"
41 #endif
42
43 #include "wx/msw/private.h"
44
45 #ifdef __WXWINCE__
46 #include <windows.h>
47 #include <windowsx.h>
48 #include <tchar.h>
49 #include <ole2.h>
50 #include <shellapi.h>
51 #if (_WIN32_WCE < 400) && !defined(__HANDHELDPC__)
52 #include <aygshell.h>
53 #endif
54
55 #include "wx/msw/wince/missing.h"
56
57 #endif
58
59 // other standard headers
60 #include <string.h>
61
62 #if wxUSE_OWNER_DRAWN && defined(MIIM_BITMAP)
63 #include "wx/dynlib.h"
64 #endif
65
66 #ifndef MNS_CHECKORBMP
67 #define MNS_CHECKORBMP 0x04000000
68 #endif
69 #ifndef MIM_STYLE
70 #define MIM_STYLE 0x00000010
71 #endif
72
73 // ----------------------------------------------------------------------------
74 // global variables
75 // ----------------------------------------------------------------------------
76
77 // ----------------------------------------------------------------------------
78 // constants
79 // ----------------------------------------------------------------------------
80
81 // the (popup) menu title has this special id
82 static const int idMenuTitle = -3;
83
84 // ----------------------------------------------------------------------------
85 // private functions
86 // ----------------------------------------------------------------------------
87
88 // make the given menu item default
89 static void SetDefaultMenuItem(HMENU WXUNUSED_IN_WINCE(hmenu),
90 UINT WXUNUSED_IN_WINCE(id))
91 {
92 #ifndef __WXWINCE__
93 MENUITEMINFO mii;
94 wxZeroMemory(mii);
95 mii.cbSize = sizeof(MENUITEMINFO);
96 mii.fMask = MIIM_STATE;
97 mii.fState = MFS_DEFAULT;
98
99 if ( !::SetMenuItemInfo(hmenu, id, FALSE, &mii) )
100 {
101 wxLogLastError(wxT("SetMenuItemInfo"));
102 }
103 #endif
104 }
105
106 #ifdef __WXWINCE__
107 UINT GetMenuState(HMENU hMenu, UINT id, UINT flags)
108 {
109 MENUITEMINFO info;
110 wxZeroMemory(info);
111 info.cbSize = sizeof(info);
112 info.fMask = MIIM_STATE;
113 // MF_BYCOMMAND is zero so test MF_BYPOSITION
114 if ( !::GetMenuItemInfo(hMenu, id, flags & MF_BYPOSITION ? TRUE : FALSE , & info) )
115 wxLogLastError(wxT("GetMenuItemInfo"));
116 return info.fState;
117 }
118 #endif
119
120 // ============================================================================
121 // implementation
122 // ============================================================================
123
124 #include "wx/listimpl.cpp"
125
126 WX_DEFINE_LIST( wxMenuInfoList )
127
128 #if wxUSE_EXTENDED_RTTI
129
130 WX_DEFINE_FLAGS( wxMenuStyle )
131
132 wxBEGIN_FLAGS( wxMenuStyle )
133 wxFLAGS_MEMBER(wxMENU_TEAROFF)
134 wxEND_FLAGS( wxMenuStyle )
135
136 IMPLEMENT_DYNAMIC_CLASS_XTI(wxMenu, wxEvtHandler,"wx/menu.h")
137
138 wxCOLLECTION_TYPE_INFO( wxMenuItem * , wxMenuItemList ) ;
139
140 template<> void wxCollectionToVariantArray( wxMenuItemList const &theList, wxxVariantArray &value)
141 {
142 wxListCollectionToVariantArray<wxMenuItemList::compatibility_iterator>( theList , value ) ;
143 }
144
145 wxBEGIN_PROPERTIES_TABLE(wxMenu)
146 wxEVENT_PROPERTY( Select , wxEVT_COMMAND_MENU_SELECTED , wxCommandEvent)
147 wxPROPERTY( Title, wxString , SetTitle, GetTitle, wxString(), 0 /*flags*/ , wxT("Helpstring") , wxT("group") )
148 wxREADONLY_PROPERTY_FLAGS( MenuStyle , wxMenuStyle , long , GetStyle , EMPTY_MACROVALUE , 0 /*flags*/ , wxT("Helpstring") , wxT("group")) // style
149 wxPROPERTY_COLLECTION( MenuItems , wxMenuItemList , wxMenuItem* , Append , GetMenuItems , 0 /*flags*/ , wxT("Helpstring") , wxT("group"))
150 wxEND_PROPERTIES_TABLE()
151
152 wxBEGIN_HANDLERS_TABLE(wxMenu)
153 wxEND_HANDLERS_TABLE()
154
155 wxDIRECT_CONSTRUCTOR_2( wxMenu , wxString , Title , long , MenuStyle )
156
157 WX_DEFINE_FLAGS( wxMenuBarStyle )
158
159 wxBEGIN_FLAGS( wxMenuBarStyle )
160 wxFLAGS_MEMBER(wxMB_DOCKABLE)
161 wxEND_FLAGS( wxMenuBarStyle )
162
163 // the negative id would lead the window (its superclass !) to vetoe streaming out otherwise
164 bool wxMenuBarStreamingCallback( const wxObject *WXUNUSED(object), wxWriter * , wxPersister * , wxxVariantArray & )
165 {
166 return true ;
167 }
168
169 IMPLEMENT_DYNAMIC_CLASS_XTI_CALLBACK(wxMenuBar, wxWindow ,"wx/menu.h",wxMenuBarStreamingCallback)
170
171 IMPLEMENT_DYNAMIC_CLASS_XTI(wxMenuInfo, wxObject , "wx/menu.h" )
172
173 wxBEGIN_PROPERTIES_TABLE(wxMenuInfo)
174 wxREADONLY_PROPERTY( Menu , wxMenu* , GetMenu , EMPTY_MACROVALUE , 0 /*flags*/ , wxT("Helpstring") , wxT("group"))
175 wxREADONLY_PROPERTY( Title , wxString , GetTitle , wxString() , 0 /*flags*/ , wxT("Helpstring") , wxT("group"))
176 wxEND_PROPERTIES_TABLE()
177
178 wxBEGIN_HANDLERS_TABLE(wxMenuInfo)
179 wxEND_HANDLERS_TABLE()
180
181 wxCONSTRUCTOR_2( wxMenuInfo , wxMenu* , Menu , wxString , Title )
182
183 wxCOLLECTION_TYPE_INFO( wxMenuInfo * , wxMenuInfoList ) ;
184
185 template<> void wxCollectionToVariantArray( wxMenuInfoList const &theList, wxxVariantArray &value)
186 {
187 wxListCollectionToVariantArray<wxMenuInfoList::compatibility_iterator>( theList , value ) ;
188 }
189
190 wxBEGIN_PROPERTIES_TABLE(wxMenuBar)
191 wxPROPERTY_COLLECTION( MenuInfos , wxMenuInfoList , wxMenuInfo* , Append , GetMenuInfos , 0 /*flags*/ , wxT("Helpstring") , wxT("group"))
192 wxEND_PROPERTIES_TABLE()
193
194 wxBEGIN_HANDLERS_TABLE(wxMenuBar)
195 wxEND_HANDLERS_TABLE()
196
197 wxCONSTRUCTOR_DUMMY( wxMenuBar )
198
199 #else
200 IMPLEMENT_DYNAMIC_CLASS(wxMenu, wxEvtHandler)
201 IMPLEMENT_DYNAMIC_CLASS(wxMenuBar, wxWindow)
202 IMPLEMENT_DYNAMIC_CLASS(wxMenuInfo, wxObject)
203 #endif
204
205 const wxMenuInfoList& wxMenuBar::GetMenuInfos() const
206 {
207 wxMenuInfoList* list = const_cast< wxMenuInfoList* >( &m_menuInfos ) ;
208 WX_CLEAR_LIST( wxMenuInfoList , *list ) ;
209 for( size_t i = 0 ; i < GetMenuCount() ; ++i )
210 {
211 wxMenuInfo* info = new wxMenuInfo() ;
212 info->Create( const_cast<wxMenuBar*>(this)->GetMenu(i) , GetLabelTop(i) ) ;
213 list->Append( info ) ;
214 }
215 return m_menuInfos ;
216 }
217
218 // ---------------------------------------------------------------------------
219 // wxMenu construction, adding and removing menu items
220 // ---------------------------------------------------------------------------
221
222 // Construct a menu with optional title (then use append)
223 void wxMenu::Init()
224 {
225 m_doBreak = false;
226 m_startRadioGroup = -1;
227
228 // create the menu
229 m_hMenu = (WXHMENU)CreatePopupMenu();
230 if ( !m_hMenu )
231 {
232 wxLogLastError(wxT("CreatePopupMenu"));
233 }
234
235 // if we have a title, insert it in the beginning of the menu
236 if ( !m_title.empty() )
237 {
238 Append(idMenuTitle, m_title);
239 AppendSeparator();
240 }
241 }
242
243 // The wxWindow destructor will take care of deleting the submenus.
244 wxMenu::~wxMenu()
245 {
246 // we should free Windows resources only if Windows doesn't do it for us
247 // which happens if we're attached to a menubar or a submenu of another
248 // menu
249 if ( !IsAttached() && !GetParent() )
250 {
251 if ( !::DestroyMenu(GetHmenu()) )
252 {
253 wxLogLastError(wxT("DestroyMenu"));
254 }
255 }
256
257 #if wxUSE_ACCEL
258 // delete accels
259 WX_CLEAR_ARRAY(m_accels);
260 #endif // wxUSE_ACCEL
261 }
262
263 void wxMenu::Break()
264 {
265 // this will take effect during the next call to Append()
266 m_doBreak = true;
267 }
268
269 void wxMenu::Attach(wxMenuBarBase *menubar)
270 {
271 wxMenuBase::Attach(menubar);
272
273 EndRadioGroup();
274 }
275
276 #if wxUSE_ACCEL
277
278 int wxMenu::FindAccel(int id) const
279 {
280 size_t n, count = m_accels.GetCount();
281 for ( n = 0; n < count; n++ )
282 {
283 if ( m_accels[n]->m_command == id )
284 return n;
285 }
286
287 return wxNOT_FOUND;
288 }
289
290 void wxMenu::UpdateAccel(wxMenuItem *item)
291 {
292 if ( item->IsSubMenu() )
293 {
294 wxMenu *submenu = item->GetSubMenu();
295 wxMenuItemList::compatibility_iterator node = submenu->GetMenuItems().GetFirst();
296 while ( node )
297 {
298 UpdateAccel(node->GetData());
299
300 node = node->GetNext();
301 }
302 }
303 else if ( !item->IsSeparator() )
304 {
305 // recurse upwards: we should only modify m_accels of the top level
306 // menus, not of the submenus as wxMenuBar doesn't look at them
307 // (alternative and arguable cleaner solution would be to recurse
308 // downwards in GetAccelCount() and CopyAccels())
309 if ( GetParent() )
310 {
311 GetParent()->UpdateAccel(item);
312 return;
313 }
314
315 // find the (new) accel for this item
316 wxAcceleratorEntry *accel = wxAcceleratorEntry::Create(item->GetText());
317 if ( accel )
318 accel->m_command = item->GetId();
319
320 // find the old one
321 int n = FindAccel(item->GetId());
322 if ( n == wxNOT_FOUND )
323 {
324 // no old, add new if any
325 if ( accel )
326 m_accels.Add(accel);
327 else
328 return; // skipping RebuildAccelTable() below
329 }
330 else
331 {
332 // replace old with new or just remove the old one if no new
333 delete m_accels[n];
334 if ( accel )
335 m_accels[n] = accel;
336 else
337 m_accels.RemoveAt(n);
338 }
339
340 if ( IsAttached() )
341 {
342 GetMenuBar()->RebuildAccelTable();
343 }
344 }
345 //else: it is a separator, they can't have accels, nothing to do
346 }
347
348 #endif // wxUSE_ACCEL
349
350 // append a new item or submenu to the menu
351 bool wxMenu::DoInsertOrAppend(wxMenuItem *pItem, size_t pos)
352 {
353 #if wxUSE_ACCEL
354 UpdateAccel(pItem);
355 #endif // wxUSE_ACCEL
356
357 UINT flags = 0;
358
359 // if "Break" has just been called, insert a menu break before this item
360 // (and don't forget to reset the flag)
361 if ( m_doBreak ) {
362 flags |= MF_MENUBREAK;
363 m_doBreak = false;
364 }
365
366 if ( pItem->IsSeparator() ) {
367 flags |= MF_SEPARATOR;
368 }
369
370 // id is the numeric id for normal menu items and HMENU for submenus as
371 // required by ::AppendMenu() API
372 UINT id;
373 wxMenu *submenu = pItem->GetSubMenu();
374 if ( submenu != NULL ) {
375 wxASSERT_MSG( submenu->GetHMenu(), wxT("invalid submenu") );
376
377 submenu->SetParent(this);
378
379 id = (UINT)submenu->GetHMenu();
380
381 flags |= MF_POPUP;
382 }
383 else {
384 id = pItem->GetId();
385 }
386
387
388 // prepare to insert the item in the menu
389 wxString itemText = pItem->GetText();
390 LPCTSTR pData = NULL;
391 if ( pos == (size_t)-1 )
392 {
393 // append at the end (note that the item is already appended to
394 // internal data structures)
395 pos = GetMenuItemCount() - 1;
396 }
397
398 // adjust position to account for the title, if any
399 if ( !m_title.empty() )
400 pos += 2; // for the title itself and its separator
401
402 BOOL ok = false;
403
404 #if wxUSE_OWNER_DRAWN
405 // Currently, mixing owner-drawn and non-owner-drawn items results in
406 // inconsistent margins, so we force this to be owner-drawn if any other
407 // items already are. Later we might want to use a boolean in the wxMenu
408 // to avoid search. Also we might make this fix unnecessary by getting the correct
409 // margin using NONCLIENTMETRICS.
410 if ( !pItem->IsOwnerDrawn() && !pItem->IsSeparator() )
411 {
412 // Check if any other items are ownerdrawn, and make ownerdrawn if so
413 wxMenuItemList::compatibility_iterator node = GetMenuItems().GetFirst();
414 while (node)
415 {
416 if (node->GetData()->IsOwnerDrawn())
417 {
418 pItem->SetOwnerDrawn(true);
419 break;
420 }
421 node = node->GetNext();
422 }
423 }
424 #endif
425
426 // check if we have something more than a simple text item
427 #if wxUSE_OWNER_DRAWN
428 if ( pItem->IsOwnerDrawn() )
429 {
430 // is the item owner-drawn just because of the [checked] bitmap?
431 if ( (pItem->GetBitmap(false).Ok() || pItem->GetBitmap(true).Ok()) &&
432 !pItem->GetTextColour().Ok() &&
433 !pItem->GetBackgroundColour().Ok() &&
434 !pItem->GetFont().Ok() )
435 {
436 // try to use InsertMenuItem() as it's guaranteed to look correct
437 // while our owner-drawn code is not
438
439 // first compile-time check
440 #if defined(MIIM_BITMAP) && (_WIN32_WINNT >= 0x0500)
441 WinStruct<MENUITEMINFO> mii;
442
443 // now run-time one: MIIM_BITMAP only works under WinME/2000+
444 if ( wxGetWinVersion() >= wxWinVersion_98 )
445 {
446 mii.fMask = MIIM_STRING | MIIM_DATA | MIIM_BITMAP;
447 if ( pItem->IsCheckable() )
448 {
449 // need to set checked/unchecked bitmaps as otherwise our
450 // MSWOnDrawItem() item is not called
451 mii.fMask |= MIIM_CHECKMARKS;
452 }
453
454 mii.cch = itemText.length();
455 mii.dwTypeData = wx_const_cast(wxChar *, itemText.c_str());
456
457 if (flags & MF_POPUP)
458 {
459 mii.fMask |= MIIM_SUBMENU;
460 mii.hSubMenu = (HMENU)pItem->GetSubMenu()->GetHMenu();
461 }
462 else
463 {
464 mii.fMask |= MIIM_ID;
465 mii.wID = id;
466 }
467
468 // we can't pass HBITMAP directly as hbmpItem for 2 reasons:
469 // 1. we can't draw it with transparency then (this is not
470 // very important now but would be with themed menu bg)
471 // 2. worse, Windows inverts the bitmap for the selected
472 // item and this looks downright ugly
473 //
474 // so instead draw it ourselves in MSWOnDrawItem()
475 mii.dwItemData = wx_reinterpret_cast(ULONG_PTR, pItem);
476 if ( pItem->IsCheckable() )
477 {
478 mii.hbmpChecked =
479 mii.hbmpUnchecked = HBMMENU_CALLBACK;
480 }
481 mii.hbmpItem = HBMMENU_CALLBACK;
482
483 ok = ::InsertMenuItem(GetHmenu(), pos, TRUE /* by pos */, &mii);
484 if ( !ok )
485 {
486 wxLogLastError(wxT("InsertMenuItem()"));
487 }
488 else // InsertMenuItem() ok
489 {
490 // we need to remove the extra indent which is reserved for
491 // the checkboxes by default as it looks ugly unless check
492 // boxes are used together with bitmaps and this is not the
493 // case in wx API
494 WinStruct<MENUINFO> mi;
495
496 // don't call SetMenuInfo() directly, this would prevent
497 // the app from starting up under Windows 95/NT 4
498 typedef BOOL (WINAPI *SetMenuInfo_t)(HMENU, MENUINFO *);
499
500 wxDynamicLibrary dllUser(_T("user32"));
501 wxDYNLIB_FUNCTION(SetMenuInfo_t, SetMenuInfo, dllUser);
502 if ( pfnSetMenuInfo )
503 {
504 mi.fMask = MIM_STYLE;
505 mi.dwStyle = MNS_CHECKORBMP;
506 if ( !(*pfnSetMenuInfo)(GetHmenu(), &mi) )
507 wxLogLastError(_T("SetMenuInfo(MNS_NOCHECK)"));
508 }
509
510 // tell the item that it's not really owner-drawn but only
511 // needs to draw its bitmap, the rest is done by Windows
512 pItem->ResetOwnerDrawn();
513 }
514 }
515 #endif // MIIM_BITMAP
516 }
517
518 if ( !ok )
519 {
520 // item draws itself, pass pointer to it in data parameter
521 flags |= MF_OWNERDRAW;
522 pData = (LPCTSTR)pItem;
523 }
524 }
525 else
526 #endif // wxUSE_OWNER_DRAWN
527 {
528 // item is just a normal string (passed in data parameter)
529 flags |= MF_STRING;
530
531 #ifdef __WXWINCE__
532 itemText = wxMenuItem::GetLabelFromText(itemText);
533 #endif
534
535 pData = (wxChar*)itemText.c_str();
536 }
537
538 // item might have already been inserted by InsertMenuItem() above
539 if ( !ok )
540 {
541 if ( !::InsertMenu(GetHmenu(), pos, flags | MF_BYPOSITION, id, pData) )
542 {
543 wxLogLastError(wxT("InsertMenu[Item]()"));
544
545 return false;
546 }
547 }
548
549
550 // if we just appended the title, highlight it
551 if ( (int)id == idMenuTitle )
552 {
553 // visually select the menu title
554 SetDefaultMenuItem(GetHmenu(), id);
555 }
556
557 // if we're already attached to the menubar, we must update it
558 if ( IsAttached() && GetMenuBar()->IsAttached() )
559 {
560 GetMenuBar()->Refresh();
561 }
562
563 return true;
564 }
565
566 void wxMenu::EndRadioGroup()
567 {
568 // we're not inside a radio group any longer
569 m_startRadioGroup = -1;
570 }
571
572 wxMenuItem* wxMenu::DoAppend(wxMenuItem *item)
573 {
574 wxCHECK_MSG( item, NULL, _T("NULL item in wxMenu::DoAppend") );
575
576 bool check = false;
577
578 if ( item->GetKind() == wxITEM_RADIO )
579 {
580 int count = GetMenuItemCount();
581
582 if ( m_startRadioGroup == -1 )
583 {
584 // start a new radio group
585 m_startRadioGroup = count;
586
587 // for now it has just one element
588 item->SetAsRadioGroupStart();
589 item->SetRadioGroupEnd(m_startRadioGroup);
590
591 // ensure that we have a checked item in the radio group
592 check = true;
593 }
594 else // extend the current radio group
595 {
596 // we need to update its end item
597 item->SetRadioGroupStart(m_startRadioGroup);
598 wxMenuItemList::compatibility_iterator node = GetMenuItems().Item(m_startRadioGroup);
599
600 if ( node )
601 {
602 node->GetData()->SetRadioGroupEnd(count);
603 }
604 else
605 {
606 wxFAIL_MSG( _T("where is the radio group start item?") );
607 }
608 }
609 }
610 else // not a radio item
611 {
612 EndRadioGroup();
613 }
614
615 if ( !wxMenuBase::DoAppend(item) || !DoInsertOrAppend(item) )
616 {
617 return NULL;
618 }
619
620 if ( check )
621 {
622 // check the item initially
623 item->Check(true);
624 }
625
626 return item;
627 }
628
629 wxMenuItem* wxMenu::DoInsert(size_t pos, wxMenuItem *item)
630 {
631 if (wxMenuBase::DoInsert(pos, item) && DoInsertOrAppend(item, pos))
632 return item;
633 else
634 return NULL;
635 }
636
637 wxMenuItem *wxMenu::DoRemove(wxMenuItem *item)
638 {
639 // we need to find the item's position in the child list
640 size_t pos;
641 wxMenuItemList::compatibility_iterator node = GetMenuItems().GetFirst();
642 for ( pos = 0; node; pos++ )
643 {
644 if ( node->GetData() == item )
645 break;
646
647 node = node->GetNext();
648 }
649
650 // DoRemove() (unlike Remove) can only be called for an existing item!
651 wxCHECK_MSG( node, NULL, wxT("bug in wxMenu::Remove logic") );
652
653 #if wxUSE_ACCEL
654 // remove the corresponding accel from the accel table
655 int n = FindAccel(item->GetId());
656 if ( n != wxNOT_FOUND )
657 {
658 delete m_accels[n];
659
660 m_accels.RemoveAt(n);
661 }
662 //else: this item doesn't have an accel, nothing to do
663 #endif // wxUSE_ACCEL
664
665 // remove the item from the menu
666 if ( !::RemoveMenu(GetHmenu(), (UINT)pos, MF_BYPOSITION) )
667 {
668 wxLogLastError(wxT("RemoveMenu"));
669 }
670
671 if ( IsAttached() && GetMenuBar()->IsAttached() )
672 {
673 // otherwise, the change won't be visible
674 GetMenuBar()->Refresh();
675 }
676
677 // and from internal data structures
678 return wxMenuBase::DoRemove(item);
679 }
680
681 // ---------------------------------------------------------------------------
682 // accelerator helpers
683 // ---------------------------------------------------------------------------
684
685 #if wxUSE_ACCEL
686
687 // create the wxAcceleratorEntries for our accels and put them into the provided
688 // array - return the number of accels we have
689 size_t wxMenu::CopyAccels(wxAcceleratorEntry *accels) const
690 {
691 size_t count = GetAccelCount();
692 for ( size_t n = 0; n < count; n++ )
693 {
694 *accels++ = *m_accels[n];
695 }
696
697 return count;
698 }
699
700 #endif // wxUSE_ACCEL
701
702 // ---------------------------------------------------------------------------
703 // set wxMenu title
704 // ---------------------------------------------------------------------------
705
706 void wxMenu::SetTitle(const wxString& label)
707 {
708 bool hasNoTitle = m_title.empty();
709 m_title = label;
710
711 HMENU hMenu = GetHmenu();
712
713 if ( hasNoTitle )
714 {
715 if ( !label.empty() )
716 {
717 if ( !::InsertMenu(hMenu, 0u, MF_BYPOSITION | MF_STRING,
718 (unsigned)idMenuTitle, m_title) ||
719 !::InsertMenu(hMenu, 1u, MF_BYPOSITION, (unsigned)-1, NULL) )
720 {
721 wxLogLastError(wxT("InsertMenu"));
722 }
723 }
724 }
725 else
726 {
727 if ( label.empty() )
728 {
729 // remove the title and the separator after it
730 if ( !RemoveMenu(hMenu, 0, MF_BYPOSITION) ||
731 !RemoveMenu(hMenu, 0, MF_BYPOSITION) )
732 {
733 wxLogLastError(wxT("RemoveMenu"));
734 }
735 }
736 else
737 {
738 // modify the title
739 #ifdef __WXWINCE__
740 MENUITEMINFO info;
741 wxZeroMemory(info);
742 info.cbSize = sizeof(info);
743 info.fMask = MIIM_TYPE;
744 info.fType = MFT_STRING;
745 info.cch = m_title.length();
746 info.dwTypeData = (LPTSTR) m_title.c_str();
747 if ( !SetMenuItemInfo(hMenu, 0, TRUE, & info) )
748 {
749 wxLogLastError(wxT("SetMenuItemInfo"));
750 }
751 #else
752 if ( !ModifyMenu(hMenu, 0u,
753 MF_BYPOSITION | MF_STRING,
754 (unsigned)idMenuTitle, m_title) )
755 {
756 wxLogLastError(wxT("ModifyMenu"));
757 }
758 #endif
759 }
760 }
761
762 #ifdef __WIN32__
763 // put the title string in bold face
764 if ( !m_title.empty() )
765 {
766 SetDefaultMenuItem(GetHmenu(), (UINT)idMenuTitle);
767 }
768 #endif // Win32
769 }
770
771 // ---------------------------------------------------------------------------
772 // event processing
773 // ---------------------------------------------------------------------------
774
775 bool wxMenu::MSWCommand(WXUINT WXUNUSED(param), WXWORD id)
776 {
777 // ignore commands from the menu title
778 if ( id != (WXWORD)idMenuTitle )
779 {
780 // get the checked status of the command: notice that menuState is the
781 // old state of the menu, so the test for MF_CHECKED must be inverted
782 UINT menuState = ::GetMenuState(GetHmenu(), id, MF_BYCOMMAND);
783 SendEvent(id, !(menuState & MF_CHECKED));
784 }
785
786 return true;
787 }
788
789 // ---------------------------------------------------------------------------
790 // other
791 // ---------------------------------------------------------------------------
792
793 wxWindow *wxMenu::GetWindow() const
794 {
795 if ( m_invokingWindow != NULL )
796 return m_invokingWindow;
797 else if ( GetMenuBar() != NULL)
798 return GetMenuBar()->GetFrame();
799
800 return NULL;
801 }
802
803 // ---------------------------------------------------------------------------
804 // Menu Bar
805 // ---------------------------------------------------------------------------
806
807 void wxMenuBar::Init()
808 {
809 m_eventHandler = this;
810 m_hMenu = 0;
811 #if wxUSE_TOOLBAR && defined(__WXWINCE__)
812 m_toolBar = NULL;
813 #endif
814 // Not using a combined wxToolBar/wxMenuBar? then use
815 // a commandbar in WinCE .NET just to implement the
816 // menubar.
817 #if defined(WINCE_WITH_COMMANDBAR)
818 m_commandBar = NULL;
819 m_adornmentsAdded = false;
820 #endif
821 }
822
823 wxMenuBar::wxMenuBar()
824 {
825 Init();
826 }
827
828 wxMenuBar::wxMenuBar( long WXUNUSED(style) )
829 {
830 Init();
831 }
832
833 wxMenuBar::wxMenuBar(size_t count, wxMenu *menus[], const wxString titles[], long WXUNUSED(style))
834 {
835 Init();
836
837 m_titles.Alloc(count);
838
839 for ( size_t i = 0; i < count; i++ )
840 {
841 m_menus.Append(menus[i]);
842 m_titles.Add(titles[i]);
843
844 menus[i]->Attach(this);
845 }
846 }
847
848 wxMenuBar::~wxMenuBar()
849 {
850 // In Windows CE (not .NET), the menubar is always associated
851 // with a toolbar, which destroys the menu implicitly.
852 #if defined(WINCE_WITHOUT_COMMANDBAR) && defined(__POCKETPC__)
853 if (GetToolBar())
854 {
855 wxToolMenuBar* toolMenuBar = wxDynamicCast(GetToolBar(), wxToolMenuBar);
856 if (toolMenuBar)
857 toolMenuBar->SetMenuBar(NULL);
858 }
859 #else
860 // we should free Windows resources only if Windows doesn't do it for us
861 // which happens if we're attached to a frame
862 if (m_hMenu && !IsAttached())
863 {
864 #if defined(WINCE_WITH_COMMANDBAR)
865 ::DestroyWindow((HWND) m_commandBar);
866 m_commandBar = (WXHWND) NULL;
867 #else
868 ::DestroyMenu((HMENU)m_hMenu);
869 #endif
870 m_hMenu = (WXHMENU)NULL;
871 }
872 #endif
873 }
874
875 // ---------------------------------------------------------------------------
876 // wxMenuBar helpers
877 // ---------------------------------------------------------------------------
878
879 void wxMenuBar::Refresh()
880 {
881 if ( IsFrozen() )
882 return;
883
884 wxCHECK_RET( IsAttached(), wxT("can't refresh unattached menubar") );
885
886 #if defined(WINCE_WITHOUT_COMMANDBAR)
887 if (GetToolBar())
888 {
889 CommandBar_DrawMenuBar((HWND) GetToolBar()->GetHWND(), 0);
890 }
891 #elif defined(WINCE_WITH_COMMANDBAR)
892 if (m_commandBar)
893 DrawMenuBar((HWND) m_commandBar);
894 #else
895 DrawMenuBar(GetHwndOf(GetFrame()));
896 #endif
897 }
898
899 WXHMENU wxMenuBar::Create()
900 {
901 // Note: this doesn't work at all on Smartphone,
902 // since you have to use resources.
903 // We'll have to find another way to add a menu
904 // by changing/adding menu items to an existing menu.
905 #if defined(WINCE_WITHOUT_COMMANDBAR)
906 if ( m_hMenu != 0 )
907 return m_hMenu;
908
909 if (!GetToolBar())
910 return 0;
911
912 HWND hCommandBar = (HWND) GetToolBar()->GetHWND();
913 HMENU hMenu = (HMENU)::SendMessage(hCommandBar, SHCMBM_GETMENU, (WPARAM)0, (LPARAM)0);
914
915 // hMenu may be zero on Windows Mobile 5. So add the menus anyway.
916 if (1) // (hMenu)
917 {
918 TBBUTTON tbButton;
919 memset(&tbButton, 0, sizeof(TBBUTTON));
920 tbButton.iBitmap = I_IMAGENONE;
921 tbButton.fsState = TBSTATE_ENABLED;
922 tbButton.fsStyle = TBSTYLE_DROPDOWN | TBSTYLE_NO_DROPDOWN_ARROW | TBSTYLE_AUTOSIZE;
923
924 size_t i;
925 for (i = 0; i < GetMenuCount(); i++)
926 {
927 HMENU hPopupMenu = (HMENU) GetMenu(i)->GetHMenu() ;
928 tbButton.dwData = (DWORD)hPopupMenu;
929 wxString label = wxStripMenuCodes(GetLabelTop(i));
930 tbButton.iString = (int) label.c_str();
931
932 int position = i;
933
934 tbButton.idCommand = NewControlId();
935 if (!::SendMessage(hCommandBar, TB_INSERTBUTTON, position, (LPARAM)&tbButton))
936 {
937 wxLogLastError(wxT("TB_INSERTBUTTON"));
938 }
939 }
940 }
941 m_hMenu = (WXHMENU) hMenu;
942 return m_hMenu;
943 #else
944 if ( m_hMenu != 0 )
945 return m_hMenu;
946
947 m_hMenu = (WXHMENU)::CreateMenu();
948
949 if ( !m_hMenu )
950 {
951 wxLogLastError(wxT("CreateMenu"));
952 }
953 else
954 {
955 size_t count = GetMenuCount(), i;
956 wxMenuList::iterator it;
957 for ( i = 0, it = m_menus.begin(); i < count; i++, it++ )
958 {
959 if ( !::AppendMenu((HMENU)m_hMenu, MF_POPUP | MF_STRING,
960 (UINT)(*it)->GetHMenu(),
961 m_titles[i]) )
962 {
963 wxLogLastError(wxT("AppendMenu"));
964 }
965 }
966 }
967
968 return m_hMenu;
969 #endif
970 }
971
972 int wxMenuBar::MSWPositionForWxMenu(wxMenu *menu, int wxpos)
973 {
974 wxASSERT(menu);
975 wxASSERT(menu->GetHMenu());
976 wxASSERT(m_hMenu);
977
978 #if defined(__WXWINCE__)
979 int totalMSWItems = GetMenuCount();
980 #else
981 int totalMSWItems = GetMenuItemCount((HMENU)m_hMenu);
982 #endif
983
984 int i; // For old C++ compatibility
985 for(i=wxpos; i<totalMSWItems; i++)
986 {
987 if(GetSubMenu((HMENU)m_hMenu,i)==(HMENU)menu->GetHMenu())
988 return i;
989 }
990 for(i=0; i<wxpos; i++)
991 {
992 if(GetSubMenu((HMENU)m_hMenu,i)==(HMENU)menu->GetHMenu())
993 return i;
994 }
995 wxFAIL;
996 return -1;
997 }
998
999 // ---------------------------------------------------------------------------
1000 // wxMenuBar functions to work with the top level submenus
1001 // ---------------------------------------------------------------------------
1002
1003 // NB: we don't support owner drawn top level items for now, if we do these
1004 // functions would have to be changed to use wxMenuItem as well
1005
1006 void wxMenuBar::EnableTop(size_t pos, bool enable)
1007 {
1008 wxCHECK_RET( IsAttached(), wxT("doesn't work with unattached menubars") );
1009 wxCHECK_RET( pos < GetMenuCount(), wxT("invalid menu index") );
1010
1011 int flag = enable ? MF_ENABLED : MF_GRAYED;
1012
1013 EnableMenuItem((HMENU)m_hMenu, MSWPositionForWxMenu(GetMenu(pos),pos), MF_BYPOSITION | flag);
1014
1015 Refresh();
1016 }
1017
1018 void wxMenuBar::SetLabelTop(size_t pos, const wxString& label)
1019 {
1020 wxCHECK_RET( pos < GetMenuCount(), wxT("invalid menu index") );
1021
1022 m_titles[pos] = label;
1023
1024 if ( !IsAttached() )
1025 {
1026 return;
1027 }
1028 //else: have to modify the existing menu
1029
1030 int mswpos = MSWPositionForWxMenu(GetMenu(pos),pos);
1031
1032 UINT id;
1033 UINT flagsOld = ::GetMenuState((HMENU)m_hMenu, mswpos, MF_BYPOSITION);
1034 if ( flagsOld == 0xFFFFFFFF )
1035 {
1036 wxLogLastError(wxT("GetMenuState"));
1037
1038 return;
1039 }
1040
1041 if ( flagsOld & MF_POPUP )
1042 {
1043 // HIBYTE contains the number of items in the submenu in this case
1044 flagsOld &= 0xff;
1045 id = (UINT)::GetSubMenu((HMENU)m_hMenu, mswpos);
1046 }
1047 else
1048 {
1049 id = pos;
1050 }
1051
1052 #ifdef __WXWINCE__
1053 MENUITEMINFO info;
1054 wxZeroMemory(info);
1055 info.cbSize = sizeof(info);
1056 info.fMask = MIIM_TYPE;
1057 info.fType = MFT_STRING;
1058 info.cch = label.length();
1059 info.dwTypeData = (LPTSTR) label.c_str();
1060 if ( !SetMenuItemInfo(GetHmenu(), id, TRUE, & info) )
1061 {
1062 wxLogLastError(wxT("SetMenuItemInfo"));
1063 }
1064
1065 #else
1066 if ( ::ModifyMenu(GetHmenu(), mswpos, MF_BYPOSITION | MF_STRING | flagsOld,
1067 id, label) == (int)0xFFFFFFFF )
1068 {
1069 wxLogLastError(wxT("ModifyMenu"));
1070 }
1071 #endif
1072
1073 Refresh();
1074 }
1075
1076 wxString wxMenuBar::GetLabelTop(size_t pos) const
1077 {
1078 wxCHECK_MSG( pos < GetMenuCount(), wxEmptyString,
1079 wxT("invalid menu index in wxMenuBar::GetLabelTop") );
1080
1081 return wxMenuItem::GetLabelFromText(m_titles[pos]);
1082 }
1083
1084 // ---------------------------------------------------------------------------
1085 // wxMenuBar construction
1086 // ---------------------------------------------------------------------------
1087
1088 wxMenu *wxMenuBar::Replace(size_t pos, wxMenu *menu, const wxString& title)
1089 {
1090 wxMenu *menuOld = wxMenuBarBase::Replace(pos, menu, title);
1091 if ( !menuOld )
1092 return NULL;
1093
1094 m_titles[pos] = title;
1095
1096 #if defined(WINCE_WITHOUT_COMMANDBAR)
1097 if (IsAttached())
1098 #else
1099 if (GetHmenu())
1100 #endif
1101 {
1102 int mswpos = MSWPositionForWxMenu(menuOld,pos);
1103
1104 // can't use ModifyMenu() because it deletes the submenu it replaces
1105 if ( !::RemoveMenu(GetHmenu(), (UINT)mswpos, MF_BYPOSITION) )
1106 {
1107 wxLogLastError(wxT("RemoveMenu"));
1108 }
1109
1110 if ( !::InsertMenu(GetHmenu(), (UINT)mswpos,
1111 MF_BYPOSITION | MF_POPUP | MF_STRING,
1112 (UINT)GetHmenuOf(menu), title) )
1113 {
1114 wxLogLastError(wxT("InsertMenu"));
1115 }
1116
1117 #if wxUSE_ACCEL
1118 if ( menuOld->HasAccels() || menu->HasAccels() )
1119 {
1120 // need to rebuild accell table
1121 RebuildAccelTable();
1122 }
1123 #endif // wxUSE_ACCEL
1124
1125 if (IsAttached())
1126 Refresh();
1127 }
1128
1129 return menuOld;
1130 }
1131
1132 bool wxMenuBar::Insert(size_t pos, wxMenu *menu, const wxString& title)
1133 {
1134 // Find out which MSW item before which we'll be inserting before
1135 // wxMenuBarBase::Insert is called and GetMenu(pos) is the new menu.
1136 // If IsAttached() is false this won't be used anyway
1137 bool isAttached =
1138 #if defined(WINCE_WITHOUT_COMMANDBAR)
1139 IsAttached();
1140 #else
1141 (GetHmenu() != 0);
1142 #endif
1143
1144 int mswpos = (!isAttached || (pos == m_menus.GetCount()))
1145 ? -1 // append the menu
1146 : MSWPositionForWxMenu(GetMenu(pos),pos);
1147
1148 if ( !wxMenuBarBase::Insert(pos, menu, title) )
1149 return false;
1150
1151 m_titles.Insert(title, pos);
1152
1153 if ( isAttached )
1154 {
1155 #if defined(WINCE_WITHOUT_COMMANDBAR)
1156 if (!GetToolBar())
1157 return false;
1158 TBBUTTON tbButton;
1159 memset(&tbButton, 0, sizeof(TBBUTTON));
1160 tbButton.iBitmap = I_IMAGENONE;
1161 tbButton.fsState = TBSTATE_ENABLED;
1162 tbButton.fsStyle = TBSTYLE_DROPDOWN | TBSTYLE_NO_DROPDOWN_ARROW | TBSTYLE_AUTOSIZE;
1163
1164 HMENU hPopupMenu = (HMENU) menu->GetHMenu() ;
1165 tbButton.dwData = (DWORD)hPopupMenu;
1166 wxString label = wxStripMenuCodes(title);
1167 tbButton.iString = (int) label.c_str();
1168
1169 tbButton.idCommand = NewControlId();
1170 if (!::SendMessage((HWND) GetToolBar()->GetHWND(), TB_INSERTBUTTON, pos, (LPARAM)&tbButton))
1171 {
1172 wxLogLastError(wxT("TB_INSERTBUTTON"));
1173 return false;
1174 }
1175 wxUnusedVar(mswpos);
1176 #else
1177 if ( !::InsertMenu(GetHmenu(), mswpos,
1178 MF_BYPOSITION | MF_POPUP | MF_STRING,
1179 (UINT)GetHmenuOf(menu), title) )
1180 {
1181 wxLogLastError(wxT("InsertMenu"));
1182 }
1183 #endif
1184 #if wxUSE_ACCEL
1185 if ( menu->HasAccels() )
1186 {
1187 // need to rebuild accell table
1188 RebuildAccelTable();
1189 }
1190 #endif // wxUSE_ACCEL
1191
1192 if (IsAttached())
1193 Refresh();
1194 }
1195
1196 return true;
1197 }
1198
1199 bool wxMenuBar::Append(wxMenu *menu, const wxString& title)
1200 {
1201 WXHMENU submenu = menu ? menu->GetHMenu() : 0;
1202 wxCHECK_MSG( submenu, false, wxT("can't append invalid menu to menubar") );
1203
1204 if ( !wxMenuBarBase::Append(menu, title) )
1205 return false;
1206
1207 m_titles.Add(title);
1208
1209 #if defined(WINCE_WITHOUT_COMMANDBAR)
1210 if (IsAttached())
1211 #else
1212 if (GetHmenu())
1213 #endif
1214 {
1215 #if defined(WINCE_WITHOUT_COMMANDBAR)
1216 if (!GetToolBar())
1217 return false;
1218 TBBUTTON tbButton;
1219 memset(&tbButton, 0, sizeof(TBBUTTON));
1220 tbButton.iBitmap = I_IMAGENONE;
1221 tbButton.fsState = TBSTATE_ENABLED;
1222 tbButton.fsStyle = TBSTYLE_DROPDOWN | TBSTYLE_NO_DROPDOWN_ARROW | TBSTYLE_AUTOSIZE;
1223
1224 size_t pos = GetMenuCount();
1225 HMENU hPopupMenu = (HMENU) menu->GetHMenu() ;
1226 tbButton.dwData = (DWORD)hPopupMenu;
1227 wxString label = wxStripMenuCodes(title);
1228 tbButton.iString = (int) label.c_str();
1229
1230 tbButton.idCommand = NewControlId();
1231 if (!::SendMessage((HWND) GetToolBar()->GetHWND(), TB_INSERTBUTTON, pos, (LPARAM)&tbButton))
1232 {
1233 wxLogLastError(wxT("TB_INSERTBUTTON"));
1234 return false;
1235 }
1236 #else
1237 if ( !::AppendMenu(GetHmenu(), MF_POPUP | MF_STRING,
1238 (UINT)submenu, title) )
1239 {
1240 wxLogLastError(wxT("AppendMenu"));
1241 }
1242 #endif
1243
1244 #if wxUSE_ACCEL
1245 if ( menu->HasAccels() )
1246 {
1247 // need to rebuild accelerator table
1248 RebuildAccelTable();
1249 }
1250 #endif // wxUSE_ACCEL
1251
1252 if (IsAttached())
1253 Refresh();
1254 }
1255
1256 return true;
1257 }
1258
1259 wxMenu *wxMenuBar::Remove(size_t pos)
1260 {
1261 wxMenu *menu = wxMenuBarBase::Remove(pos);
1262 if ( !menu )
1263 return NULL;
1264
1265 #if defined(WINCE_WITHOUT_COMMANDBAR)
1266 if (IsAttached())
1267 #else
1268 if (GetHmenu())
1269 #endif
1270 {
1271 #if defined(WINCE_WITHOUT_COMMANDBAR)
1272 if (GetToolBar())
1273 {
1274 if (!::SendMessage((HWND) GetToolBar()->GetHWND(), TB_DELETEBUTTON, (UINT) pos, (LPARAM) 0))
1275 {
1276 wxLogLastError(wxT("TB_DELETEBUTTON"));
1277 }
1278 }
1279 #else
1280 if ( !::RemoveMenu(GetHmenu(), (UINT)MSWPositionForWxMenu(menu,pos), MF_BYPOSITION) )
1281 {
1282 wxLogLastError(wxT("RemoveMenu"));
1283 }
1284 #endif
1285
1286 #if wxUSE_ACCEL
1287 if ( menu->HasAccels() )
1288 {
1289 // need to rebuild accell table
1290 RebuildAccelTable();
1291 }
1292 #endif // wxUSE_ACCEL
1293
1294 if (IsAttached())
1295 Refresh();
1296 }
1297
1298 m_titles.RemoveAt(pos);
1299
1300 return menu;
1301 }
1302
1303 #if wxUSE_ACCEL
1304
1305 void wxMenuBar::RebuildAccelTable()
1306 {
1307 // merge the accelerators of all menus into one accel table
1308 size_t nAccelCount = 0;
1309 size_t i, count = GetMenuCount();
1310 wxMenuList::iterator it;
1311 for ( i = 0, it = m_menus.begin(); i < count; i++, it++ )
1312 {
1313 nAccelCount += (*it)->GetAccelCount();
1314 }
1315
1316 if ( nAccelCount )
1317 {
1318 wxAcceleratorEntry *accelEntries = new wxAcceleratorEntry[nAccelCount];
1319
1320 nAccelCount = 0;
1321 for ( i = 0, it = m_menus.begin(); i < count; i++, it++ )
1322 {
1323 nAccelCount += (*it)->CopyAccels(&accelEntries[nAccelCount]);
1324 }
1325
1326 m_accelTable = wxAcceleratorTable(nAccelCount, accelEntries);
1327
1328 delete [] accelEntries;
1329 }
1330 }
1331
1332 #endif // wxUSE_ACCEL
1333
1334 void wxMenuBar::Attach(wxFrame *frame)
1335 {
1336 wxMenuBarBase::Attach(frame);
1337
1338 #if defined(WINCE_WITH_COMMANDBAR)
1339 if (!m_hMenu)
1340 this->Create();
1341 if (!m_commandBar)
1342 m_commandBar = (WXHWND) CommandBar_Create(wxGetInstance(), (HWND) frame->GetHWND(), NewControlId());
1343 if (m_commandBar)
1344 {
1345 if (m_hMenu)
1346 {
1347 if (!CommandBar_InsertMenubarEx((HWND) m_commandBar, NULL, (LPTSTR) m_hMenu, 0))
1348 {
1349 wxLogLastError(wxT("CommandBar_InsertMenubarEx"));
1350 }
1351 }
1352 }
1353 #endif
1354
1355 #if wxUSE_ACCEL
1356 RebuildAccelTable();
1357 #endif // wxUSE_ACCEL
1358 }
1359
1360 #if defined(WINCE_WITH_COMMANDBAR)
1361 bool wxMenuBar::AddAdornments(long style)
1362 {
1363 if (m_adornmentsAdded || !m_commandBar)
1364 return false;
1365
1366 if (style & wxCLOSE_BOX)
1367 {
1368 if (!CommandBar_AddAdornments((HWND) m_commandBar, 0, 0))
1369 wxLogLastError(wxT("CommandBar_AddAdornments"));
1370 else
1371 return true;
1372 }
1373 return false;
1374 }
1375 #endif
1376
1377 void wxMenuBar::Detach()
1378 {
1379 wxMenuBarBase::Detach();
1380 }
1381
1382 #endif // wxUSE_MENUS