]> git.saurik.com Git - wxWidgets.git/blame - src/msw/wince/tbarwce.cpp
fixed GetWeekOfYear() for first/last week in some cases (patch 908793)
[wxWidgets.git] / src / msw / wince / tbarwce.cpp
CommitLineData
39d2f9a7
JS
1/////////////////////////////////////////////////////////////////////////////
2// Name: msw/wince/tbarwce.cpp
3// Purpose: wxToolBar for Windows CE
4// Author: Julian Smart
5// Modified by:
6// Created: 2003-07-12
7// RCS-ID: $Id$
8// Copyright: (c) Julian Smart
65571936 9// Licence: wxWindows licence
39d2f9a7
JS
10/////////////////////////////////////////////////////////////////////////////
11
12// ============================================================================
13// declarations
14// ============================================================================
15
16// ----------------------------------------------------------------------------
17// headers
18// ----------------------------------------------------------------------------
19
14f355c2 20#if defined(__GNUG__) && !defined(NO_GCC_PRAGMA)
39d2f9a7
JS
21 #pragma implementation "tbarwce.h"
22#endif
23
24// For compilers that support precompilation, includes "wx.h".
25#include "wx/wxprec.h"
26
27#ifdef __BORLANDC__
28 #pragma hdrstop
29#endif
30
31#ifndef WX_PRECOMP
32 #include "wx/frame.h"
33 #include "wx/log.h"
34 #include "wx/intl.h"
35 #include "wx/dynarray.h"
36 #include "wx/settings.h"
37 #include "wx/bitmap.h"
38 #include "wx/dcmemory.h"
39 #include "wx/control.h"
40#endif
41
a96b4743
JS
42// Use the WinCE-specific toolbar only if we're either compiling
43// with a WinCE earlier than 4, or we wish to emulate a PocketPC-style UI
a9928e9d 44#if wxUSE_TOOLBAR && wxUSE_TOOLBAR_NATIVE && (_WIN32_WCE < 400 || defined(__POCKETPC__) || defined(__SMARTPHONE__))
39d2f9a7
JS
45
46#include "wx/toolbar.h"
47
48#if !defined(__GNUWIN32__) && !defined(__SALFORDC__)
49 #include "malloc.h"
50#endif
51
52#include "wx/msw/private.h"
53#include <windows.h>
54#include <windowsx.h>
55#include <tchar.h>
56#include <ole2.h>
eae4425d 57#include <shellapi.h>
39d2f9a7 58#include <commctrl.h>
3d487566 59#if defined(WINCE_WITHOUT_COMMANDBAR)
2d36b3d8
JS
60 #include <aygshell.h>
61#endif
62#include "wx/msw/wince/missing.h"
39d2f9a7
JS
63
64#include "wx/msw/winundef.h"
65
66#if defined(__MWERKS__) && defined(__WXMSW__)
67// including <windef.h> for max definition doesn't seem
68// to work using CodeWarrior 6 Windows. So we define it
69// here. (Otherwise we get a undefined identifier 'max'
70// later on in this file.) (Added by dimitri@shortcut.nl)
71# ifndef max
72# define max(a,b) (((a) > (b)) ? (a) : (b))
73# endif
74
75#endif
76
39d2f9a7
JS
77// ----------------------------------------------------------------------------
78// constants
79// ----------------------------------------------------------------------------
80
81// these standard constants are not always defined in compilers headers
82
83// Styles
84#ifndef TBSTYLE_FLAT
85 #define TBSTYLE_LIST 0x1000
86 #define TBSTYLE_FLAT 0x0800
87#endif
88
89#ifndef TBSTYLE_TRANSPARENT
90 #define TBSTYLE_TRANSPARENT 0x8000
91#endif
92
93#ifndef TBSTYLE_TOOLTIPS
94 #define TBSTYLE_TOOLTIPS 0x0100
95#endif
96
97// Messages
98#ifndef TB_GETSTYLE
99 #define TB_SETSTYLE (WM_USER + 56)
100 #define TB_GETSTYLE (WM_USER + 57)
101#endif
102
103#ifndef TB_HITTEST
104 #define TB_HITTEST (WM_USER + 69)
105#endif
106
107// these values correspond to those used by comctl32.dll
108#define DEFAULTBITMAPX 16
109#define DEFAULTBITMAPY 15
110#define DEFAULTBUTTONX 24
111#define DEFAULTBUTTONY 24
112#define DEFAULTBARHEIGHT 27
113
114// ----------------------------------------------------------------------------
115// wxWin macros
116// ----------------------------------------------------------------------------
117
ffcb4ee4 118IMPLEMENT_DYNAMIC_CLASS(wxToolBar, wxControl)
39d2f9a7
JS
119
120BEGIN_EVENT_TABLE(wxToolBar, wxToolBarBase)
121 EVT_MOUSE_EVENTS(wxToolBar::OnMouseEvent)
122 EVT_SYS_COLOUR_CHANGED(wxToolBar::OnSysColourChanged)
123END_EVENT_TABLE()
124
125// ----------------------------------------------------------------------------
126// private classes
127// ----------------------------------------------------------------------------
128
129class wxToolBarTool : public wxToolBarToolBase
130{
131public:
132 wxToolBarTool(wxToolBar *tbar,
133 int id,
134 const wxString& label,
135 const wxBitmap& bmpNormal,
136 const wxBitmap& bmpDisabled,
137 wxItemKind kind,
138 wxObject *clientData,
139 const wxString& shortHelp,
140 const wxString& longHelp)
141 : wxToolBarToolBase(tbar, id, label, bmpNormal, bmpDisabled, kind,
142 clientData, shortHelp, longHelp)
143 {
144 m_nSepCount = 0;
145 }
146
147 wxToolBarTool(wxToolBar *tbar, wxControl *control)
148 : wxToolBarToolBase(tbar, control)
149 {
150 m_nSepCount = 1;
151 }
152
153 virtual void SetLabel(const wxString& label)
154 {
155 if ( label == m_label )
156 return;
157
158 wxToolBarToolBase::SetLabel(label);
159
160 // we need to update the label shown in the toolbar because it has a
161 // pointer to the internal buffer of the old label
162 //
163 // TODO: use TB_SETBUTTONINFO
164 }
165
166 // set/get the number of separators which we use to cover the space used by
167 // a control in the toolbar
168 void SetSeparatorsCount(size_t count) { m_nSepCount = count; }
169 size_t GetSeparatorsCount() const { return m_nSepCount; }
170
171private:
172 size_t m_nSepCount;
173};
174
175
176// ============================================================================
177// implementation
178// ============================================================================
179
180// ----------------------------------------------------------------------------
181// wxToolBarTool
182// ----------------------------------------------------------------------------
183
184wxToolBarToolBase *wxToolBar::CreateTool(int id,
185 const wxString& label,
186 const wxBitmap& bmpNormal,
187 const wxBitmap& bmpDisabled,
188 wxItemKind kind,
189 wxObject *clientData,
190 const wxString& shortHelp,
191 const wxString& longHelp)
192{
193 return new wxToolBarTool(this, id, label, bmpNormal, bmpDisabled, kind,
194 clientData, shortHelp, longHelp);
195}
196
197wxToolBarToolBase *wxToolBar::CreateTool(wxControl *control)
198{
199 return new wxToolBarTool(this, control);
200}
201
202// ----------------------------------------------------------------------------
203// wxToolBar construction
204// ----------------------------------------------------------------------------
205
206void wxToolBar::Init()
207{
208 m_hBitmap = 0;
209
210 m_nButtons = 0;
211
212 m_defaultWidth = DEFAULTBITMAPX;
213 m_defaultHeight = DEFAULTBITMAPY;
214
215 m_pInTool = 0;
216 m_menuBar = NULL;
217}
218
219bool wxToolBar::Create(wxWindow *parent,
220 wxWindowID id,
221 const wxPoint& pos,
222 const wxSize& size,
223 long style,
224 const wxString& name,
225 wxMenuBar* menuBar)
226{
227 // common initialisation
228 if ( !CreateControl(parent, id, pos, size, style, wxDefaultValidator, name) )
16640ba2 229 return false;
39d2f9a7
JS
230
231 // MSW-specific initialisation
232 if ( !MSWCreateToolbar(pos, size, menuBar) )
16640ba2 233 return false;
39d2f9a7
JS
234
235 // set up the colors and fonts
236 SetBackgroundColour(wxSystemSettings::GetColour(wxSYS_COLOUR_MENUBAR));
237 SetFont(wxSystemSettings::GetFont(wxSYS_DEFAULT_GUI_FONT));
238
39fc096d 239 return true;
39d2f9a7
JS
240}
241
242#ifndef TBSTYLE_NO_DROPDOWN_ARROW
243#define TBSTYLE_NO_DROPDOWN_ARROW 0x0080
244#endif
245
16640ba2 246bool wxToolBar::MSWCreateToolbar(const wxPoint& WXUNUSED(pos), const wxSize& WXUNUSED(size), wxMenuBar* menuBar)
39d2f9a7
JS
247{
248 SetMenuBar(menuBar);
249 if (m_menuBar)
250 m_menuBar->SetToolBar(this);
251
3d487566 252#if defined(WINCE_WITHOUT_COMMANDBAR)
39d2f9a7
JS
253 // Create the menubar.
254 SHMENUBARINFO mbi;
39fc096d 255
39d2f9a7
JS
256 memset (&mbi, 0, sizeof (SHMENUBARINFO));
257 mbi.cbSize = sizeof (SHMENUBARINFO);
258 mbi.hwndParent = (HWND) GetParent()->GetHWND();
d7da7f13 259#ifdef __SMARTPHONE__
74d0b78c
JS
260 mbi.nToolBarId = 5002;
261#else
39d2f9a7 262 mbi.nToolBarId = 5000;
74d0b78c 263#endif
39d2f9a7
JS
264 mbi.nBmpId = 0;
265 mbi.cBmpImages = 0;
266 mbi.dwFlags = 0 ; // SHCMBF_EMPTYBAR;
267 mbi.hInstRes = wxGetInstance();
39fc096d 268
39d2f9a7
JS
269 if (!SHCreateMenuBar(&mbi))
270 {
271 wxFAIL_MSG( _T("SHCreateMenuBar failed") );
16640ba2 272 return false;
39d2f9a7 273 }
39fc096d 274
39d2f9a7 275 SetHWND((WXHWND) mbi.hwndMB);
960b193e
JS
276#else
277 HWND hWnd = CommandBar_Create(wxGetInstance(), (HWND) GetParent()->GetHWND(), GetId());
278 SetHWND((WXHWND) hWnd);
2d36b3d8
JS
279#endif
280
77ffb593 281 // install wxWidgets window proc for this window
39d2f9a7
JS
282 SubclassWin(m_hWnd);
283
284 if (menuBar)
285 menuBar->Create();
39fc096d
WS
286
287 return true;
39d2f9a7
JS
288}
289
290void wxToolBar::Recreate()
291{
292#if 0
293 const HWND hwndOld = GetHwnd();
294 if ( !hwndOld )
295 {
296 // we haven't been created yet, no need to recreate
297 return;
298 }
299
300 // get the position and size before unsubclassing the old toolbar
301 const wxPoint pos = GetPosition();
302 const wxSize size = GetSize();
303
304 UnsubclassWin();
305
306 if ( !MSWCreateToolbar(pos, size) )
307 {
308 // what can we do?
309 wxFAIL_MSG( _T("recreating the toolbar failed") );
310
311 return;
312 }
313
314 // reparent all our children under the new toolbar
315 for ( wxWindowList::compatibility_iterator node = m_children.GetFirst();
316 node;
317 node = node->GetNext() )
318 {
319 wxWindow *win = node->GetData();
320 if ( !win->IsTopLevel() )
321 ::SetParent(GetHwndOf(win), GetHwnd());
322 }
323
324 // only destroy the old toolbar now -- after all the children had been
325 // reparented
326 ::DestroyWindow(hwndOld);
327
328 // it is for the old bitmap control and can't be used with the new one
329 if ( m_hBitmap )
330 {
331 ::DeleteObject((HBITMAP) m_hBitmap);
332 m_hBitmap = 0;
333 }
334
335 Realize();
336 UpdateSize();
337#endif
338}
339
340wxToolBar::~wxToolBar()
341{
bf95a04f
JS
342 if (GetMenuBar())
343 GetMenuBar()->SetToolBar(NULL);
344
39d2f9a7
JS
345 // we must refresh the frame size when the toolbar is deleted but the frame
346 // is not - otherwise toolbar leaves a hole in the place it used to occupy
347 wxFrame *frame = wxDynamicCast(GetParent(), wxFrame);
348 if ( frame && !frame->IsBeingDeleted() )
349 {
350 frame->SendSizeEvent();
351 }
352
353 if ( m_hBitmap )
354 {
355 ::DeleteObject((HBITMAP) m_hBitmap);
356 }
357}
358
359wxSize wxToolBar::DoGetBestSize() const
360{
361 wxSize sizeBest = GetToolSize();
362 sizeBest.x *= GetToolsCount();
363
364 // reverse horz and vertical components if necessary
365 return HasFlag(wxTB_VERTICAL) ? wxSize(sizeBest.y, sizeBest.x) : sizeBest;
366}
367
368// Return HMENU for the menu associated with the commandbar
369WXHMENU wxToolBar::GetHMenu()
370{
781a24e8
RR
371#if defined(__HANDHELDPC__)
372 // TODO ???
373 return 0;
374#else
39d2f9a7
JS
375 if (GetHWND())
376 {
377 return (WXHMENU) (HMENU)::SendMessage((HWND) GetHWND(), SHCMBM_GETMENU, (WPARAM)0, (LPARAM)0);
378 }
379 else
380 return 0;
781a24e8 381#endif
39d2f9a7
JS
382}
383
384
385WXDWORD wxToolBar::MSWGetStyle(long style, WXDWORD *exstyle) const
386{
387 // toolbars never have border, giving one to them results in broken
388 // appearance
389 WXDWORD msStyle = wxControl::MSWGetStyle
390 (
391 (style & ~wxBORDER_MASK) | wxBORDER_NONE, exstyle
392 );
393
394 // always include this one, it never hurts and setting it later only if we
395 // do have tooltips wouldn't work
396 msStyle |= TBSTYLE_TOOLTIPS;
397
398 if ( style & (wxTB_FLAT | wxTB_HORZ_LAYOUT) )
399 {
400 // static as it doesn't change during the program lifetime
401 static int s_verComCtl = wxTheApp->GetComCtl32Version();
402
403 // comctl32.dll 4.00 doesn't support the flat toolbars and using this
404 // style with 6.00 (part of Windows XP) leads to the toolbar with
405 // incorrect background colour - and not using it still results in the
406 // correct (flat) toolbar, so don't use it there
407 if ( s_verComCtl > 400 && s_verComCtl < 600 )
408 {
409 msStyle |= TBSTYLE_FLAT | TBSTYLE_TRANSPARENT;
410 }
411
412 if ( s_verComCtl >= 470 && style & wxTB_HORZ_LAYOUT )
413 {
414 msStyle |= TBSTYLE_LIST;
415 }
416 }
417
418 if ( style & wxTB_NODIVIDER )
419 msStyle |= CCS_NODIVIDER;
420
421 if ( style & wxTB_NOALIGN )
422 msStyle |= CCS_NOPARENTALIGN;
423
424 if ( style & wxTB_VERTICAL )
425 msStyle |= CCS_VERT;
426
427 return msStyle;
428}
429
430// ----------------------------------------------------------------------------
431// adding/removing tools
432// ----------------------------------------------------------------------------
433
434bool wxToolBar::DoInsertTool(size_t WXUNUSED(pos), wxToolBarToolBase *tool)
435{
436 // nothing special to do here - we really create the toolbar buttons in
437 // Realize() later
438 tool->Attach(this);
439
39fc096d 440 return true;
39d2f9a7
JS
441}
442
443bool wxToolBar::DoDeleteTool(size_t pos, wxToolBarToolBase *tool)
444{
445 // the main difficulty we have here is with the controls in the toolbars:
446 // as we (sometimes) use several separators to cover up the space used by
447 // them, the indices are not the same for us and the toolbar
448
449 // first determine the position of the first button to delete: it may be
450 // different from pos if we use several separators to cover the space used
451 // by a control
452 wxToolBarToolsList::compatibility_iterator node;
453 for ( node = m_tools.GetFirst(); node; node = node->GetNext() )
454 {
455 wxToolBarToolBase *tool2 = node->GetData();
456 if ( tool2 == tool )
457 {
458 // let node point to the next node in the list
459 node = node->GetNext();
460
461 break;
462 }
463
464 if ( tool2->IsControl() )
465 {
466 pos += ((wxToolBarTool *)tool2)->GetSeparatorsCount() - 1;
467 }
468 }
469
470 // now determine the number of buttons to delete and the area taken by them
471 size_t nButtonsToDelete = 1;
472
473 // get the size of the button we're going to delete
474 RECT r;
475 if ( !::SendMessage(GetHwnd(), TB_GETITEMRECT, pos, (LPARAM)&r) )
476 {
477 wxLogLastError(_T("TB_GETITEMRECT"));
478 }
479
480 int width = r.right - r.left;
481
482 if ( tool->IsControl() )
483 {
484 nButtonsToDelete = ((wxToolBarTool *)tool)->GetSeparatorsCount();
485
486 width *= nButtonsToDelete;
487 }
488
489 // do delete all buttons
490 m_nButtons -= nButtonsToDelete;
491 while ( nButtonsToDelete-- > 0 )
492 {
493 if ( !::SendMessage(GetHwnd(), TB_DELETEBUTTON, pos, 0) )
494 {
495 wxLogLastError(wxT("TB_DELETEBUTTON"));
496
16640ba2 497 return false;
39d2f9a7
JS
498 }
499 }
500
501 tool->Detach();
502
503 // and finally reposition all the controls after this button (the toolbar
504 // takes care of all normal items)
505 for ( /* node -> first after deleted */ ; node; node = node->GetNext() )
506 {
507 wxToolBarToolBase *tool2 = node->GetData();
508 if ( tool2->IsControl() )
509 {
510 int x;
511 wxControl *control = tool2->GetControl();
512 control->GetPosition(&x, NULL);
39fc096d 513 control->Move(x - width, wxDefaultCoord);
39d2f9a7
JS
514 }
515 }
516
39fc096d 517 return true;
39d2f9a7
JS
518}
519
bf95a04f
JS
520struct wxToolBarIdMapping
521{
522 int m_wxwinId;
523 int m_winceId;
524};
525
526static wxToolBarIdMapping sm_ToolBarIdMappingArray[] =
527{
528 { wxID_COPY, STD_COPY },
529 { wxID_CUT, STD_CUT },
530 { wxID_FIND, STD_FIND },
531 { wxID_PASTE, STD_PASTE },
532 { wxID_NEW, STD_FILENEW },
533 { wxID_OPEN, STD_FILEOPEN },
534 { wxID_SAVE, STD_FILESAVE },
535 { wxID_PRINT, STD_PRINT },
536 { wxID_PREVIEW, STD_PRINTPRE },
537 { wxID_UNDO, STD_UNDO },
538 { wxID_REDO, STD_REDOW },
539 { wxID_HELP, STD_HELP },
540 { wxID_DELETE, STD_DELETE },
541 { wxID_REPLACE, STD_REPLACE },
542 { wxID_PROPERTIES, STD_PROPERTIES },
543 { wxID_VIEW_DETAILS, VIEW_DETAILS },
544 { wxID_VIEW_SORTDATE, VIEW_SORTDATE },
545 { wxID_VIEW_LARGEICONS, VIEW_LARGEICONS },
546 { wxID_VIEW_SORTNAME, VIEW_SORTNAME },
547 { wxID_VIEW_LIST, VIEW_LIST },
548 { wxID_VIEW_SORTSIZE, VIEW_SORTSIZE },
549 { wxID_VIEW_SMALLICONS, VIEW_SMALLICONS },
550 { wxID_VIEW_SORTTYPE, VIEW_SORTTYPE },
551 { 0, 0},
552};
553
bf95a04f
JS
554static int wxFindIdForwxWinId(int id)
555{
556 int i = 0;
39fc096d 557 while (true)
bf95a04f
JS
558 {
559 if (sm_ToolBarIdMappingArray[i].m_wxwinId == 0)
560 return -1;
561 else if (sm_ToolBarIdMappingArray[i].m_wxwinId == id)
562 return sm_ToolBarIdMappingArray[i].m_winceId;
563 i ++;
564 }
565 return -1;
566}
567
568
39d2f9a7
JS
569bool wxToolBar::Realize()
570{
571 const size_t nTools = GetToolsCount();
572 if ( nTools == 0 )
573 {
574 // nothing to do
39fc096d 575 return true;
39d2f9a7
JS
576 }
577
39d2f9a7
JS
578#if 0
579 // delete all old buttons, if any
580 for ( size_t pos = 0; pos < m_nButtons; pos++ )
581 {
582 if ( !::SendMessage(GetHwnd(), TB_DELETEBUTTON, 0, 0) )
583 {
584 wxLogDebug(wxT("TB_DELETEBUTTON failed"));
585 }
586 }
7010702f 587#endif // 0
39d2f9a7
JS
588
589 // add the buttons and separators
590 // ------------------------------
591
bf95a04f
JS
592 // Use standard buttons
593 CommandBar_AddBitmap((HWND) GetHWND(), HINST_COMMCTRL,
594 IDB_STD_SMALL_COLOR, 0, 16, 16);
595
39d2f9a7
JS
596 TBBUTTON *buttons = new TBBUTTON[nTools];
597
598 // this array will hold the indices of all controls in the toolbar
599 wxArrayInt controlIds;
600
16640ba2 601 bool lastWasRadio = false;
39d2f9a7
JS
602 int i = 0;
603 wxToolBarToolsList::Node* node;
604 for ( node = m_tools.GetFirst(); node; node = node->GetNext() )
605 {
606 wxToolBarToolBase *tool = node->GetData();
607
39fc096d 608 bool processedThis = true;
bf95a04f 609
39d2f9a7
JS
610 TBBUTTON& button = buttons[i];
611
612 wxZeroMemory(button);
613
16640ba2 614 bool isRadio = false;
39d2f9a7
JS
615 switch ( tool->GetStyle() )
616 {
617 case wxTOOL_STYLE_CONTROL:
618 button.idCommand = tool->GetId();
619 // fall through: create just a separator too
620
621 case wxTOOL_STYLE_SEPARATOR:
622 button.fsState = TBSTATE_ENABLED;
623 button.fsStyle = TBSTYLE_SEP;
624 break;
625
626 case wxTOOL_STYLE_BUTTON:
bf95a04f
JS
627// if ( !HasFlag(wxTB_NOICONS) )
628// button.iBitmap = bitmapId;
39d2f9a7
JS
629
630 if ( HasFlag(wxTB_TEXT) )
631 {
632 const wxString& label = tool->GetLabel();
633 if ( !label.empty() )
634 {
635 button.iString = (int)label.c_str();
636 }
637 }
638
bf95a04f
JS
639 int winceId = wxFindIdForwxWinId(tool->GetId());
640 if (winceId > -1)
641 {
642 button.idCommand = tool->GetId();
643// if ( !HasFlag(wxTB_NOICONS) )
644 button.iBitmap = winceId;
645 }
646 else
16640ba2 647 processedThis = false;
39d2f9a7
JS
648
649 if ( tool->IsEnabled() )
650 button.fsState |= TBSTATE_ENABLED;
651 if ( tool->IsToggled() )
652 button.fsState |= TBSTATE_CHECKED;
653
654 switch ( tool->GetKind() )
655 {
656 case wxITEM_RADIO:
657 button.fsStyle = TBSTYLE_CHECKGROUP;
658
659 if ( !lastWasRadio )
660 {
661 // the first item in the radio group is checked by
662 // default to be consistent with wxGTK and the menu
663 // radio items
664 button.fsState |= TBSTATE_CHECKED;
665
39fc096d 666 tool->Toggle(true);
39d2f9a7
JS
667 }
668
39fc096d 669 isRadio = true;
39d2f9a7
JS
670 break;
671
672 case wxITEM_CHECK:
673 button.fsStyle = TBSTYLE_CHECK;
674 break;
675
676 default:
677 wxFAIL_MSG( _T("unexpected toolbar button kind") );
678 // fall through
679
680 case wxITEM_NORMAL:
681 button.fsStyle = TBSTYLE_BUTTON;
682 }
683
bf95a04f 684// bitmapId++;
39d2f9a7
JS
685 break;
686 }
687
688 lastWasRadio = isRadio;
689
bf95a04f
JS
690 if (processedThis)
691 i++;
39d2f9a7
JS
692 }
693
bf95a04f 694 // Add buttons to Commandbar
39d2f9a7
JS
695 if (!CommandBar_AddButtons(GetHwnd(), i, buttons))
696 {
697 wxLogLastError(wxT("CommandBar_AddButtons"));
698 }
699
700 delete [] buttons;
701
702#if 0
7010702f
WS
703
704 const bool isVertical = HasFlag(wxTB_VERTICAL);
705
39d2f9a7
JS
706 // Deal with the controls finally
707 // ------------------------------
708
709 // adjust the controls size to fit nicely in the toolbar
710 int y = 0;
711 size_t index = 0;
712 for ( node = m_tools.GetFirst(); node; node = node->GetNext(), index++ )
713 {
714 wxToolBarToolBase *tool = node->GetData();
715
716 // we calculate the running y coord for vertical toolbars so we need to
717 // get the items size for all items but for the horizontal ones we
718 // don't need to deal with the non controls
719 bool isControl = tool->IsControl();
720 if ( !isControl && !isVertical )
721 continue;
722
723 // note that we use TB_GETITEMRECT and not TB_GETRECT because the
724 // latter only appeared in v4.70 of comctl32.dll
725 RECT r;
39fc096d
WS
726 if ( !::SendMessage(GetHwnd(), TB_GETITEMRECT,
727 index, (LPARAM)(LPRECT)&r) )
39d2f9a7
JS
728 {
729 wxLogLastError(wxT("TB_GETITEMRECT"));
730 }
731
732 if ( !isControl )
733 {
734 // can only be control if isVertical
735 y += r.bottom - r.top;
736
737 continue;
738 }
739
740 wxControl *control = tool->GetControl();
741
742 wxSize size = control->GetSize();
743
744 // the position of the leftmost controls corner
745 int left = -1;
746
747 // TB_SETBUTTONINFO message is only supported by comctl32.dll 4.71+
748#if defined(_WIN32_IE) && (_WIN32_IE >= 0x400 )
749 // available in headers, now check whether it is available now
750 // (during run-time)
751 if ( wxTheApp->GetComCtl32Version() >= 471 )
752 {
753 // set the (underlying) separators width to be that of the
754 // control
755 TBBUTTONINFO tbbi;
756 tbbi.cbSize = sizeof(tbbi);
757 tbbi.dwMask = TBIF_SIZE;
758 tbbi.cx = size.x;
39fc096d
WS
759 if ( !::SendMessage(GetHwnd(), TB_SETBUTTONINFO,
760 tool->GetId(), (LPARAM)&tbbi) )
39d2f9a7
JS
761 {
762 // the id is probably invalid?
763 wxLogLastError(wxT("TB_SETBUTTONINFO"));
764 }
765 }
766 else
767#endif // comctl32.dll 4.71
768 // TB_SETBUTTONINFO unavailable
769 {
770 // try adding several separators to fit the controls width
771 int widthSep = r.right - r.left;
772 left = r.left;
773
774 TBBUTTON tbb;
775 wxZeroMemory(tbb);
776 tbb.idCommand = 0;
777 tbb.fsState = TBSTATE_ENABLED;
778 tbb.fsStyle = TBSTYLE_SEP;
779
780 size_t nSeparators = size.x / widthSep;
781 for ( size_t nSep = 0; nSep < nSeparators; nSep++ )
782 {
39fc096d
WS
783 if ( !::SendMessage(GetHwnd(), TB_INSERTBUTTON,
784 index, (LPARAM)&tbb) )
39d2f9a7
JS
785 {
786 wxLogLastError(wxT("TB_INSERTBUTTON"));
787 }
788
789 index++;
790 }
791
792 // remember the number of separators we used - we'd have to
793 // delete all of them later
794 ((wxToolBarTool *)tool)->SetSeparatorsCount(nSeparators);
795
796 // adjust the controls width to exactly cover the separators
39fc096d 797 control->SetSize((nSeparators + 1)*widthSep, wxDefaultCoord);
39d2f9a7
JS
798 }
799
800 // position the control itself correctly vertically
801 int height = r.bottom - r.top;
802 int diff = height - size.y;
803 if ( diff < 0 )
804 {
805 // the control is too high, resize to fit
39fc096d 806 control->SetSize(wxDefaultCoord, height - 2);
39d2f9a7
JS
807
808 diff = 2;
809 }
810
811 int top;
812 if ( isVertical )
813 {
814 left = 0;
815 top = y;
816
817 y += height + 2*GetMargins().y;
818 }
819 else // horizontal toolbar
820 {
821 if ( left == -1 )
822 left = r.left;
823
824 top = r.top;
825 }
826
827 control->Move(left, top + (diff + 1) / 2);
828 }
829
830 // the max index is the "real" number of buttons - i.e. counting even the
831 // separators which we added just for aligning the controls
832 m_nButtons = index;
833
834 if ( !isVertical )
835 {
836 if ( m_maxRows == 0 )
837 {
838 // if not set yet, only one row
839 SetRows(1);
840 }
841 }
842 else if ( m_nButtons > 0 ) // vertical non empty toolbar
843 {
844 if ( m_maxRows == 0 )
845 {
846 // if not set yet, have one column
847 SetRows(m_nButtons);
848 }
849 }
7010702f 850#endif // 0
39d2f9a7 851
7010702f 852 return true;
39d2f9a7
JS
853}
854
855// ----------------------------------------------------------------------------
856// message handlers
857// ----------------------------------------------------------------------------
858
859bool wxToolBar::MSWCommand(WXUINT WXUNUSED(cmd), WXWORD id)
860{
861 wxToolBarToolBase *tool = FindById((int)id);
862 if ( !tool )
863 {
864 wxCommandEvent event(wxEVT_COMMAND_MENU_SELECTED);
865 event.SetEventObject(this);
866 event.SetId(id);
867 event.SetInt(id);
868
869 return GetEventHandler()->ProcessEvent(event);
870 }
871
872 if ( tool->CanBeToggled() )
873 {
874 LRESULT state = ::SendMessage(GetHwnd(), TB_GETSTATE, id, 0);
875 tool->Toggle((state & TBSTATE_CHECKED) != 0);
876 }
877
878 bool toggled = tool->IsToggled();
879
880 // avoid sending the event when a radio button is released, this is not
881 // interesting
882 if ( !tool->CanBeToggled() || tool->GetKind() != wxITEM_RADIO || toggled )
883 {
884 // OnLeftClick() can veto the button state change - for buttons which
885 // may be toggled only, of couse
886 if ( !OnLeftClick((int)id, toggled) && tool->CanBeToggled() )
887 {
888 // revert back
889 toggled = !toggled;
890 tool->SetToggle(toggled);
891
892 ::SendMessage(GetHwnd(), TB_CHECKBUTTON, id, MAKELONG(toggled, 0));
893 }
894 }
895
39fc096d 896 return true;
39d2f9a7
JS
897}
898
899bool wxToolBar::MSWOnNotify(int WXUNUSED(idCtrl),
900 WXLPARAM lParam,
901 WXLPARAM *WXUNUSED(result))
902{
903#if wxUSE_TOOLTIPS
904 // First check if this applies to us
905 NMHDR *hdr = (NMHDR *)lParam;
906
907 // the tooltips control created by the toolbar is sometimes Unicode, even
908 // in an ANSI application - this seems to be a bug in comctl32.dll v5
909 UINT code = hdr->code;
910 if ( (code != (UINT) TTN_NEEDTEXTA) && (code != (UINT) TTN_NEEDTEXTW) )
39fc096d 911 return false;
39d2f9a7
JS
912
913 HWND toolTipWnd = (HWND)::SendMessage((HWND)GetHWND(), TB_GETTOOLTIPS, 0, 0);
914 if ( toolTipWnd != hdr->hwndFrom )
39fc096d 915 return false;
39d2f9a7
JS
916
917 LPTOOLTIPTEXT ttText = (LPTOOLTIPTEXT)lParam;
918 int id = (int)ttText->hdr.idFrom;
919
920 wxToolBarToolBase *tool = FindById(id);
921 if ( !tool )
991420e6 922 return false;
39d2f9a7
JS
923
924 return HandleTooltipNotify(code, lParam, tool->GetShortHelp());
925#else
991420e6
WS
926 wxUnusedVar(lParam);
927 return false;
39d2f9a7
JS
928#endif
929}
930
931// ----------------------------------------------------------------------------
932// toolbar geometry
933// ----------------------------------------------------------------------------
934
935void wxToolBar::SetToolBitmapSize(const wxSize& size)
936{
937 wxToolBarBase::SetToolBitmapSize(size);
938
939 ::SendMessage(GetHwnd(), TB_SETBITMAPSIZE, 0, MAKELONG(size.x, size.y));
940}
941
942void wxToolBar::SetRows(int nRows)
943{
944 if ( nRows == m_maxRows )
945 {
946 // avoid resizing the frame uselessly
947 return;
948 }
949
950 // TRUE in wParam means to create at least as many rows, FALSE -
951 // at most as many
952 RECT rect;
953 ::SendMessage(GetHwnd(), TB_SETROWS,
954 MAKEWPARAM(nRows, !(GetWindowStyle() & wxTB_VERTICAL)),
955 (LPARAM) &rect);
956
957 m_maxRows = nRows;
958
959 UpdateSize();
960}
961
962// The button size is bigger than the bitmap size
963wxSize wxToolBar::GetToolSize() const
964{
965 // TB_GETBUTTONSIZE is supported from version 4.70
966#if defined(_WIN32_IE) && (_WIN32_IE >= 0x300 ) \
967 && !( defined(__GNUWIN32__) && !wxCHECK_W32API_VERSION( 1, 0 ) )
968 if ( wxTheApp->GetComCtl32Version() >= 470 )
969 {
970 DWORD dw = ::SendMessage(GetHwnd(), TB_GETBUTTONSIZE, 0, 0);
971
972 return wxSize(LOWORD(dw), HIWORD(dw));
973 }
974 else
975#endif // comctl32.dll 4.70+
976 {
977 // defaults
978 return wxSize(m_defaultWidth + 8, m_defaultHeight + 7);
979 }
980}
981
982static
983wxToolBarToolBase *GetItemSkippingDummySpacers(const wxToolBarToolsList& tools,
984 size_t index )
985{
986 wxToolBarToolsList::compatibility_iterator current = tools.GetFirst();
987
988 for ( ; current != 0; current = current->GetNext() )
989 {
990 if ( index == 0 )
991 return current->GetData();
992
993 wxToolBarTool *tool = (wxToolBarTool *)current->GetData();
994 size_t separators = tool->GetSeparatorsCount();
995
996 // if it is a normal button, sepcount == 0, so skip 1 item (the button)
997 // otherwise, skip as many items as the separator count, plus the
998 // control itself
999 index -= separators ? separators + 1 : 1;
1000 }
1001
1002 return 0;
1003}
1004
1005wxToolBarToolBase *wxToolBar::FindToolForPosition(wxCoord x, wxCoord y) const
1006{
1007 POINT pt;
1008 pt.x = x;
1009 pt.y = y;
1010 int index = (int)::SendMessage(GetHwnd(), TB_HITTEST, 0, (LPARAM)&pt);
1011 // MBN: when the point ( x, y ) is close to the toolbar border
1012 // TB_HITTEST returns m_nButtons ( not -1 )
1013 if ( index < 0 || (size_t)index >= m_nButtons )
1014 {
1015 // it's a separator or there is no tool at all there
1016 return (wxToolBarToolBase *)NULL;
1017 }
1018
1019 // if comctl32 version < 4.71 wxToolBar95 adds dummy spacers
1020#if defined(_WIN32_IE) && (_WIN32_IE >= 0x400 )
1021 if ( wxTheApp->GetComCtl32Version() >= 471 )
1022 {
1023 return m_tools.Item((size_t)index)->GetData();
1024 }
1025 else
1026#endif
1027 {
1028 return GetItemSkippingDummySpacers( m_tools, (size_t) index );
1029 }
1030}
1031
1032void wxToolBar::UpdateSize()
1033{
1034 // the toolbar size changed
39fc096d 1035 ::SendMessage(GetHwnd(), TB_AUTOSIZE, 0, 0);
39d2f9a7
JS
1036
1037 // we must also refresh the frame after the toolbar size (possibly) changed
1038 wxFrame *frame = wxDynamicCast(GetParent(), wxFrame);
1039 if ( frame )
1040 {
1041 frame->SendSizeEvent();
1042 }
1043}
1044
1045// ----------------------------------------------------------------------------
1046// toolbar styles
1047// ---------------------------------------------------------------------------
1048
1049void wxToolBar::SetWindowStyleFlag(long style)
1050{
1051 // the style bits whose changes force us to recreate the toolbar
1052 static const long MASK_NEEDS_RECREATE = wxTB_TEXT | wxTB_NOICONS;
1053
1054 const long styleOld = GetWindowStyle();
1055
1056 wxToolBarBase::SetWindowStyleFlag(style);
1057
1058 // don't recreate an empty toolbar: not only this is unnecessary, but it is
1059 // also fatal as we'd then try to recreate the toolbar when it's just being
1060 // created
1061 if ( GetToolsCount() &&
1062 (style & MASK_NEEDS_RECREATE) != (styleOld & MASK_NEEDS_RECREATE) )
1063 {
1064 // to remove the text labels, simply re-realizing the toolbar is enough
1065 // but I don't know of any way to add the text to an existing toolbar
1066 // other than by recreating it entirely
1067 Recreate();
1068 }
1069}
1070
1071// ----------------------------------------------------------------------------
1072// tool state
1073// ----------------------------------------------------------------------------
1074
1075void wxToolBar::DoEnableTool(wxToolBarToolBase *tool, bool enable)
1076{
1077 ::SendMessage(GetHwnd(), TB_ENABLEBUTTON,
1078 (WPARAM)tool->GetId(), (LPARAM)MAKELONG(enable, 0));
1079}
1080
1081void wxToolBar::DoToggleTool(wxToolBarToolBase *tool, bool toggle)
1082{
1083 ::SendMessage(GetHwnd(), TB_CHECKBUTTON,
1084 (WPARAM)tool->GetId(), (LPARAM)MAKELONG(toggle, 0));
1085}
1086
1087void wxToolBar::DoSetToggle(wxToolBarToolBase *WXUNUSED(tool), bool WXUNUSED(toggle))
1088{
1089 // VZ: AFAIK, the button has to be created either with TBSTYLE_CHECK or
1090 // without, so we really need to delete the button and recreate it here
1091 wxFAIL_MSG( _T("not implemented") );
1092}
1093
1094// ----------------------------------------------------------------------------
1095// event handlers
1096// ----------------------------------------------------------------------------
1097
1098// Responds to colour changes, and passes event on to children.
1099void wxToolBar::OnSysColourChanged(wxSysColourChangedEvent& event)
1100{
1101 wxRGBToColour(m_backgroundColour, ::GetSysColor(COLOR_BTNFACE));
1102
1103 // Remap the buttons
1104 Realize();
1105
1106 // Relayout the toolbar
1107 int nrows = m_maxRows;
1108 m_maxRows = 0; // otherwise SetRows() wouldn't do anything
1109 SetRows(nrows);
1110
1111 Refresh();
1112
1113 // let the event propagate further
1114 event.Skip();
1115}
1116
1117void wxToolBar::OnMouseEvent(wxMouseEvent& event)
1118{
1119 if (event.Leaving() && m_pInTool)
1120 {
1121 OnMouseEnter( -1 );
1122 event.Skip();
1123 return;
1124 }
1125
1126 if (event.RightDown())
1127 {
1128 // For now, we don't have an id. Later we could
1129 // try finding the tool.
1130 OnRightClick((int)-1, event.GetX(), event.GetY());
1131 }
1132 else
1133 {
1134 event.Skip();
1135 }
1136}
1137
991420e6 1138void wxToolBar::HandleMouseMove(WXWPARAM WXUNUSED(wParam), WXLPARAM lParam)
39d2f9a7
JS
1139{
1140 wxCoord x = GET_X_LPARAM(lParam),
1141 y = GET_Y_LPARAM(lParam);
1142 wxToolBarToolBase* tool = FindToolForPosition( x, y );
1143
1144 // cursor left current tool
1145 if( tool != m_pInTool && !tool )
1146 {
1147 m_pInTool = 0;
1148 OnMouseEnter( -1 );
1149 }
1150
1151 // cursor entered a tool
1152 if( tool != m_pInTool && tool )
1153 {
1154 m_pInTool = tool;
1155 OnMouseEnter( tool->GetId() );
1156 }
1157}
1158
c140b7e7 1159WXLRESULT wxToolBar::MSWWindowProc(WXUINT nMsg, WXWPARAM wParam, WXLPARAM lParam)
39d2f9a7
JS
1160{
1161#if 0
1162 switch ( nMsg )
1163 {
1164 case WM_SIZE:
1165 if ( HandleSize(wParam, lParam) )
1166 return 0;
1167 break;
1168
1169 case WM_MOUSEMOVE:
1170 // we don't handle mouse moves, so always pass the message to
1171 // wxControl::MSWWindowProc
1172 HandleMouseMove(wParam, lParam);
1173 break;
1174 }
1175#endif
1176 return wxControl::MSWWindowProc(nMsg, wParam, lParam);
1177}
1178
39d2f9a7
JS
1179#endif // wxUSE_TOOLBAR && Win95
1180