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