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     // install wxWidgets window proc for this window
 164     SubclassWin(m_hWnd);
 165
 166     // set up fonts and colours
 167     InheritAttributes();
 168     if (!m_hasFont)
 169         SetFont(GetDefaultAttributes().font);
 170
 171     // set the size now if no initial size specified
 172     SetInitialBestSize(size);
 173
 174     return true;
 175 }
 176
 177 // ----------------------------------------------------------------------------
 178 // various accessors
 179 // ----------------------------------------------------------------------------
 180
 181 wxBorder wxControl::GetDefaultBorder() const
 182 {
 183     // we want to automatically give controls a sunken style (confusingly,
 184     // it may not really mean sunken at all as we map it to WS_EX_CLIENTEDGE
 185     // which is not sunken at all under Windows XP -- rather, just the default)
 186     return wxBORDER_SUNKEN;
 187 }
 188
 189 WXDWORD wxControl::MSWGetStyle(long style, WXDWORD *exstyle) const
 190 {
 191     long msStyle = wxWindow::MSWGetStyle(style, exstyle);
 192
 193     if ( AcceptsFocus() )
 194     {
 195         msStyle |= WS_TABSTOP;
 196     }
 197
 198     return msStyle;
 199 }
 200
 201 wxSize wxControl::DoGetBestSize() const
 202 {
 203     return wxSize(DEFAULT_ITEM_WIDTH, DEFAULT_ITEM_HEIGHT);
 204 }
 205
 206 // This is a helper for all wxControls made with UPDOWN native control.
 207 // In wxMSW it was only wxSpinCtrl derived from wxSpinButton but in
 208 // WinCE of Smartphones this happens also for native wxTextCtrl,
 209 // wxChoice and others.
 210 wxSize wxControl::GetBestSpinerSize(const bool is_vertical) const
 211 {
 212     // take size according to layout
 213     wxSize bestSize(
 214 #if defined(__SMARTPHONE__) && defined(__WXWINCE__)
 215                     0,GetCharHeight()
 216 #else
 217                     ::GetSystemMetrics(is_vertical ? SM_CXVSCROLL : SM_CXHSCROLL),
 218                     ::GetSystemMetrics(is_vertical ? SM_CYVSCROLL : SM_CYHSCROLL)
 219 #endif
 220     );
 221
 222     // correct size as for undocumented MSW variants cases (WinCE and perhaps others)
 223     if (bestSize.x==0)
 224         bestSize.x = bestSize.y;
 225     if (bestSize.y==0)
 226         bestSize.y = bestSize.x;
 227
 228     // double size according to layout
 229     if (is_vertical)
 230         bestSize.y *= 2;
 231     else
 232         bestSize.x *= 2;
 233
 234     return bestSize;
 235 }
 236
 237 /* static */ wxVisualAttributes
 238 wxControl::GetClassDefaultAttributes(wxWindowVariant WXUNUSED(variant))
 239 {
 240     wxVisualAttributes attrs;
 241
 242     // old school (i.e. not "common") controls use the standard dialog font
 243     // by default
 244     attrs.font = wxSystemSettings::GetFont(wxSYS_DEFAULT_GUI_FONT);
 245
 246     // most, or at least many, of the controls use the same colours as the
 247     // buttons -- others will have to override this (and possibly simply call
 248     // GetCompositeControlsDefaultAttributes() from their versions)
 249     attrs.colFg = wxSystemSettings::GetColour(wxSYS_COLOUR_BTNTEXT);
 250     attrs.colBg = wxSystemSettings::GetColour(wxSYS_COLOUR_BTNFACE);
 251
 252     return attrs;
 253 }
 254
 255 // another version for the "composite", i.e. non simple controls
 256 /* static */ wxVisualAttributes
 257 wxControl::GetCompositeControlsDefaultAttributes(wxWindowVariant WXUNUSED(variant))
 258 {
 259     wxVisualAttributes attrs;
 260     attrs.font = wxSystemSettings::GetFont(wxSYS_DEFAULT_GUI_FONT);
 261     attrs.colFg = wxSystemSettings::GetColour(wxSYS_COLOUR_WINDOWTEXT);
 262     attrs.colBg = wxSystemSettings::GetColour(wxSYS_COLOUR_WINDOW);
 263
 264     return attrs;
 265 }
 266
 267 // ----------------------------------------------------------------------------
 268 // message handling
 269 // ----------------------------------------------------------------------------
 270
 271 bool wxControl::ProcessCommand(wxCommandEvent& event)
 272 {
 273     return GetEventHandler()->ProcessEvent(event);
 274 }
 275
 276 #ifdef __WIN95__
 277 bool wxControl::MSWOnNotify(int idCtrl,
 278                             WXLPARAM lParam,
 279                             WXLPARAM* result)
 280 {
 281     wxEventType eventType wxDUMMY_INITIALIZE(wxEVT_NULL);
 282
 283     NMHDR *hdr = (NMHDR*) lParam;
 284     switch ( hdr->code )
 285     {
 286         case NM_CLICK:
 287             eventType = wxEVT_COMMAND_LEFT_CLICK;
 288             break;
 289
 290         case NM_DBLCLK:
 291             eventType = wxEVT_COMMAND_LEFT_DCLICK;
 292             break;
 293
 294         case NM_RCLICK:
 295             eventType = wxEVT_COMMAND_RIGHT_CLICK;
 296             break;
 297
 298         case NM_RDBLCLK:
 299             eventType = wxEVT_COMMAND_RIGHT_DCLICK;
 300             break;
 301
 302         case NM_SETFOCUS:
 303             eventType = wxEVT_COMMAND_SET_FOCUS;
 304             break;
 305
 306         case NM_KILLFOCUS:
 307             eventType = wxEVT_COMMAND_KILL_FOCUS;
 308             break;
 309
 310         case NM_RETURN:
 311             eventType = wxEVT_COMMAND_ENTER;
 312             break;
 313
 314         default:
 315             return wxWindow::MSWOnNotify(idCtrl, lParam, result);
 316     }
 317
 318     wxCommandEvent event(wxEVT_NULL, m_windowId);
 319     event.SetEventType(eventType);
 320     event.SetEventObject(this);
 321
 322     return GetEventHandler()->ProcessEvent(event);
 323 }
 324 #endif // Win95
 325
 326 WXHBRUSH wxControl::DoMSWControlColor(WXHDC pDC, wxColour colBg)
 327 {
 328     HDC hdc = (HDC)pDC;
 329     if ( m_hasFgCol )
 330     {
 331         ::SetTextColor(hdc, wxColourToRGB(GetForegroundColour()));
 332     }
 333
 334     // use the background colour override if a valid colour is given
 335     WXHBRUSH hbr;
 336     if ( colBg.Ok() )
 337     {
 338         ::SetBkColor(hdc, wxColourToRGB(colBg));
 339
 340         // draw children with the same colour as the parent
 341         wxBrush *brush = wxTheBrushList->FindOrCreateBrush(colBg, wxSOLID);
 342
 343         hbr = (WXHBRUSH)brush->GetResourceHandle();
 344     }
 345     else // use our own background colour and recurse upwards if necessary
 346     {
 347         hbr = MSWGetBgBrush(pDC);
 348     }
 349
 350     return hbr;
 351 }
 352
 353 WXHBRUSH wxControl::MSWControlColor(WXHDC pDC)
 354 {
 355     // by default consider that the controls text shouldn't erase the
 356     // background under it (this is true for all static controls, check boxes,
 357     // radio buttons, ...
 358     ::SetBkMode((HDC)pDC, TRANSPARENT);
 359
 360     return DoMSWControlColor(pDC, wxNullColour);
 361 }
 362
 363 WXHBRUSH wxControl::MSWControlColorDisabled(WXHDC pDC)
 364 {
 365     return DoMSWControlColor(pDC,
 366                              wxSystemSettings::GetColour(wxSYS_COLOUR_BTNFACE));
 367 }
 368
 369 // ---------------------------------------------------------------------------
 370 // global functions
 371 // ---------------------------------------------------------------------------
 372
 373 // this is used in radiobox.cpp and slider95.cpp and should be removed as soon
 374 // as it is not needed there any more!
 375 //
 376 // Call this repeatedly for several wnds to find the overall size
 377 // of the widget.
 378 // Call it initially with wxDefaultCoord for all values in rect.
 379 // Keep calling for other widgets, and rect will be modified
 380 // to calculate largest bounding rectangle.
 381 void wxFindMaxSize(WXHWND wnd, RECT *rect)
 382 {
 383     int left = rect->left;
 384     int right = rect->right;
 385     int top = rect->top;
 386     int bottom = rect->bottom;
 387
 388     GetWindowRect((HWND) wnd, rect);
 389
 390     if (left < 0)
 391         return;
 392
 393     if (left < rect->left)
 394         rect->left = left;
 395
 396     if (right > rect->right)
 397         rect->right = right;
 398
 399     if (top < rect->top)
 400         rect->top = top;
 401
 402     if (bottom > rect->bottom)
 403         rect->bottom = bottom;
 404 }
 405
 406 #endif // wxUSE_CONTROLS