src/msw/ownerdrw.cpp

   1 ///////////////////////////////////////////////////////////////////////////////
   2 // Name:        msw/ownerdrw.cpp
   3 // Purpose:     implementation of wxOwnerDrawn class
   4 // Author:      Vadim Zeitlin
   5 // Modified by:
   6 // Created:     13.11.97
   7 // RCS-ID:      $Id$
   8 // Copyright:   (c) 1998 Vadim Zeitlin <zeitlin@dptmaths.ens-cachan.fr>
   9 // Licence:     wxWindows licence
  10 ///////////////////////////////////////////////////////////////////////////////
  11
  12 #if defined(__GNUG__) && !defined(NO_GCC_PRAGMA)
  13 #pragma implementation
  14 #endif
  15
  16 // For compilers that support precompilation, includes "wx.h".
  17 #include "wx/wxprec.h"
  18 #include "wx/msw/private.h"
  19
  20 #ifdef __BORLANDC__
  21 #pragma hdrstop
  22 #endif
  23
  24 #ifndef WX_PRECOMP
  25   #include "wx/window.h"
  26   #include "wx/msw/private.h"
  27   #include "wx/font.h"
  28   #include "wx/bitmap.h"
  29   #include "wx/dcmemory.h"
  30   #include "wx/menu.h"
  31   #include "wx/utils.h"
  32 #endif
  33
  34 #include "wx/settings.h"
  35 #include "wx/ownerdrw.h"
  36 #include "wx/menuitem.h"
  37 #include "wx/fontutil.h"
  38 #include "wx/module.h"
  39
  40 #if wxUSE_OWNER_DRAWN
  41
  42 class wxMSWSystemMenuFontModule : public wxModule
  43 {
  44 public:
  45
  46     virtual bool OnInit()
  47     {
  48         ms_systemMenuFont = new wxFont;
  49
  50 #if defined(__WXMSW__) && defined(__WIN32__) && defined(SM_CXMENUCHECK)
  51         NONCLIENTMETRICS nm;
  52         nm.cbSize = sizeof(NONCLIENTMETRICS);
  53         SystemParametersInfo(SPI_GETNONCLIENTMETRICS,0,&nm,0);
  54
  55         ms_systemMenuButtonWidth = nm.iMenuHeight;
  56         ms_systemMenuHeight = nm.iMenuHeight;
  57
  58         // create menu font
  59         wxNativeFontInfo info;
  60         memcpy(&info.lf, &nm.lfMenuFont, sizeof(LOGFONT));
  61         ms_systemMenuFont->Create(info);
  62 #endif
  63
  64         return true;
  65     }
  66
  67     virtual void OnExit()
  68     {
  69         delete ms_systemMenuFont;
  70         ms_systemMenuFont = NULL;
  71     }
  72
  73     static wxFont* ms_systemMenuFont;
  74     static int ms_systemMenuButtonWidth;   // windows clean install default
  75     static int ms_systemMenuHeight;        // windows clean install default
  76 private:
  77     DECLARE_DYNAMIC_CLASS(wxMSWSystemMenuFontModule)
  78 };
  79
  80 // these static variables are by the wxMSWSystemMenuFontModule object
  81 // and reflect the system settings returned by the Win32 API's
  82 // SystemParametersInfo() call.
  83
  84 wxFont* wxMSWSystemMenuFontModule::ms_systemMenuFont = NULL;
  85 int wxMSWSystemMenuFontModule::ms_systemMenuButtonWidth = 18;   // windows clean install default
  86 int wxMSWSystemMenuFontModule::ms_systemMenuHeight = 18;        // windows clean install default
  87
  88 IMPLEMENT_DYNAMIC_CLASS(wxMSWSystemMenuFontModule, wxModule)
  89
  90 // ============================================================================
  91 // implementation of wxOwnerDrawn class
  92 // ============================================================================
  93
  94 // ctor
  95 // ----
  96 wxOwnerDrawn::wxOwnerDrawn(const wxString& str,
  97                            bool bCheckable, bool bMenuItem)
  98             : m_strName(str)
  99 {
 100     // get the default menu height and font from the system
 101     NONCLIENTMETRICS nm;
 102     nm.cbSize = sizeof (NONCLIENTMETRICS);
 103     SystemParametersInfo (SPI_GETNONCLIENTMETRICS,0,&nm,0);
 104     m_nMinHeight = nm.iMenuHeight;
 105
 106     // nm.iMenuWidth is the system default for the width of
 107     // menu icons and checkmarks
 108     if (ms_nDefaultMarginWidth == 0)
 109     {
 110        ms_nDefaultMarginWidth = wxMSWSystemMenuFontModule::ms_systemMenuButtonWidth;
 111        ms_nLastMarginWidth = wxMSWSystemMenuFontModule::ms_systemMenuButtonWidth;
 112     }
 113
 114     if (wxMSWSystemMenuFontModule::ms_systemMenuFont->Ok() && bMenuItem)
 115     {
 116         m_font = *wxMSWSystemMenuFontModule::ms_systemMenuFont;
 117     }
 118     else
 119     {
 120         m_font = *wxNORMAL_FONT;
 121     }
 122
 123     m_bCheckable   = bCheckable;
 124     m_bOwnerDrawn  = FALSE;
 125     m_nHeight      = 0;
 126     m_nMarginWidth = ms_nLastMarginWidth;
 127     m_nMinHeight   = wxMSWSystemMenuFontModule::ms_systemMenuHeight;
 128
 129     m_bmpDisabled = wxNullBitmap;
 130 }
 131
 132
 133 // these items will be set during the first invocation of the c'tor,
 134 // because the values will be determined by checking the system settings,
 135 // which is a chunk of code
 136 size_t wxOwnerDrawn::ms_nDefaultMarginWidth = 0;
 137 size_t wxOwnerDrawn::ms_nLastMarginWidth = 0;
 138
 139
 140 // drawing
 141 // -------
 142
 143 // get size of the item
 144 // The item size includes the menu string, the accel string,
 145 // the bitmap and size for a submenu expansion arrow...
 146 bool wxOwnerDrawn::OnMeasureItem(size_t *pwidth, size_t *pheight)
 147 {
 148   wxMemoryDC dc;
 149
 150   wxString str = wxStripMenuCodes(m_strName);
 151
 152   // if we have a valid accel string, then pad out
 153   // the menu string so the menu and accel string are not
 154   // placed ontop of eachother.
 155   if ( !m_strAccel.empty() )
 156    {
 157        str.Pad(str.Length()%8);
 158        str += m_strAccel;
 159    }
 160
 161   if (m_font.Ok())
 162       dc.SetFont(GetFont());
 163
 164   dc.GetTextExtent(str, (long *)pwidth, (long *)pheight);
 165
 166   // add space at the end of the menu for the submenu expansion arrow
 167   // this will also allow offsetting the accel string from the right edge
 168   *pwidth += (size_t) (GetDefaultMarginWidth() * 1.5) + 16;
 169
 170   // JACS: items still look too tightly packed, so adding 5 pixels.
 171   (*pheight) = (*pheight) + 5;
 172
 173   // Ray Gilbert's changes - Corrects the problem of a BMP
 174   // being placed next to text in a menu item, and the BMP does
 175   // not match the size expected by the system.  This will
 176   // resize the space so the BMP will fit.  Without this, BMPs
 177   // must be no larger or smaller than 16x16.
 178   if (m_bmpChecked.Ok())
 179   {
 180       // Is BMP height larger then text height?
 181       size_t adjustedHeight = m_bmpChecked.GetHeight() +
 182                               wxSystemSettings::GetMetric(wxSYS_EDGE_Y);
 183       if (*pheight < adjustedHeight)
 184           *pheight = adjustedHeight;
 185
 186       // Does BMP encroach on default check menu position?
 187       size_t adjustedWidth = m_bmpChecked.GetWidth() +
 188                              (wxSystemSettings::GetMetric(wxSYS_EDGE_X) * 2);
 189
 190       // Do we need to widen margin to fit BMP?
 191       if ((size_t)GetMarginWidth() != adjustedWidth)
 192           SetMarginWidth(adjustedWidth);
 193   }
 194
 195   // add the size of the bitmap to our total size - even if we don't have
 196   // a bitmap we leave room for one...
 197   *pwidth += GetMarginWidth();
 198
 199   // make sure that this item is at least as
 200   // tall as the user's system settings specify
 201   if (*pheight < m_nMinHeight)
 202     *pheight = m_nMinHeight;
 203
 204   m_nHeight = *pheight;                // remember height for use in OnDrawItem
 205
 206   return TRUE;
 207 }
 208
 209 // searching for this macro you'll find all the code where I'm using the native
 210 // Win32 GDI functions and not wxWindows ones. Might help to whoever decides to
 211 // port this code to X. (VZ)
 212
 213 #if defined(__WIN32__) && !defined(__SYMANTEC__)
 214 #define   O_DRAW_NATIVE_API     // comments below explain why I use it
 215 #endif
 216
 217 // draw the item
 218 bool wxOwnerDrawn::OnDrawItem(wxDC& dc,
 219                               const wxRect& rc,
 220                               wxODAction act,
 221                               wxODStatus st)
 222 {
 223   // we do nothing on focus change
 224   if ( act == wxODFocusChanged )
 225     return TRUE;
 226
 227   // wxColor <-> RGB
 228   #define   ToRGB(col)  PALETTERGB(col.Red(), col.Green(), col.Blue())
 229   #define   UnRGB(col)  GetRValue(col), GetGValue(col), GetBValue(col)
 230
 231
 232   // this flag determines whether or not an edge will
 233   // be drawn around the bitmap. In most "windows classic"
 234   // applications, a 1-pixel highlight edge is drawn around
 235   // the bitmap of an item when it is selected.  However,
 236   // with the new "luna" theme, no edge is drawn around
 237   // the bitmap because the background is white (this applies
 238   // only to "non-XP style" menus w/ bitmaps --
 239   // see IE 6 menus for an example)
 240
 241   bool draw_bitmap_edge = true;
 242
 243   // set the colors
 244   // --------------
 245   DWORD colBack, colText;
 246   if ( st & wxODSelected ) {
 247     colBack = GetSysColor(COLOR_HIGHLIGHT);
 248     if (!(st & wxODDisabled))
 249     {
 250         colText = GetSysColor(COLOR_HIGHLIGHTTEXT);
 251     }
 252      else
 253     {
 254         colText = GetSysColor(COLOR_GRAYTEXT);
 255     }
 256   }
 257   else {
 258     // fall back to default colors if none explicitly specified
 259     colBack = m_colBack.Ok() ? ToRGB(m_colBack) : GetSysColor(COLOR_WINDOW);
 260     colText = m_colText.Ok() ? ToRGB(m_colText) : GetSysColor(COLOR_WINDOWTEXT);
 261   }
 262
 263
 264   // if background is white, don't draw an edge around the bitmap
 265   DWORD menu_bg_color = GetSysColor(COLOR_MENU);
 266   if (GetRValue(menu_bg_color) >= 0xf0 &&
 267       GetGValue(menu_bg_color) >= 0xf0 &&
 268       GetBValue(menu_bg_color) >= 0xf0)
 269   {
 270       draw_bitmap_edge = false;
 271   }
 272
 273
 274   #ifdef  O_DRAW_NATIVE_API
 275     #define  hdc           (HDC)dc.GetHDC()
 276     COLORREF colOldText = ::SetTextColor(hdc, colText),
 277              colOldBack = ::SetBkColor(hdc, colBack);
 278   #else
 279     dc.SetTextForeground(wxColor(UnRGB(colText)));
 280     dc.SetTextBackground(wxColor(UnRGB(colBack)));
 281   #endif
 282
 283   // select the font and draw the text
 284   // ---------------------------------
 285
 286
 287   // determine where to draw and leave space for a check-mark.
 288   // Add 3 pixel padding so text appears well within highlight rectangle
 289   int x = rc.x + GetMarginWidth() + 3;
 290
 291
 292   // using native API because it reckognizes '&'
 293   #ifdef  O_DRAW_NATIVE_API
 294     int nPrevMode = SetBkMode(hdc, TRANSPARENT);
 295     HBRUSH hbr = CreateSolidBrush(colBack),
 296            hPrevBrush = (HBRUSH)SelectObject(hdc, hbr);
 297
 298     RECT rectFill = { rc.GetLeft(), rc.GetTop(), rc.GetRight()+1, rc.GetBottom() };
 299
 300     if ( st & wxODSelected && m_bmpChecked.Ok() && draw_bitmap_edge) {
 301         // only draw the highlight under the text, not under
 302         // the bitmap or checkmark; leave a 1-pixel gap.
 303         rectFill.left = GetMarginWidth() + 1;
 304     }
 305
 306     FillRect(hdc, &rectFill, hbr);
 307
 308     // use default font if no font set
 309     HFONT hfont;
 310     if ( m_font.Ok() ) {
 311       m_font.RealizeResource();
 312       hfont = (HFONT)m_font.GetResourceHandle();
 313     }
 314     else {
 315       hfont = (HFONT)::GetStockObject(SYSTEM_FONT);
 316     }
 317
 318     HFONT hPrevFont = (HFONT) ::SelectObject(hdc, hfont);
 319
 320     wxString strMenuText = m_strName.BeforeFirst('\t');
 321
 322     SIZE sizeRect;
 323     GetTextExtentPoint32(hdc,strMenuText.c_str(), strMenuText.Length(),&sizeRect);
 324     ::DrawState(hdc, NULL, NULL,
 325                 (LPARAM)strMenuText.c_str(), strMenuText.length(),
 326                 x, rc.y+( (int) ((rc.GetHeight()-sizeRect.cy)/2.0) )-1, // centre text vertically
 327                 rc.GetWidth()-GetMarginWidth(), sizeRect.cy,
 328                 DST_PREFIXTEXT |
 329                 (((st & wxODDisabled) && !(st & wxODSelected)) ? DSS_DISABLED : 0));
 330
 331     /* Right alignment does not work with DSS_DISABLED (Windows98) - why?
 332     if ( !m_strAccel.empty() )
 333     {
 334         // right align accel string with right edge of menu ( offset by the margin width )
 335         ::SetTextAlign(hdc, TA_RIGHT);
 336         ::DrawState(hdc, NULL, NULL,
 337                     (LPARAM)m_strAccel.c_str(), m_strAccel.length(),
 338                     rc.GetWidth()-(GetMarginWidth()), rc.y+(int) ((rc.GetHeight()-sizeRect.cy)/2.0),
 339                     rc.GetWidth()-GetMarginWidth(), sizeRect.cy,
 340                     DST_TEXT |
 341                     (((st & wxODDisabled) && !(st & wxODSelected)) ? DSS_DISABLED : 0));
 342         ::SetTextAlign(hdc, TA_LEFT);
 343     }
 344     */
 345
 346     // ::SetTextAlign(hdc, TA_RIGHT) doesn't work with DSS_DISABLED or DSS_MONO as last parameter
 347     // in DrawState() (at least with Windows98). So we have to take care of right alignment ourselves.
 348     if ( !m_strAccel.empty() )
 349     {
 350         int accel_width, accel_height;
 351         dc.GetTextExtent(m_strAccel, &accel_width, &accel_height);
 352         // right align accel string with right edge of menu ( offset by the margin width )
 353         ::DrawState(hdc, NULL, NULL,
 354                 (LPARAM)m_strAccel.c_str(), m_strAccel.length(),
 355                 rc.GetWidth()-GetMarginWidth()-accel_width, rc.y+(int) ((rc.GetHeight()-sizeRect.cy)/2.0),
 356                 rc.GetWidth()-GetMarginWidth()-accel_width, sizeRect.cy,
 357                 DST_TEXT |
 358                 (((st & wxODDisabled) && !(st & wxODSelected)) ? DSS_DISABLED : 0));
 359     }
 360
 361     (void)SelectObject(hdc, hPrevBrush);
 362     (void)SelectObject(hdc, hPrevFont);
 363     (void)SetBkMode(hdc, nPrevMode);
 364
 365     DeleteObject(hbr);
 366   #else
 367     dc.SetFont(GetFont());
 368     dc.DrawText(wxStripMenuCodes(m_strName), x, rc.y);
 369   #endif  //O_DRAW_NATIVE_API
 370
 371   // draw the bitmap
 372   // ---------------
 373   if ( IsCheckable() && !m_bmpChecked.Ok() ) {
 374     if ( st & wxODChecked ) {
 375       // using native APIs for performance and simplicity
 376 #ifdef  O_DRAW_NATIVE_API
 377       // what goes on: DrawFrameControl creates a b/w mask,
 378       // then we copy it to screen to have right colors
 379
 380         // first create a monochrome bitmap in a memory DC
 381       HDC hdcMem = CreateCompatibleDC(hdc);
 382       HBITMAP hbmpCheck = CreateBitmap(GetMarginWidth(), m_nHeight, 1, 1, 0);
 383       SelectObject(hdcMem, hbmpCheck);
 384
 385         // then draw a check mark into it
 386       RECT rect = { 0, 0, GetMarginWidth(), m_nHeight };
 387       if ( m_nHeight > 0 )
 388       {
 389         ::DrawFrameControl(hdcMem, &rect, DFC_MENU, DFCS_MENUCHECK);
 390       }
 391
 392         // finally copy it to screen DC and clean up
 393       BitBlt(hdc, rc.x, rc.y, GetMarginWidth(), m_nHeight,
 394              hdcMem, 0, 0, SRCCOPY);
 395
 396       DeleteDC(hdcMem);
 397       DeleteObject(hbmpCheck);
 398 #else
 399         // #### to do: perhaps using Marlett font (create equiv. font under X)
 400 //        wxFAIL("not implemented");
 401 #endif  //O_DRAW_NATIVE_API
 402     }
 403   }
 404   else {
 405     wxBitmap bmp( // for disabled items we use m_bmpDisabled if it exists
 406                   ( GetDisabledBitmap() != wxNullBitmap && ( st & wxODDisabled ) ) ? GetDisabledBitmap() :
 407     // for uncheckable item we use only the 'checked' bitmap
 408                   GetBitmap(IsCheckable() ? ((st & wxODChecked) != 0) : TRUE)
 409                 );
 410     if ( bmp.Ok() ) {
 411       wxMemoryDC dcMem(&dc);
 412       dcMem.SelectObject(bmp);
 413
 414       // center bitmap
 415       int nBmpWidth = bmp.GetWidth(),
 416           nBmpHeight = bmp.GetHeight();
 417
 418       // there should be enough place!
 419       wxASSERT((nBmpWidth <= rc.GetWidth()) && (nBmpHeight <= rc.GetHeight()));
 420
 421       int heightDiff = m_nHeight - nBmpHeight;
 422       dc.Blit(rc.x + (GetMarginWidth() - nBmpWidth) / 2,
 423               rc.y + heightDiff / 2,
 424               nBmpWidth, nBmpHeight,
 425               &dcMem, 0, 0, wxCOPY, TRUE /* use mask */);
 426
 427       if ( st & wxODSelected && draw_bitmap_edge ) {
 428         #ifdef  O_DRAW_NATIVE_API
 429           RECT rectBmp = { rc.GetLeft(), rc.GetTop(),
 430                            rc.GetLeft() + GetMarginWidth(),
 431                            rc.GetTop() + m_nHeight-1 };
 432           SetBkColor(hdc, colBack);
 433           DrawEdge(hdc, &rectBmp, BDR_RAISEDOUTER, BF_SOFT | BF_RECT);
 434         #else
 435           int x1, y1, x2, y2;
 436           x1 = rc.x;
 437           y1 = rc.y;
 438           x2 = x1 + GetMarginWidth() - 1;
 439           y2 = y1 + m_nHeight - 1;
 440
 441           dc.SetPen(*wxWHITE_PEN);
 442           dc.DrawLine(x1, y1, x2, y1);
 443           dc.DrawLine(x1, y1, x1, y2);
 444           dc.SetPen(*wxGREY_PEN);
 445           dc.DrawLine(x1, y2-1, x2, y2-1);
 446           dc.DrawLine(x2, y1, x2, y2);
 447         #endif  //O_DRAW_NATIVE_API
 448       }
 449     }
 450   }
 451
 452   #ifdef  O_DRAW_NATIVE_API
 453     ::SetTextColor(hdc, colOldText);
 454     ::SetBkColor(hdc, colOldBack);
 455
 456     #undef  hdc
 457   #endif  //O_DRAW_NATIVE_API
 458
 459   return TRUE;
 460 }
 461
 462
 463 #endif // wxUSE_OWNER_DRAWN
 464