src/msw/tbar95.cpp

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