src/msw/control.cpp

   1 /////////////////////////////////////////////////////////////////////////////
   2 // Name:        msw/control.cpp
   3 // Purpose:     wxControl class
   4 // Author:      Julian Smart
   5 // Modified by:
   6 // Created:     01/02/97
   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_CONTROLS
  28
  29 #ifndef WX_PRECOMP
  30     #include "wx/event.h"
  31     #include "wx/app.h"
  32     #include "wx/dcclient.h"
  33     #include "wx/log.h"
  34     #include "wx/settings.h"
  35 #endif
  36
  37 #include "wx/control.h"
  38
  39 #if wxUSE_NOTEBOOK
  40     #include "wx/notebook.h"
  41 #endif // wxUSE_NOTEBOOK
  42
  43 #include "wx/msw/private.h"
  44 #include "wx/msw/uxtheme.h"
  45
  46 #if defined(__WIN95__) && !(defined(__GNUWIN32_OLD__) && !defined(__CYGWIN10__))
  47     #include <commctrl.h>
  48 #endif
  49
  50 // ----------------------------------------------------------------------------
  51 // wxWin macros
  52 // ----------------------------------------------------------------------------
  53
  54 IMPLEMENT_ABSTRACT_CLASS(wxControl, wxWindow)
  55
  56 // ============================================================================
  57 // wxControl implementation
  58 // ============================================================================
  59
  60 // ----------------------------------------------------------------------------
  61 // wxControl ctor/dtor
  62 // ----------------------------------------------------------------------------
  63
  64 wxControl::~wxControl()
  65 {
  66     m_isBeingDeleted = true;
  67 }
  68
  69 // ----------------------------------------------------------------------------
  70 // control window creation
  71 // ----------------------------------------------------------------------------
  72
  73 bool wxControl::Create(wxWindow *parent,
  74                        wxWindowID id,
  75                        const wxPoint& pos,
  76                        const wxSize& size,
  77                        long style,
  78                        const wxValidator& wxVALIDATOR_PARAM(validator),
  79                        const wxString& name)
  80 {
  81     if ( !wxWindow::Create(parent, id, pos, size, style, name) )
  82         return false;
  83
  84 #if wxUSE_VALIDATORS
  85     SetValidator(validator);
  86 #endif
  87
  88     return true;
  89 }
  90
  91 bool wxControl::MSWCreateControl(const wxChar *classname,
  92                                  const wxString& label,
  93                                  const wxPoint& pos,
  94                                  const wxSize& size)
  95 {
  96     WXDWORD exstyle;
  97     WXDWORD msStyle = MSWGetStyle(GetWindowStyle(), &exstyle);
  98
  99     return MSWCreateControl(classname, msStyle, pos, size, label, exstyle);
 100 }
 101
 102 bool wxControl::MSWCreateControl(const wxChar *classname,
 103                                  WXDWORD style,
 104                                  const wxPoint& pos,
 105                                  const wxSize& size,
 106                                  const wxString& label,
 107                                  WXDWORD exstyle)
 108 {
 109     // if no extended style given, determine it ourselves
 110     if ( exstyle == (WXDWORD)-1 )
 111     {
 112         exstyle = 0;
 113         (void) MSWGetStyle(GetWindowStyle(), &exstyle);
 114     }
 115
 116     // all controls should have this style
 117     style |= WS_CHILD;
 118
 119     // create the control visible if it's currently shown for wxWidgets
 120     if ( m_isShown )
 121     {
 122         style |= WS_VISIBLE;
 123     }
 124
 125     // choose the position for the control: we have a problem with default size
 126     // here as we can't calculate the best size before the control exists
 127     // (DoGetBestSize() may need to use m_hWnd), so just choose the minimal
 128     // possible but non 0 size because 0 window width/height result in problems
 129     // elsewhere
 130     int x = pos.x == wxDefaultCoord ? 0 : pos.x,
 131         y = pos.y == wxDefaultCoord ? 0 : pos.y,
 132         w = size.x == wxDefaultCoord ? 1 : size.x,
 133         h = size.y == wxDefaultCoord ? 1 : size.y;
 134
 135     // ... and adjust it to account for a possible parent frames toolbar
 136     AdjustForParentClientOrigin(x, y);
 137
 138     m_hWnd = (WXHWND)::CreateWindowEx
 139                        (
 140                         exstyle,            // extended style
 141                         classname,          // the kind of control to create
 142                         label,              // the window name
 143                         style,              // the window style
 144                         x, y, w, h,         // the window position and size
 145                         GetHwndOf(GetParent()),  // parent
 146                         (HMENU)GetId(),     // child id
 147                         wxGetInstance(),    // app instance
 148                         NULL                // creation parameters
 149                        );
 150
 151     if ( !m_hWnd )
 152     {
 153 #ifdef __WXDEBUG__
 154         wxFAIL_MSG(wxString::Format
 155                    (
 156                     _T("CreateWindowEx(\"%s\", flags=%08x, ex=%08x) failed"),
 157                     classname, (unsigned int)style, (unsigned int)exstyle
 158                    ));
 159 #endif // __WXDEBUG__
 160
 161         return false;
 162     }
 163
 164     // install wxWidgets window proc for this window
 165     SubclassWin(m_hWnd);
 166
 167     // set up fonts and colours
 168     InheritAttributes();
 169     if (!m_hasFont)
 170         SetFont(GetDefaultAttributes().font);
 171
 172     // set the size now if no initial size specified
 173     SetInitialBestSize(size);
 174
 175     return true;
 176 }
 177
 178 // ----------------------------------------------------------------------------
 179 // various accessors
 180 // ----------------------------------------------------------------------------
 181
 182 wxBorder wxControl::GetDefaultBorder() const
 183 {
 184     // we want to automatically give controls a sunken style (confusingly,
 185     // it may not really mean sunken at all as we map it to WS_EX_CLIENTEDGE
 186     // which is not sunken at all under Windows XP -- rather, just the default)
 187 #if defined(__POCKETPC__) || defined(__SMARTPHONE__)
 188     return wxBORDER_SIMPLE;
 189 #else
 190     return wxBORDER_SUNKEN;
 191 #endif
 192 }
 193
 194 WXDWORD wxControl::MSWGetStyle(long style, WXDWORD *exstyle) const
 195 {
 196     long msStyle = wxWindow::MSWGetStyle(style, exstyle);
 197
 198     if ( AcceptsFocus() )
 199     {
 200         msStyle |= WS_TABSTOP;
 201     }
 202
 203     return msStyle;
 204 }
 205
 206 wxSize wxControl::DoGetBestSize() const
 207 {
 208     return wxSize(DEFAULT_ITEM_WIDTH, DEFAULT_ITEM_HEIGHT);
 209 }
 210
 211 // This is a helper for all wxControls made with UPDOWN native control.
 212 // In wxMSW it was only wxSpinCtrl derived from wxSpinButton but in
 213 // WinCE of Smartphones this happens also for native wxTextCtrl,
 214 // wxChoice and others.
 215 wxSize wxControl::GetBestSpinnerSize(const bool is_vertical) const
 216 {
 217     // take size according to layout
 218     wxSize bestSize(
 219 #if defined(__SMARTPHONE__) && defined(__WXWINCE__)
 220                     0,GetCharHeight()
 221 #else
 222                     ::GetSystemMetrics(is_vertical ? SM_CXVSCROLL : SM_CXHSCROLL),
 223                     ::GetSystemMetrics(is_vertical ? SM_CYVSCROLL : SM_CYHSCROLL)
 224 #endif
 225     );
 226
 227     // correct size as for undocumented MSW variants cases (WinCE and perhaps others)
 228     if (bestSize.x==0)
 229         bestSize.x = bestSize.y;
 230     if (bestSize.y==0)
 231         bestSize.y = bestSize.x;
 232
 233     // double size according to layout
 234     if (is_vertical)
 235         bestSize.y *= 2;
 236     else
 237         bestSize.x *= 2;
 238
 239     return bestSize;
 240 }
 241
 242 /* static */ wxVisualAttributes
 243 wxControl::GetClassDefaultAttributes(wxWindowVariant WXUNUSED(variant))
 244 {
 245     wxVisualAttributes attrs;
 246
 247     // old school (i.e. not "common") controls use the standard dialog font
 248     // by default
 249     attrs.font = wxSystemSettings::GetFont(wxSYS_DEFAULT_GUI_FONT);
 250
 251     // most, or at least many, of the controls use the same colours as the
 252     // buttons -- others will have to override this (and possibly simply call
 253     // GetCompositeControlsDefaultAttributes() from their versions)
 254     attrs.colFg = wxSystemSettings::GetColour(wxSYS_COLOUR_BTNTEXT);
 255     attrs.colBg = wxSystemSettings::GetColour(wxSYS_COLOUR_BTNFACE);
 256
 257     return attrs;
 258 }
 259
 260 // another version for the "composite", i.e. non simple controls
 261 /* static */ wxVisualAttributes
 262 wxControl::GetCompositeControlsDefaultAttributes(wxWindowVariant WXUNUSED(variant))
 263 {
 264     wxVisualAttributes attrs;
 265     attrs.font = wxSystemSettings::GetFont(wxSYS_DEFAULT_GUI_FONT);
 266     attrs.colFg = wxSystemSettings::GetColour(wxSYS_COLOUR_WINDOWTEXT);
 267     attrs.colBg = wxSystemSettings::GetColour(wxSYS_COLOUR_WINDOW);
 268
 269     return attrs;
 270 }
 271
 272 // ----------------------------------------------------------------------------
 273 // message handling
 274 // ----------------------------------------------------------------------------
 275
 276 bool wxControl::ProcessCommand(wxCommandEvent& event)
 277 {
 278     return GetEventHandler()->ProcessEvent(event);
 279 }
 280
 281 #ifdef __WIN95__
 282 bool wxControl::MSWOnNotify(int idCtrl,
 283                             WXLPARAM lParam,
 284                             WXLPARAM* result)
 285 {
 286     wxEventType eventType wxDUMMY_INITIALIZE(wxEVT_NULL);
 287
 288     NMHDR *hdr = (NMHDR*) lParam;
 289     switch ( hdr->code )
 290     {
 291         case NM_CLICK:
 292             eventType = wxEVT_COMMAND_LEFT_CLICK;
 293             break;
 294
 295         case NM_DBLCLK:
 296             eventType = wxEVT_COMMAND_LEFT_DCLICK;
 297             break;
 298
 299         case NM_RCLICK:
 300             eventType = wxEVT_COMMAND_RIGHT_CLICK;
 301             break;
 302
 303         case NM_RDBLCLK:
 304             eventType = wxEVT_COMMAND_RIGHT_DCLICK;
 305             break;
 306
 307         case NM_SETFOCUS:
 308             eventType = wxEVT_COMMAND_SET_FOCUS;
 309             break;
 310
 311         case NM_KILLFOCUS:
 312             eventType = wxEVT_COMMAND_KILL_FOCUS;
 313             break;
 314
 315         case NM_RETURN:
 316             eventType = wxEVT_COMMAND_ENTER;
 317             break;
 318
 319         default:
 320             return wxWindow::MSWOnNotify(idCtrl, lParam, result);
 321     }
 322
 323     wxCommandEvent event(wxEVT_NULL, m_windowId);
 324     event.SetEventType(eventType);
 325     event.SetEventObject(this);
 326
 327     return GetEventHandler()->ProcessEvent(event);
 328 }
 329 #endif // Win95
 330
 331 WXHBRUSH wxControl::DoMSWControlColor(WXHDC pDC, wxColour colBg, WXHWND hWnd)
 332 {
 333     HDC hdc = (HDC)pDC;
 334     if ( m_hasFgCol )
 335     {
 336         ::SetTextColor(hdc, wxColourToRGB(GetForegroundColour()));
 337     }
 338
 339     WXHBRUSH hbr = 0;
 340     if ( !colBg.Ok() )
 341     {
 342         hbr = MSWGetBgBrush(pDC, hWnd);
 343
 344         // if the control doesn't have any bg colour, foreground colour will be
 345         // ignored as the return value would be 0 -- so forcefully give it a
 346         // non default background brush in this case
 347         if ( !hbr && m_hasFgCol )
 348             colBg = GetBackgroundColour();
 349     }
 350
 351     // use the background colour override if a valid colour is given
 352     if ( colBg.Ok() )
 353     {
 354         ::SetBkColor(hdc, wxColourToRGB(colBg));
 355
 356         // draw children with the same colour as the parent
 357         wxBrush *brush = wxTheBrushList->FindOrCreateBrush(colBg, wxSOLID);
 358
 359         hbr = (WXHBRUSH)brush->GetResourceHandle();
 360
 361         // if we use custom background, we should set foreground ourselves too
 362         if ( !m_hasFgCol )
 363         {
 364             ::SetTextColor(hdc, ::GetSysColor(COLOR_WINDOWTEXT));
 365         }
 366         //else: already set above
 367     }
 368
 369     return hbr;
 370 }
 371
 372 WXHBRUSH wxControl::MSWControlColor(WXHDC pDC, WXHWND hWnd)
 373 {
 374     wxColour colBg;
 375
 376     if ( HasTransparentBackground() )
 377         ::SetBkMode((HDC)pDC, TRANSPARENT);
 378     else // if the control is opaque it shouldn't use the parents background
 379         colBg = GetBackgroundColour();
 380
 381     return DoMSWControlColor(pDC, colBg, hWnd);
 382 }
 383
 384 WXHBRUSH wxControl::MSWControlColorDisabled(WXHDC pDC)
 385 {
 386     return DoMSWControlColor(pDC,
 387                              wxSystemSettings::GetColour(wxSYS_COLOUR_BTNFACE),
 388                              GetHWND());
 389 }
 390
 391 // ---------------------------------------------------------------------------
 392 // global functions
 393 // ---------------------------------------------------------------------------
 394
 395 // this is used in radiobox.cpp and slider95.cpp and should be removed as soon
 396 // as it is not needed there any more!
 397 //
 398 // Call this repeatedly for several wnds to find the overall size
 399 // of the widget.
 400 // Call it initially with wxDefaultCoord for all values in rect.
 401 // Keep calling for other widgets, and rect will be modified
 402 // to calculate largest bounding rectangle.
 403 void wxFindMaxSize(WXHWND wnd, RECT *rect)
 404 {
 405     int left = rect->left;
 406     int right = rect->right;
 407     int top = rect->top;
 408     int bottom = rect->bottom;
 409
 410     GetWindowRect((HWND) wnd, rect);
 411
 412     if (left < 0)
 413         return;
 414
 415     if (left < rect->left)
 416         rect->left = left;
 417
 418     if (right > rect->right)
 419         rect->right = right;
 420
 421     if (top < rect->top)
 422         rect->top = top;
 423
 424     if (bottom > rect->bottom)
 425         rect->bottom = bottom;
 426 }
 427
 428 #endif // wxUSE_CONTROLS