]> git.saurik.com Git - wxWidgets.git/blob - src/msw/tbar95.cpp
reSWIGged
[wxWidgets.git] / src / msw / tbar95.cpp
1 /////////////////////////////////////////////////////////////////////////////
2 // Name: msw/tbar95.cpp
3 // Purpose: wxToolBar
4 // Author: Julian Smart
5 // Modified by:
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 #if defined(__GNUG__) && !defined(NO_GCC_PRAGMA)
21 #pragma implementation "tbar95.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
42 #if wxUSE_TOOLBAR && wxUSE_TOOLBAR_NATIVE && !defined(__SMARTPHONE__)
43
44 #include "wx/toolbar.h"
45 #include "wx/sysopt.h"
46 #include "wx/image.h"
47
48 #include "wx/msw/private.h"
49
50 #if wxUSE_UXTHEME
51 #include "wx/msw/uxtheme.h"
52 #endif
53
54 // include <commctrl.h> "properly"
55 #include "wx/msw/wrapcctl.h"
56
57 #include "wx/app.h" // for GetComCtl32Version
58
59 // ----------------------------------------------------------------------------
60 // constants
61 // ----------------------------------------------------------------------------
62
63 // these standard constants are not always defined in compilers headers
64
65 // Styles
66 #ifndef TBSTYLE_FLAT
67 #define TBSTYLE_LIST 0x1000
68 #define TBSTYLE_FLAT 0x0800
69 #endif
70
71 #ifndef TBSTYLE_TRANSPARENT
72 #define TBSTYLE_TRANSPARENT 0x8000
73 #endif
74
75 #ifndef TBSTYLE_TOOLTIPS
76 #define TBSTYLE_TOOLTIPS 0x0100
77 #endif
78
79 // Messages
80 #ifndef TB_GETSTYLE
81 #define TB_SETSTYLE (WM_USER + 56)
82 #define TB_GETSTYLE (WM_USER + 57)
83 #endif
84
85 #ifndef TB_HITTEST
86 #define TB_HITTEST (WM_USER + 69)
87 #endif
88
89 #ifndef TB_GETMAXSIZE
90 #define TB_GETMAXSIZE (WM_USER + 83)
91 #endif
92
93 // these values correspond to those used by comctl32.dll
94 #define DEFAULTBITMAPX 16
95 #define DEFAULTBITMAPY 15
96 #define DEFAULTBUTTONX 24
97 #define DEFAULTBUTTONY 24
98 #define DEFAULTBARHEIGHT 27
99
100 // ----------------------------------------------------------------------------
101 // wxWin macros
102 // ----------------------------------------------------------------------------
103
104 IMPLEMENT_DYNAMIC_CLASS(wxToolBar, wxControl)
105
106 /*
107 TOOLBAR PROPERTIES
108 tool
109 bitmap
110 bitmap2
111 tooltip
112 longhelp
113 radio (bool)
114 toggle (bool)
115 separator
116 style ( wxNO_BORDER | wxTB_HORIZONTAL)
117 bitmapsize
118 margins
119 packing
120 separation
121
122 dontattachtoframe
123 */
124
125 BEGIN_EVENT_TABLE(wxToolBar, wxToolBarBase)
126 EVT_MOUSE_EVENTS(wxToolBar::OnMouseEvent)
127 EVT_SYS_COLOUR_CHANGED(wxToolBar::OnSysColourChanged)
128 EVT_ERASE_BACKGROUND(wxToolBar::OnEraseBackground)
129 END_EVENT_TABLE()
130
131 // ----------------------------------------------------------------------------
132 // private classes
133 // ----------------------------------------------------------------------------
134
135 class wxToolBarTool : public wxToolBarToolBase
136 {
137 public:
138 wxToolBarTool(wxToolBar *tbar,
139 int id,
140 const wxString& label,
141 const wxBitmap& bmpNormal,
142 const wxBitmap& bmpDisabled,
143 wxItemKind kind,
144 wxObject *clientData,
145 const wxString& shortHelp,
146 const wxString& longHelp)
147 : wxToolBarToolBase(tbar, id, label, bmpNormal, bmpDisabled, kind,
148 clientData, shortHelp, longHelp)
149 {
150 m_nSepCount = 0;
151 }
152
153 wxToolBarTool(wxToolBar *tbar, wxControl *control)
154 : wxToolBarToolBase(tbar, control)
155 {
156 m_nSepCount = 1;
157 }
158
159 virtual void SetLabel(const wxString& label)
160 {
161 if ( label == m_label )
162 return;
163
164 wxToolBarToolBase::SetLabel(label);
165
166 // we need to update the label shown in the toolbar because it has a
167 // pointer to the internal buffer of the old label
168 //
169 // TODO: use TB_SETBUTTONINFO
170 }
171
172 // set/get the number of separators which we use to cover the space used by
173 // a control in the toolbar
174 void SetSeparatorsCount(size_t count) { m_nSepCount = count; }
175 size_t GetSeparatorsCount() const { return m_nSepCount; }
176
177 private:
178 size_t m_nSepCount;
179
180 DECLARE_NO_COPY_CLASS(wxToolBarTool)
181 };
182
183
184 // ============================================================================
185 // implementation
186 // ============================================================================
187
188 // ----------------------------------------------------------------------------
189 // wxToolBarTool
190 // ----------------------------------------------------------------------------
191
192 wxToolBarToolBase *wxToolBar::CreateTool(int id,
193 const wxString& label,
194 const wxBitmap& bmpNormal,
195 const wxBitmap& bmpDisabled,
196 wxItemKind kind,
197 wxObject *clientData,
198 const wxString& shortHelp,
199 const wxString& longHelp)
200 {
201 return new wxToolBarTool(this, id, label, bmpNormal, bmpDisabled, kind,
202 clientData, shortHelp, longHelp);
203 }
204
205 wxToolBarToolBase *wxToolBar::CreateTool(wxControl *control)
206 {
207 return new wxToolBarTool(this, control);
208 }
209
210 // ----------------------------------------------------------------------------
211 // wxToolBar construction
212 // ----------------------------------------------------------------------------
213
214 void wxToolBar::Init()
215 {
216 m_hBitmap = 0;
217 m_disabledImgList = NULL;
218
219 m_nButtons = 0;
220
221 m_defaultWidth = DEFAULTBITMAPX;
222 m_defaultHeight = DEFAULTBITMAPY;
223
224 m_pInTool = 0;
225 }
226
227 bool wxToolBar::Create(wxWindow *parent,
228 wxWindowID id,
229 const wxPoint& pos,
230 const wxSize& size,
231 long style,
232 const wxString& name)
233 {
234 // common initialisation
235 if ( !CreateControl(parent, id, pos, size, style, wxDefaultValidator, name) )
236 return false;
237
238 // MSW-specific initialisation
239 if ( !MSWCreateToolbar(pos, size) )
240 return false;
241
242 wxSetCCUnicodeFormat(GetHwnd());
243
244 // set up the colors and fonts
245 SetBackgroundColour(wxSystemSettings::GetColour(wxSYS_COLOUR_BTNFACE));
246 SetFont(wxSystemSettings::GetFont(wxSYS_DEFAULT_GUI_FONT));
247
248 // workaround for flat toolbar on Windows XP classic style
249 #if wxUSE_UXTHEME
250 if ( style & wxTB_FLAT )
251 {
252 // Testing for an active theme appears to be unnecessary (see comments in patch 1204217).
253 // Disabling the test brings back separator lines.
254 // However, the separators can look ugly and distracting, especially between controls,
255 // so I'm restoring the test and removing the separators again - JACS
256 #if 1
257 wxUxThemeEngine *p = wxUxThemeEngine::Get();
258 if ( !p || !p->IsThemeActive() )
259 #endif
260 {
261 DWORD dwToolbarStyle;
262
263 dwToolbarStyle = (DWORD)::SendMessage(GetHwnd(), TB_GETSTYLE, 0, 0L );
264
265 if ((dwToolbarStyle & TBSTYLE_FLAT) == 0)
266 {
267 dwToolbarStyle |= TBSTYLE_FLAT;
268 ::SendMessage(GetHwnd(), TB_SETSTYLE, 0, (LPARAM)dwToolbarStyle );
269 }
270 }
271 }
272 #endif
273
274 return true;
275 }
276
277 bool wxToolBar::MSWCreateToolbar(const wxPoint& pos, const wxSize& size)
278 {
279 if ( !MSWCreateControl(TOOLBARCLASSNAME, wxEmptyString, pos, size) )
280 return false;
281
282 // toolbar-specific post initialisation
283 ::SendMessage(GetHwnd(), TB_BUTTONSTRUCTSIZE, sizeof(TBBUTTON), 0);
284
285 return true;
286 }
287
288 void wxToolBar::Recreate()
289 {
290 const HWND hwndOld = GetHwnd();
291 if ( !hwndOld )
292 {
293 // we haven't been created yet, no need to recreate
294 return;
295 }
296
297 // get the position and size before unsubclassing the old toolbar
298 const wxPoint pos = GetPosition();
299 const wxSize size = GetSize();
300
301 UnsubclassWin();
302
303 if ( !MSWCreateToolbar(pos, size) )
304 {
305 // what can we do?
306 wxFAIL_MSG( _T("recreating the toolbar failed") );
307
308 return;
309 }
310
311 // reparent all our children under the new toolbar
312 for ( wxWindowList::compatibility_iterator node = m_children.GetFirst();
313 node;
314 node = node->GetNext() )
315 {
316 wxWindow *win = node->GetData();
317 if ( !win->IsTopLevel() )
318 ::SetParent(GetHwndOf(win), GetHwnd());
319 }
320
321 // only destroy the old toolbar now -- after all the children had been
322 // reparented
323 ::DestroyWindow(hwndOld);
324
325 // it is for the old bitmap control and can't be used with the new one
326 if ( m_hBitmap )
327 {
328 ::DeleteObject((HBITMAP) m_hBitmap);
329 m_hBitmap = 0;
330 }
331
332 if ( m_disabledImgList )
333 {
334 delete m_disabledImgList;
335 m_disabledImgList = NULL;
336 }
337
338 Realize();
339 UpdateSize();
340 }
341
342 wxToolBar::~wxToolBar()
343 {
344 // we must refresh the frame size when the toolbar is deleted but the frame
345 // is not - otherwise toolbar leaves a hole in the place it used to occupy
346 wxFrame *frame = wxDynamicCast(GetParent(), wxFrame);
347 if ( frame && !frame->IsBeingDeleted() )
348 {
349 frame->SendSizeEvent();
350 }
351
352 if ( m_hBitmap )
353 {
354 ::DeleteObject((HBITMAP) m_hBitmap);
355 }
356
357 delete m_disabledImgList;
358 }
359
360 wxSize wxToolBar::DoGetBestSize() const
361 {
362 wxSize sizeBest;
363
364 SIZE size;
365 if ( !::SendMessage(GetHwnd(), TB_GETMAXSIZE, 0, (LPARAM)&size) )
366 {
367 // maybe an old (< 0x400) Windows version? try to approximate the
368 // toolbar size ourselves
369 sizeBest = GetToolSize();
370 sizeBest.y += 2 * ::GetSystemMetrics(SM_CYBORDER); // Add borders
371 sizeBest.x *= GetToolsCount();
372
373 // reverse horz and vertical components if necessary
374 if ( HasFlag(wxTB_VERTICAL) )
375 {
376 int t = sizeBest.x;
377 sizeBest.x = sizeBest.y;
378 sizeBest.y = t;
379 }
380 }
381 else
382 {
383 sizeBest.x = size.cx;
384 sizeBest.y = size.cy;
385 }
386
387 CacheBestSize(sizeBest);
388 return sizeBest;
389 }
390
391 WXDWORD wxToolBar::MSWGetStyle(long style, WXDWORD *exstyle) const
392 {
393 // toolbars never have border, giving one to them results in broken
394 // appearance
395 WXDWORD msStyle = wxControl::MSWGetStyle
396 (
397 (style & ~wxBORDER_MASK) | wxBORDER_NONE, exstyle
398 );
399
400 // always include this one, it never hurts and setting it later only if we
401 // do have tooltips wouldn't work
402 msStyle |= TBSTYLE_TOOLTIPS;
403
404 if ( style & (wxTB_FLAT | wxTB_HORZ_LAYOUT) )
405 {
406 // static as it doesn't change during the program lifetime
407 static int s_verComCtl = wxApp::GetComCtl32Version();
408
409 // comctl32.dll 4.00 doesn't support the flat toolbars and using this
410 // style with 6.00 (part of Windows XP) leads to the toolbar with
411 // incorrect background colour - and not using it still results in the
412 // correct (flat) toolbar, so don't use it there
413 if ( s_verComCtl > 400 && s_verComCtl < 600 )
414 {
415 msStyle |= TBSTYLE_FLAT | TBSTYLE_TRANSPARENT;
416 }
417
418 if ( s_verComCtl >= 470 && style & wxTB_HORZ_LAYOUT )
419 {
420 msStyle |= TBSTYLE_LIST;
421 }
422 }
423
424 if ( style & wxTB_NODIVIDER )
425 msStyle |= CCS_NODIVIDER;
426
427 if ( style & wxTB_NOALIGN )
428 msStyle |= CCS_NOPARENTALIGN;
429
430 if ( style & wxTB_VERTICAL )
431 msStyle |= CCS_VERT;
432
433 return msStyle;
434 }
435
436 // ----------------------------------------------------------------------------
437 // adding/removing tools
438 // ----------------------------------------------------------------------------
439
440 bool wxToolBar::DoInsertTool(size_t WXUNUSED(pos), wxToolBarToolBase *tool)
441 {
442 // nothing special to do here - we really create the toolbar buttons in
443 // Realize() later
444 tool->Attach(this);
445
446 InvalidateBestSize();
447 return true;
448 }
449
450 bool wxToolBar::DoDeleteTool(size_t pos, wxToolBarToolBase *tool)
451 {
452 // the main difficulty we have here is with the controls in the toolbars:
453 // as we (sometimes) use several separators to cover up the space used by
454 // them, the indices are not the same for us and the toolbar
455
456 // first determine the position of the first button to delete: it may be
457 // different from pos if we use several separators to cover the space used
458 // by a control
459 wxToolBarToolsList::compatibility_iterator node;
460 for ( node = m_tools.GetFirst(); node; node = node->GetNext() )
461 {
462 wxToolBarToolBase *tool2 = node->GetData();
463 if ( tool2 == tool )
464 {
465 // let node point to the next node in the list
466 node = node->GetNext();
467
468 break;
469 }
470
471 if ( tool2->IsControl() )
472 {
473 pos += ((wxToolBarTool *)tool2)->GetSeparatorsCount() - 1;
474 }
475 }
476
477 // now determine the number of buttons to delete and the area taken by them
478 size_t nButtonsToDelete = 1;
479
480 // get the size of the button we're going to delete
481 RECT r;
482 if ( !::SendMessage(GetHwnd(), TB_GETITEMRECT, pos, (LPARAM)&r) )
483 {
484 wxLogLastError(_T("TB_GETITEMRECT"));
485 }
486
487 int width = r.right - r.left;
488
489 if ( tool->IsControl() )
490 {
491 nButtonsToDelete = ((wxToolBarTool *)tool)->GetSeparatorsCount();
492
493 width *= nButtonsToDelete;
494 }
495
496 // do delete all buttons
497 m_nButtons -= nButtonsToDelete;
498 while ( nButtonsToDelete-- > 0 )
499 {
500 if ( !::SendMessage(GetHwnd(), TB_DELETEBUTTON, pos, 0) )
501 {
502 wxLogLastError(wxT("TB_DELETEBUTTON"));
503
504 return false;
505 }
506 }
507
508 tool->Detach();
509
510 // and finally reposition all the controls after this button (the toolbar
511 // takes care of all normal items)
512 for ( /* node -> first after deleted */ ; node; node = node->GetNext() )
513 {
514 wxToolBarToolBase *tool2 = node->GetData();
515 if ( tool2->IsControl() )
516 {
517 int x;
518 wxControl *control = tool2->GetControl();
519 control->GetPosition(&x, NULL);
520 control->Move(x - width, wxDefaultCoord);
521 }
522 }
523
524 InvalidateBestSize();
525 return true;
526 }
527
528 void wxToolBar::CreateDisabledImageList()
529 {
530 // as we can't use disabled image list with older versions of comctl32.dll,
531 // don't even bother creating it
532 if ( wxTheApp->GetComCtl32Version() >= 470 )
533 {
534 // search for the first disabled button img in the toolbar, if any
535 for ( wxToolBarToolsList::compatibility_iterator
536 node = m_tools.GetFirst(); node; node = node->GetNext() )
537 {
538 wxToolBarToolBase *tool = node->GetData();
539 wxBitmap bmpDisabled = tool->GetDisabledBitmap();
540 if ( bmpDisabled.Ok() )
541 {
542 m_disabledImgList = new wxImageList
543 (
544 m_defaultWidth,
545 m_defaultHeight,
546 bmpDisabled.GetMask() != NULL,
547 GetToolsCount()
548 );
549 return;
550 }
551 }
552
553 // we don't have any disabled bitmaps
554 }
555
556 m_disabledImgList = NULL;
557 }
558
559 bool wxToolBar::Realize()
560 {
561 const size_t nTools = GetToolsCount();
562 if ( nTools == 0 )
563 {
564 // nothing to do
565 return true;
566 }
567
568 const bool isVertical = HasFlag(wxTB_VERTICAL);
569
570 bool doRemap, doRemapBg, doTransparent;
571 #ifdef __WXWINCE__
572 doRemapBg = false;
573 doRemap = false;
574 doTransparent = false;
575 #else
576 if (wxSystemOptions::GetOptionInt(wxT("msw.remap")) == 2)
577 {
578 doRemapBg = doRemap = false;
579 doTransparent = true;
580 }
581 else
582 { doRemap = !wxSystemOptions::HasOption(wxT("msw.remap"))
583 || wxSystemOptions::GetOptionInt(wxT("msw.remap")) == 1;
584 doRemapBg = !doRemap;
585 doTransparent = false;
586 }
587 #endif
588
589 // delete all old buttons, if any
590 for ( size_t pos = 0; pos < m_nButtons; pos++ )
591 {
592 if ( !::SendMessage(GetHwnd(), TB_DELETEBUTTON, 0, 0) )
593 {
594 wxLogDebug(wxT("TB_DELETEBUTTON failed"));
595 }
596 }
597
598 // First, add the bitmap: we use one bitmap for all toolbar buttons
599 // ----------------------------------------------------------------
600
601 wxToolBarToolsList::compatibility_iterator node;
602 int bitmapId = 0;
603
604 wxSize sizeBmp;
605 if ( HasFlag(wxTB_NOICONS) )
606 {
607 // no icons, don't leave space for them
608 sizeBmp.x =
609 sizeBmp.y = 0;
610 }
611 else // do show icons
612 {
613 // if we already have a bitmap, we'll replace the existing one --
614 // otherwise we'll install a new one
615 HBITMAP oldToolBarBitmap = (HBITMAP)m_hBitmap;
616
617 sizeBmp.x = m_defaultWidth;
618 sizeBmp.y = m_defaultHeight;
619
620 const wxCoord totalBitmapWidth = m_defaultWidth * nTools,
621 totalBitmapHeight = m_defaultHeight;
622
623 // Create a bitmap and copy all the tool bitmaps to it
624 wxMemoryDC dcAllButtons;
625 wxBitmap bitmap(totalBitmapWidth, totalBitmapHeight);
626 dcAllButtons.SelectObject(bitmap);
627 #ifdef __WXWINCE__
628 dcAllButtons.SetBackground(wxBrush(wxColour(192,192,192)));
629 #else
630 if (doTransparent)
631 dcAllButtons.SetBackground(*wxTRANSPARENT_BRUSH);
632 else
633 dcAllButtons.SetBackground(*wxLIGHT_GREY_BRUSH);
634 #endif
635 dcAllButtons.Clear();
636
637 m_hBitmap = bitmap.GetHBITMAP();
638 HBITMAP hBitmap = (HBITMAP)m_hBitmap;
639
640 #ifndef __WXWINCE__
641 if (doRemapBg)
642 {
643 dcAllButtons.SelectObject(wxNullBitmap);
644
645 // Even if we're not remapping the bitmap
646 // content, we still have to remap the background.
647 hBitmap = (HBITMAP)MapBitmap((WXHBITMAP) hBitmap,
648 totalBitmapWidth, totalBitmapHeight);
649
650 dcAllButtons.SelectObject(bitmap);
651
652
653 }
654 #endif // !__WXWINCE__
655
656 // the button position
657 wxCoord x = 0;
658
659 // the number of buttons (not separators)
660 int nButtons = 0;
661
662 CreateDisabledImageList();
663 for ( node = m_tools.GetFirst(); node; node = node->GetNext() )
664 {
665 wxToolBarToolBase *tool = node->GetData();
666 if ( tool->IsButton() )
667 {
668 const wxBitmap& bmp = tool->GetNormalBitmap();
669
670 const int w = bmp.GetWidth();
671 const int h = bmp.GetHeight();
672
673 if ( bmp.Ok() )
674 {
675 int xOffset = wxMax(0, (m_defaultWidth - w)/2);
676 int yOffset = wxMax(0, (m_defaultHeight - h)/2);
677
678 // notice the last parameter: do use mask
679 dcAllButtons.DrawBitmap(bmp, x + xOffset, yOffset, true);
680 }
681 else
682 {
683 wxFAIL_MSG( _T("invalid tool button bitmap") );
684 }
685
686 // also deal with disabled bitmap if we want to use them
687 if ( m_disabledImgList )
688 {
689 wxBitmap bmpDisabled = tool->GetDisabledBitmap();
690 #if wxUSE_IMAGE
691 if ( !bmpDisabled.Ok() )
692 {
693 // no disabled bitmap specified but we still need to
694 // fill the space in the image list with something, so
695 // we grey out the normal bitmap
696 wxImage imgGreyed;
697 wxCreateGreyedImage(bmp.ConvertToImage(), imgGreyed);
698
699 // we need to have light grey background colour for
700 // MapBitmap() to work correctly
701 for ( int y = 0; y < h; y++ )
702 {
703 for ( int x = 0; x < w; x++ )
704 {
705 if ( imgGreyed.IsTransparent(x, y) )
706 imgGreyed.SetRGB(x, y,
707 wxLIGHT_GREY->Red(),
708 wxLIGHT_GREY->Green(),
709 wxLIGHT_GREY->Blue());
710 }
711 }
712
713 bmpDisabled = wxBitmap(imgGreyed);
714 }
715 #endif // wxUSE_IMAGE
716
717 MapBitmap(bmpDisabled.GetHBITMAP(), w, h);
718
719 m_disabledImgList->Add(bmpDisabled);
720 }
721
722 // still inc width and number of buttons because otherwise the
723 // subsequent buttons will all be shifted which is rather confusing
724 // (and like this you'd see immediately which bitmap was bad)
725 x += m_defaultWidth;
726 nButtons++;
727 }
728 }
729
730 dcAllButtons.SelectObject(wxNullBitmap);
731
732 // don't delete this HBITMAP!
733 bitmap.SetHBITMAP(0);
734
735 if (doRemap)
736 {
737 // Map to system colours
738 hBitmap = (HBITMAP)MapBitmap((WXHBITMAP) hBitmap,
739 totalBitmapWidth, totalBitmapHeight);
740
741
742 }
743
744 bool addBitmap = true;
745
746 if ( oldToolBarBitmap )
747 {
748 #ifdef TB_REPLACEBITMAP
749 if ( wxApp::GetComCtl32Version() >= 400 )
750 {
751 TBREPLACEBITMAP replaceBitmap;
752 replaceBitmap.hInstOld = NULL;
753 replaceBitmap.hInstNew = NULL;
754 replaceBitmap.nIDOld = (UINT) oldToolBarBitmap;
755 replaceBitmap.nIDNew = (UINT) hBitmap;
756 replaceBitmap.nButtons = nButtons;
757 if ( !::SendMessage(GetHwnd(), TB_REPLACEBITMAP,
758 0, (LPARAM) &replaceBitmap) )
759 {
760 wxFAIL_MSG(wxT("Could not replace the old bitmap"));
761 }
762
763 ::DeleteObject(oldToolBarBitmap);
764
765 // already done
766 addBitmap = false;
767 }
768 else
769 #endif // TB_REPLACEBITMAP
770 {
771 // we can't replace the old bitmap, so we will add another one
772 // (awfully inefficient, but what else to do?) and shift the bitmap
773 // indices accordingly
774 addBitmap = true;
775
776 bitmapId = m_nButtons;
777 }
778 }
779
780 if ( addBitmap ) // no old bitmap or we can't replace it
781 {
782 TBADDBITMAP addBitmap;
783 addBitmap.hInst = 0;
784 addBitmap.nID = (UINT) hBitmap;
785 if ( ::SendMessage(GetHwnd(), TB_ADDBITMAP,
786 (WPARAM) nButtons, (LPARAM)&addBitmap) == -1 )
787 {
788 wxFAIL_MSG(wxT("Could not add bitmap to toolbar"));
789 }
790 }
791
792 if ( m_disabledImgList )
793 {
794 HIMAGELIST oldImageList = (HIMAGELIST)
795 ::SendMessage(GetHwnd(),
796 TB_SETDISABLEDIMAGELIST,
797 0,
798 (LPARAM)GetHimagelistOf(m_disabledImgList));
799
800 // delete previous image list if any
801 if ( oldImageList )
802 ::DeleteObject( oldImageList );
803 }
804 }
805
806 // don't call SetToolBitmapSize() as we don't want to change the values of
807 // m_defaultWidth/Height
808 if ( !::SendMessage(GetHwnd(), TB_SETBITMAPSIZE, 0,
809 MAKELONG(sizeBmp.x, sizeBmp.y)) )
810 {
811 wxLogLastError(_T("TB_SETBITMAPSIZE"));
812 }
813
814 // Next add the buttons and separators
815 // -----------------------------------
816
817 TBBUTTON *buttons = new TBBUTTON[nTools];
818
819 // this array will hold the indices of all controls in the toolbar
820 wxArrayInt controlIds;
821
822 bool lastWasRadio = false;
823 int i = 0;
824 for ( node = m_tools.GetFirst(); node; node = node->GetNext() )
825 {
826 wxToolBarToolBase *tool = node->GetData();
827
828 // don't add separators to the vertical toolbar with old comctl32.dll
829 // versions as they didn't handle this properly
830 if ( isVertical && tool->IsSeparator() &&
831 wxApp::GetComCtl32Version() <= 472 )
832 {
833 continue;
834 }
835
836
837 TBBUTTON& button = buttons[i];
838
839 wxZeroMemory(button);
840
841 bool isRadio = false;
842 switch ( tool->GetStyle() )
843 {
844 case wxTOOL_STYLE_CONTROL:
845 button.idCommand = tool->GetId();
846 // fall through: create just a separator too
847
848 case wxTOOL_STYLE_SEPARATOR:
849 button.fsState = TBSTATE_ENABLED;
850 button.fsStyle = TBSTYLE_SEP;
851 break;
852
853 case wxTOOL_STYLE_BUTTON:
854 if ( !HasFlag(wxTB_NOICONS) )
855 button.iBitmap = bitmapId;
856
857 if ( HasFlag(wxTB_TEXT) )
858 {
859 const wxString& label = tool->GetLabel();
860 if ( !label.empty() )
861 {
862 button.iString = (int)label.c_str();
863 }
864 }
865
866 button.idCommand = tool->GetId();
867
868 if ( tool->IsEnabled() )
869 button.fsState |= TBSTATE_ENABLED;
870 if ( tool->IsToggled() )
871 button.fsState |= TBSTATE_CHECKED;
872
873 switch ( tool->GetKind() )
874 {
875 case wxITEM_RADIO:
876 button.fsStyle = TBSTYLE_CHECKGROUP;
877
878 if ( !lastWasRadio )
879 {
880 // the first item in the radio group is checked by
881 // default to be consistent with wxGTK and the menu
882 // radio items
883 button.fsState |= TBSTATE_CHECKED;
884
885 if (tool->Toggle(true))
886 {
887 DoToggleTool(tool, true);
888 }
889 }
890 else if (tool->IsToggled())
891 {
892 wxToolBarToolsList::compatibility_iterator nodePrev = node->GetPrevious();
893 int prevIndex = i - 1;
894 while ( nodePrev )
895 {
896 TBBUTTON& prevButton = buttons[prevIndex];
897 wxToolBarToolBase *tool = nodePrev->GetData();
898 if ( !tool->IsButton() || tool->GetKind() != wxITEM_RADIO )
899 break;
900
901 if ( tool->Toggle(false) )
902 {
903 DoToggleTool(tool, false);
904 }
905 prevButton.fsState = TBSTATE_ENABLED;
906 nodePrev = nodePrev->GetPrevious();
907 prevIndex--;
908 }
909 }
910
911 isRadio = true;
912 break;
913
914 case wxITEM_CHECK:
915 button.fsStyle = TBSTYLE_CHECK;
916 break;
917
918 default:
919 wxFAIL_MSG( _T("unexpected toolbar button kind") );
920 // fall through
921
922 case wxITEM_NORMAL:
923 button.fsStyle = TBSTYLE_BUTTON;
924 }
925
926 bitmapId++;
927 break;
928 }
929
930 lastWasRadio = isRadio;
931
932 i++;
933 }
934
935 if ( !::SendMessage(GetHwnd(), TB_ADDBUTTONS, (WPARAM)i, (LPARAM)buttons) )
936 {
937 wxLogLastError(wxT("TB_ADDBUTTONS"));
938 }
939
940 delete [] buttons;
941
942 // Deal with the controls finally
943 // ------------------------------
944
945 // adjust the controls size to fit nicely in the toolbar
946 int y = 0;
947 size_t index = 0;
948 for ( node = m_tools.GetFirst(); node; node = node->GetNext(), index++ )
949 {
950 wxToolBarToolBase *tool = node->GetData();
951
952 // we calculate the running y coord for vertical toolbars so we need to
953 // get the items size for all items but for the horizontal ones we
954 // don't need to deal with the non controls
955 bool isControl = tool->IsControl();
956 if ( !isControl && !isVertical )
957 continue;
958
959 // note that we use TB_GETITEMRECT and not TB_GETRECT because the
960 // latter only appeared in v4.70 of comctl32.dll
961 RECT r;
962 if ( !::SendMessage(GetHwnd(), TB_GETITEMRECT,
963 index, (LPARAM)(LPRECT)&r) )
964 {
965 wxLogLastError(wxT("TB_GETITEMRECT"));
966 }
967
968 if ( !isControl )
969 {
970 // can only be control if isVertical
971 y += r.bottom - r.top;
972
973 continue;
974 }
975
976 wxControl *control = tool->GetControl();
977
978 wxSize size = control->GetSize();
979
980 // the position of the leftmost controls corner
981 int left = wxDefaultCoord;
982
983 // TB_SETBUTTONINFO message is only supported by comctl32.dll 4.71+
984 #ifdef TB_SETBUTTONINFO
985 // available in headers, now check whether it is available now
986 // (during run-time)
987 if ( wxApp::GetComCtl32Version() >= 471 )
988 {
989 // set the (underlying) separators width to be that of the
990 // control
991 TBBUTTONINFO tbbi;
992 tbbi.cbSize = sizeof(tbbi);
993 tbbi.dwMask = TBIF_SIZE;
994 tbbi.cx = (WORD)size.x;
995 if ( !::SendMessage(GetHwnd(), TB_SETBUTTONINFO,
996 tool->GetId(), (LPARAM)&tbbi) )
997 {
998 // the id is probably invalid?
999 wxLogLastError(wxT("TB_SETBUTTONINFO"));
1000 }
1001 }
1002 else
1003 #endif // comctl32.dll 4.71
1004 // TB_SETBUTTONINFO unavailable
1005 {
1006 // try adding several separators to fit the controls width
1007 int widthSep = r.right - r.left;
1008 left = r.left;
1009
1010 TBBUTTON tbb;
1011 wxZeroMemory(tbb);
1012 tbb.idCommand = 0;
1013 tbb.fsState = TBSTATE_ENABLED;
1014 tbb.fsStyle = TBSTYLE_SEP;
1015
1016 size_t nSeparators = size.x / widthSep;
1017 for ( size_t nSep = 0; nSep < nSeparators; nSep++ )
1018 {
1019 if ( !::SendMessage(GetHwnd(), TB_INSERTBUTTON,
1020 index, (LPARAM)&tbb) )
1021 {
1022 wxLogLastError(wxT("TB_INSERTBUTTON"));
1023 }
1024
1025 index++;
1026 }
1027
1028 // remember the number of separators we used - we'd have to
1029 // delete all of them later
1030 ((wxToolBarTool *)tool)->SetSeparatorsCount(nSeparators);
1031
1032 // adjust the controls width to exactly cover the separators
1033 control->SetSize((nSeparators + 1)*widthSep, wxDefaultCoord);
1034 }
1035
1036 // position the control itself correctly vertically
1037 int height = r.bottom - r.top;
1038 int diff = height - size.y;
1039 if ( diff < 0 )
1040 {
1041 // the control is too high, resize to fit
1042 control->SetSize(wxDefaultCoord, height - 2);
1043
1044 diff = 2;
1045 }
1046
1047 int top;
1048 if ( isVertical )
1049 {
1050 left = 0;
1051 top = y;
1052
1053 y += height + 2*GetMargins().y;
1054 }
1055 else // horizontal toolbar
1056 {
1057 if ( left == wxDefaultCoord )
1058 left = r.left;
1059
1060 top = r.top;
1061 }
1062
1063 control->Move(left, top + (diff + 1) / 2);
1064 }
1065
1066 // the max index is the "real" number of buttons - i.e. counting even the
1067 // separators which we added just for aligning the controls
1068 m_nButtons = index;
1069
1070 if ( !isVertical )
1071 {
1072 if ( m_maxRows == 0 )
1073 {
1074 // if not set yet, only one row
1075 SetRows(1);
1076 }
1077 }
1078 else if ( m_nButtons > 0 ) // vertical non empty toolbar
1079 {
1080 if ( m_maxRows == 0 )
1081 {
1082 // if not set yet, have one column
1083 SetRows(m_nButtons);
1084 }
1085 }
1086
1087 InvalidateBestSize();
1088 return true;
1089 }
1090
1091 // ----------------------------------------------------------------------------
1092 // message handlers
1093 // ----------------------------------------------------------------------------
1094
1095 bool wxToolBar::MSWCommand(WXUINT WXUNUSED(cmd), WXWORD id)
1096 {
1097 wxToolBarToolBase *tool = FindById((int)id);
1098 if ( !tool )
1099 return false;
1100
1101 bool toggled = false; // just to suppress warnings
1102
1103 if ( tool->CanBeToggled() )
1104 {
1105 LRESULT state = ::SendMessage(GetHwnd(), TB_GETSTATE, id, 0);
1106 toggled = (state & TBSTATE_CHECKED) != 0;
1107
1108 // ignore the event when a radio button is released, as this doesn't
1109 // seem to happen at all, and is handled otherwise
1110 if ( tool->GetKind() == wxITEM_RADIO && !toggled )
1111 return true;
1112
1113 tool->Toggle(toggled);
1114 UnToggleRadioGroup(tool);
1115 }
1116
1117 // OnLeftClick() can veto the button state change - for buttons which
1118 // may be toggled only, of couse
1119 if ( !OnLeftClick((int)id, toggled) && tool->CanBeToggled() )
1120 {
1121 // revert back
1122 tool->Toggle(!toggled);
1123
1124 ::SendMessage(GetHwnd(), TB_CHECKBUTTON, id, MAKELONG(!toggled, 0));
1125 }
1126
1127 return true;
1128 }
1129
1130 bool wxToolBar::MSWOnNotify(int WXUNUSED(idCtrl),
1131 WXLPARAM lParam,
1132 WXLPARAM *WXUNUSED(result))
1133 {
1134 #if wxUSE_TOOLTIPS
1135 // First check if this applies to us
1136 NMHDR *hdr = (NMHDR *)lParam;
1137
1138 // the tooltips control created by the toolbar is sometimes Unicode, even
1139 // in an ANSI application - this seems to be a bug in comctl32.dll v5
1140 UINT code = hdr->code;
1141 if ( (code != (UINT) TTN_NEEDTEXTA) && (code != (UINT) TTN_NEEDTEXTW) )
1142 return false;
1143
1144 HWND toolTipWnd = (HWND)::SendMessage((HWND)GetHWND(), TB_GETTOOLTIPS, 0, 0);
1145 if ( toolTipWnd != hdr->hwndFrom )
1146 return false;
1147
1148 LPTOOLTIPTEXT ttText = (LPTOOLTIPTEXT)lParam;
1149 int id = (int)ttText->hdr.idFrom;
1150
1151 wxToolBarToolBase *tool = FindById(id);
1152 if ( !tool )
1153 return false;
1154
1155 return HandleTooltipNotify(code, lParam, tool->GetShortHelp());
1156 #else
1157 wxUnusedVar(lParam);
1158
1159 return false;
1160 #endif
1161 }
1162
1163 // ----------------------------------------------------------------------------
1164 // toolbar geometry
1165 // ----------------------------------------------------------------------------
1166
1167 void wxToolBar::SetToolBitmapSize(const wxSize& size)
1168 {
1169 wxToolBarBase::SetToolBitmapSize(size);
1170
1171 ::SendMessage(GetHwnd(), TB_SETBITMAPSIZE, 0, MAKELONG(size.x, size.y));
1172 }
1173
1174 void wxToolBar::SetRows(int nRows)
1175 {
1176 if ( nRows == m_maxRows )
1177 {
1178 // avoid resizing the frame uselessly
1179 return;
1180 }
1181
1182 // TRUE in wParam means to create at least as many rows, FALSE -
1183 // at most as many
1184 RECT rect;
1185 ::SendMessage(GetHwnd(), TB_SETROWS,
1186 MAKEWPARAM(nRows, !(GetWindowStyle() & wxTB_VERTICAL)),
1187 (LPARAM) &rect);
1188
1189 m_maxRows = nRows;
1190
1191 UpdateSize();
1192 }
1193
1194 // The button size is bigger than the bitmap size
1195 wxSize wxToolBar::GetToolSize() const
1196 {
1197 // TB_GETBUTTONSIZE is supported from version 4.70
1198 #if defined(_WIN32_IE) && (_WIN32_IE >= 0x300 ) \
1199 && !( defined(__GNUWIN32__) && !wxCHECK_W32API_VERSION( 1, 0 ) ) \
1200 && !defined (__DIGITALMARS__)
1201 if ( wxApp::GetComCtl32Version() >= 470 )
1202 {
1203 DWORD dw = ::SendMessage(GetHwnd(), TB_GETBUTTONSIZE, 0, 0);
1204
1205 return wxSize(LOWORD(dw), HIWORD(dw));
1206 }
1207 else
1208 #endif // comctl32.dll 4.70+
1209 {
1210 // defaults
1211 return wxSize(m_defaultWidth + 8, m_defaultHeight + 7);
1212 }
1213 }
1214
1215 static
1216 wxToolBarToolBase *GetItemSkippingDummySpacers(const wxToolBarToolsList& tools,
1217 size_t index )
1218 {
1219 wxToolBarToolsList::compatibility_iterator current = tools.GetFirst();
1220
1221 for ( ; current ; current = current->GetNext() )
1222 {
1223 if ( index == 0 )
1224 return current->GetData();
1225
1226 wxToolBarTool *tool = (wxToolBarTool *)current->GetData();
1227 size_t separators = tool->GetSeparatorsCount();
1228
1229 // if it is a normal button, sepcount == 0, so skip 1 item (the button)
1230 // otherwise, skip as many items as the separator count, plus the
1231 // control itself
1232 index -= separators ? separators + 1 : 1;
1233 }
1234
1235 return 0;
1236 }
1237
1238 wxToolBarToolBase *wxToolBar::FindToolForPosition(wxCoord x, wxCoord y) const
1239 {
1240 POINT pt;
1241 pt.x = x;
1242 pt.y = y;
1243 int index = (int)::SendMessage(GetHwnd(), TB_HITTEST, 0, (LPARAM)&pt);
1244 // MBN: when the point ( x, y ) is close to the toolbar border
1245 // TB_HITTEST returns m_nButtons ( not -1 )
1246 if ( index < 0 || (size_t)index >= m_nButtons )
1247 {
1248 // it's a separator or there is no tool at all there
1249 return (wxToolBarToolBase *)NULL;
1250 }
1251
1252 // if comctl32 version < 4.71 wxToolBar95 adds dummy spacers
1253 #if defined(_WIN32_IE) && (_WIN32_IE >= 0x400 )
1254 if ( wxApp::GetComCtl32Version() >= 471 )
1255 {
1256 return m_tools.Item((size_t)index)->GetData();
1257 }
1258 else
1259 #endif
1260 {
1261 return GetItemSkippingDummySpacers( m_tools, (size_t) index );
1262 }
1263 }
1264
1265 void wxToolBar::UpdateSize()
1266 {
1267 // the toolbar size changed
1268 ::SendMessage(GetHwnd(), TB_AUTOSIZE, 0, 0);
1269
1270 // we must also refresh the frame after the toolbar size (possibly) changed
1271 wxFrame *frame = wxDynamicCast(GetParent(), wxFrame);
1272 if ( frame )
1273 {
1274 frame->SendSizeEvent();
1275 }
1276 }
1277
1278 // ----------------------------------------------------------------------------
1279 // toolbar styles
1280 // ---------------------------------------------------------------------------
1281
1282 void wxToolBar::SetWindowStyleFlag(long style)
1283 {
1284 // the style bits whose changes force us to recreate the toolbar
1285 static const long MASK_NEEDS_RECREATE = wxTB_TEXT | wxTB_NOICONS;
1286
1287 const long styleOld = GetWindowStyle();
1288
1289 wxToolBarBase::SetWindowStyleFlag(style);
1290
1291 // don't recreate an empty toolbar: not only this is unnecessary, but it is
1292 // also fatal as we'd then try to recreate the toolbar when it's just being
1293 // created
1294 if ( GetToolsCount() &&
1295 (style & MASK_NEEDS_RECREATE) != (styleOld & MASK_NEEDS_RECREATE) )
1296 {
1297 // to remove the text labels, simply re-realizing the toolbar is enough
1298 // but I don't know of any way to add the text to an existing toolbar
1299 // other than by recreating it entirely
1300 Recreate();
1301 }
1302 }
1303
1304 // ----------------------------------------------------------------------------
1305 // tool state
1306 // ----------------------------------------------------------------------------
1307
1308 void wxToolBar::DoEnableTool(wxToolBarToolBase *tool, bool enable)
1309 {
1310 ::SendMessage(GetHwnd(), TB_ENABLEBUTTON,
1311 (WPARAM)tool->GetId(), (LPARAM)MAKELONG(enable, 0));
1312 }
1313
1314 void wxToolBar::DoToggleTool(wxToolBarToolBase *tool, bool toggle)
1315 {
1316 ::SendMessage(GetHwnd(), TB_CHECKBUTTON,
1317 (WPARAM)tool->GetId(), (LPARAM)MAKELONG(toggle, 0));
1318 }
1319
1320 void wxToolBar::DoSetToggle(wxToolBarToolBase *WXUNUSED(tool), bool WXUNUSED(toggle))
1321 {
1322 // VZ: AFAIK, the button has to be created either with TBSTYLE_CHECK or
1323 // without, so we really need to delete the button and recreate it here
1324 wxFAIL_MSG( _T("not implemented") );
1325 }
1326
1327 // ----------------------------------------------------------------------------
1328 // event handlers
1329 // ----------------------------------------------------------------------------
1330
1331 // Responds to colour changes, and passes event on to children.
1332 void wxToolBar::OnSysColourChanged(wxSysColourChangedEvent& event)
1333 {
1334 wxRGBToColour(m_backgroundColour, ::GetSysColor(COLOR_BTNFACE));
1335
1336 // Remap the buttons
1337 Realize();
1338
1339 // Relayout the toolbar
1340 int nrows = m_maxRows;
1341 m_maxRows = 0; // otherwise SetRows() wouldn't do anything
1342 SetRows(nrows);
1343
1344 Refresh();
1345
1346 // let the event propagate further
1347 event.Skip();
1348 }
1349
1350 void wxToolBar::OnMouseEvent(wxMouseEvent& event)
1351 {
1352 if (event.Leaving() && m_pInTool)
1353 {
1354 OnMouseEnter( -1 );
1355 event.Skip();
1356 return;
1357 }
1358
1359 if ( event.RightDown() )
1360 {
1361 // find the tool under the mouse
1362 wxCoord x,y;
1363 event.GetPosition(&x, &y);
1364
1365 wxToolBarToolBase *tool = FindToolForPosition(x, y);
1366 OnRightClick(tool ? tool->GetId() : -1, x, y);
1367 }
1368 else
1369 {
1370 event.Skip();
1371 }
1372 }
1373
1374 // This handler is required to allow the toolbar to be set to a non-default
1375 // colour: for example, when it must blend in with a notebook page.
1376 void wxToolBar::OnEraseBackground(wxEraseEvent& event)
1377 {
1378 wxColour bgCol = GetBackgroundColour();
1379 if (!bgCol.Ok())
1380 {
1381 event.Skip();
1382 return;
1383 }
1384
1385 // notice that this 'dumb' implementation may cause flicker for some of the
1386 // controls in which case they should intercept wxEraseEvent and process it
1387 // themselves somehow
1388
1389 RECT rect;
1390 ::GetClientRect(GetHwnd(), &rect);
1391
1392 HBRUSH hBrush = ::CreateSolidBrush(wxColourToRGB(bgCol));
1393
1394 HDC hdc = GetHdcOf((*event.GetDC()));
1395
1396 #ifndef __WXWINCE__
1397 int mode = ::SetMapMode(hdc, MM_TEXT);
1398 #endif
1399
1400 ::FillRect(hdc, &rect, hBrush);
1401 ::DeleteObject(hBrush);
1402
1403 #ifndef __WXWINCE__
1404 ::SetMapMode(hdc, mode);
1405 #endif
1406 }
1407
1408 bool wxToolBar::HandleSize(WXWPARAM WXUNUSED(wParam), WXLPARAM lParam)
1409 {
1410 // calculate our minor dimension ourselves - we're confusing the standard
1411 // logic (TB_AUTOSIZE) with our horizontal toolbars and other hacks
1412 RECT r;
1413 if ( ::SendMessage(GetHwnd(), TB_GETITEMRECT, 0, (LPARAM)&r) )
1414 {
1415 int w, h;
1416
1417 if ( GetWindowStyle() & wxTB_VERTICAL )
1418 {
1419 w = r.right - r.left;
1420 if ( m_maxRows )
1421 {
1422 w *= (m_nButtons + m_maxRows - 1)/m_maxRows;
1423 }
1424 h = HIWORD(lParam);
1425 }
1426 else
1427 {
1428 w = LOWORD(lParam);
1429 if (HasFlag( wxTB_FLAT ))
1430 h = r.bottom - r.top - 3;
1431 else
1432 h = r.bottom - r.top;
1433 if ( m_maxRows )
1434 {
1435 // FIXME: hardcoded separator line height...
1436 h += HasFlag(wxTB_NODIVIDER) ? 4 : 6;
1437 h *= m_maxRows;
1438 }
1439 }
1440
1441 if ( MAKELPARAM(w, h) != lParam )
1442 {
1443 // size really changed
1444 SetSize(w, h);
1445 }
1446
1447 // message processed
1448 return true;
1449 }
1450
1451 return false;
1452 }
1453
1454 bool wxToolBar::HandlePaint(WXWPARAM wParam, WXLPARAM lParam)
1455 {
1456 // erase any dummy separators which we used for aligning the controls if
1457 // any here
1458
1459 // first of all, do we have any controls at all?
1460 wxToolBarToolsList::compatibility_iterator node;
1461 for ( node = m_tools.GetFirst(); node; node = node->GetNext() )
1462 {
1463 if ( node->GetData()->IsControl() )
1464 break;
1465 }
1466
1467 if ( !node )
1468 {
1469 // no controls, nothing to erase
1470 return false;
1471 }
1472
1473 // prepare the DC on which we'll be drawing
1474 wxClientDC dc(this);
1475 dc.SetBrush(wxBrush(GetBackgroundColour(), wxSOLID));
1476 dc.SetPen(*wxTRANSPARENT_PEN);
1477
1478 RECT r;
1479 if ( !::GetUpdateRect(GetHwnd(), &r, FALSE) )
1480 {
1481 // nothing to redraw anyhow
1482 return false;
1483 }
1484
1485 wxRect rectUpdate;
1486 wxCopyRECTToRect(r, rectUpdate);
1487
1488 dc.SetClippingRegion(rectUpdate);
1489
1490 // draw the toolbar tools, separators &c normally
1491 wxControl::MSWWindowProc(WM_PAINT, wParam, lParam);
1492
1493 // for each control in the toolbar find all the separators intersecting it
1494 // and erase them
1495 //
1496 // NB: this is really the only way to do it as we don't know if a separator
1497 // corresponds to a control (i.e. is a dummy one) or a real one
1498 // otherwise
1499 for ( node = m_tools.GetFirst(); node; node = node->GetNext() )
1500 {
1501 wxToolBarToolBase *tool = node->GetData();
1502 if ( tool->IsControl() )
1503 {
1504 // get the control rect in our client coords
1505 wxControl *control = tool->GetControl();
1506 wxRect rectCtrl = control->GetRect();
1507
1508 // iterate over all buttons
1509 TBBUTTON tbb;
1510 int count = ::SendMessage(GetHwnd(), TB_BUTTONCOUNT, 0, 0);
1511 for ( int n = 0; n < count; n++ )
1512 {
1513 // is it a separator?
1514 if ( !::SendMessage(GetHwnd(), TB_GETBUTTON,
1515 n, (LPARAM)&tbb) )
1516 {
1517 wxLogDebug(_T("TB_GETBUTTON failed?"));
1518
1519 continue;
1520 }
1521
1522 if ( tbb.fsStyle != TBSTYLE_SEP )
1523 continue;
1524
1525 // get the bounding rect of the separator
1526 RECT r;
1527 if ( !::SendMessage(GetHwnd(), TB_GETITEMRECT,
1528 n, (LPARAM)&r) )
1529 {
1530 wxLogDebug(_T("TB_GETITEMRECT failed?"));
1531
1532 continue;
1533 }
1534
1535 // does it intersect the control?
1536 wxRect rectItem;
1537 wxCopyRECTToRect(r, rectItem);
1538 if ( rectCtrl.Intersects(rectItem) )
1539 {
1540 // yes, do erase it!
1541 dc.DrawRectangle(rectItem);
1542
1543 // Necessary in case we use a no-paint-on-size
1544 // style in the parent: the controls can disappear
1545 control->Refresh(false);
1546 }
1547 }
1548 }
1549 }
1550
1551 return true;
1552 }
1553
1554 void wxToolBar::HandleMouseMove(WXWPARAM WXUNUSED(wParam), WXLPARAM lParam)
1555 {
1556 wxCoord x = GET_X_LPARAM(lParam),
1557 y = GET_Y_LPARAM(lParam);
1558 wxToolBarToolBase* tool = FindToolForPosition( x, y );
1559
1560 // cursor left current tool
1561 if( tool != m_pInTool && !tool )
1562 {
1563 m_pInTool = 0;
1564 OnMouseEnter( -1 );
1565 }
1566
1567 // cursor entered a tool
1568 if( tool != m_pInTool && tool )
1569 {
1570 m_pInTool = tool;
1571 OnMouseEnter( tool->GetId() );
1572 }
1573 }
1574
1575 WXLRESULT wxToolBar::MSWWindowProc(WXUINT nMsg, WXWPARAM wParam, WXLPARAM lParam)
1576 {
1577 switch ( nMsg )
1578 {
1579 case WM_MOUSEMOVE:
1580 // we don't handle mouse moves, so always pass the message to
1581 // wxControl::MSWWindowProc (HandleMouseMove just calls OnMouseEnter)
1582 HandleMouseMove(wParam, lParam);
1583 break;
1584
1585 case WM_SIZE:
1586 if ( HandleSize(wParam, lParam) )
1587 return 0;
1588 break;
1589
1590 #ifndef __WXWINCE__
1591 case WM_PAINT:
1592 if ( HandlePaint(wParam, lParam) )
1593 return 0;
1594 #endif
1595 }
1596
1597 return wxControl::MSWWindowProc(nMsg, wParam, lParam);
1598 }
1599
1600 // ----------------------------------------------------------------------------
1601 // private functions
1602 // ----------------------------------------------------------------------------
1603
1604 WXHBITMAP wxToolBar::MapBitmap(WXHBITMAP bitmap, int width, int height)
1605 {
1606 MemoryHDC hdcMem;
1607
1608 if ( !hdcMem )
1609 {
1610 wxLogLastError(_T("CreateCompatibleDC"));
1611
1612 return bitmap;
1613 }
1614
1615 SelectInHDC bmpInHDC(hdcMem, (HBITMAP)bitmap);
1616
1617 if ( !bmpInHDC )
1618 {
1619 wxLogLastError(_T("SelectObject"));
1620
1621 return bitmap;
1622 }
1623
1624 wxCOLORMAP *cmap = wxGetStdColourMap();
1625
1626 for ( int i = 0; i < width; i++ )
1627 {
1628 for ( int j = 0; j < height; j++ )
1629 {
1630 COLORREF pixel = ::GetPixel(hdcMem, i, j);
1631
1632 for ( size_t k = 0; k < wxSTD_COL_MAX; k++ )
1633 {
1634 COLORREF col = cmap[k].from;
1635 if ( abs(GetRValue(pixel) - GetRValue(col)) < 10 &&
1636 abs(GetGValue(pixel) - GetGValue(col)) < 10 &&
1637 abs(GetBValue(pixel) - GetBValue(col)) < 10 )
1638 {
1639 ::SetPixel(hdcMem, i, j, cmap[k].to);
1640 break;
1641 }
1642 }
1643 }
1644 }
1645
1646 return bitmap;
1647
1648 // VZ: I leave here my attempts to map the bitmap to the system colours
1649 // faster by using BitBlt() even though it's broken currently - but
1650 // maybe someone else can finish it? It should be faster than iterating
1651 // over all pixels...
1652 #if 0
1653 MemoryHDC hdcMask, hdcDst;
1654 if ( !hdcMask || !hdcDst )
1655 {
1656 wxLogLastError(_T("CreateCompatibleDC"));
1657
1658 return bitmap;
1659 }
1660
1661 // create the target bitmap
1662 HBITMAP hbmpDst = ::CreateCompatibleBitmap(hdcDst, width, height);
1663 if ( !hbmpDst )
1664 {
1665 wxLogLastError(_T("CreateCompatibleBitmap"));
1666
1667 return bitmap;
1668 }
1669
1670 // create the monochrome mask bitmap
1671 HBITMAP hbmpMask = ::CreateBitmap(width, height, 1, 1, 0);
1672 if ( !hbmpMask )
1673 {
1674 wxLogLastError(_T("CreateBitmap(mono)"));
1675
1676 ::DeleteObject(hbmpDst);
1677
1678 return bitmap;
1679 }
1680
1681 SelectInHDC bmpInDst(hdcDst, hbmpDst),
1682 bmpInMask(hdcMask, hbmpMask);
1683
1684 // for each colour:
1685 for ( n = 0; n < NUM_OF_MAPPED_COLOURS; n++ )
1686 {
1687 // create the mask for this colour
1688 ::SetBkColor(hdcMem, ColorMap[n].from);
1689 ::BitBlt(hdcMask, 0, 0, width, height, hdcMem, 0, 0, SRCCOPY);
1690
1691 // replace this colour with the target one in the dst bitmap
1692 HBRUSH hbr = ::CreateSolidBrush(ColorMap[n].to);
1693 HGDIOBJ hbrOld = ::SelectObject(hdcDst, hbr);
1694
1695 ::MaskBlt(hdcDst, 0, 0, width, height,
1696 hdcMem, 0, 0,
1697 hbmpMask, 0, 0,
1698 MAKEROP4(PATCOPY, SRCCOPY));
1699
1700 (void)::SelectObject(hdcDst, hbrOld);
1701 ::DeleteObject(hbr);
1702 }
1703
1704 ::DeleteObject((HBITMAP)bitmap);
1705
1706 return (WXHBITMAP)hbmpDst;
1707 #endif // 0
1708 }
1709
1710 #endif // wxUSE_TOOLBAR && Win95
1711