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 #ifdef __WXDEBUG__
 158         wxFAIL_MSG(wxString::Format
 159                    (
 160                     _T("CreateWindowEx(\"%s\", flags=%08x, ex=%08x) failed"),
 161                     classname, (unsigned int)style, (unsigned int)exstyle
 162                    ));
 163 #endif // __WXDEBUG__
 164
 165         return false;
 166     }
 167
 168     // install wxWidgets window proc for this window
 169     SubclassWin(m_hWnd);
 170
 171     // set up fonts and colours
 172     InheritAttributes();
 173     if (!m_hasFont)
 174         SetFont(GetDefaultAttributes().font);
 175
 176     // set the size now if no initial size specified
 177     SetInitialBestSize(size);
 178
 179     return true;
 180 }
 181
 182 // ----------------------------------------------------------------------------
 183 // various accessors
 184 // ----------------------------------------------------------------------------
 185
 186 wxBorder wxControl::GetDefaultBorder() const
 187 {
 188     // we want to automatically give controls a sunken style (confusingly,
 189     // it may not really mean sunken at all as we map it to WS_EX_CLIENTEDGE
 190     // which is not sunken at all under Windows XP -- rather, just the default)
 191     return wxBORDER_SUNKEN;
 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::GetBestSpinerSize(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)
 332 {
 333     HDC hdc = (HDC)pDC;
 334     if ( m_hasFgCol )
 335     {
 336         ::SetTextColor(hdc, wxColourToRGB(GetForegroundColour()));
 337     }
 338
 339     // use the background colour override if a valid colour is given
 340     WXHBRUSH hbr;
 341     if ( colBg.Ok() )
 342     {
 343         ::SetBkColor(hdc, wxColourToRGB(colBg));
 344
 345         // draw children with the same colour as the parent
 346         wxBrush *brush = wxTheBrushList->FindOrCreateBrush(colBg, wxSOLID);
 347
 348         hbr = (WXHBRUSH)brush->GetResourceHandle();
 349     }
 350     else // use our own background colour and recurse upwards if necessary
 351     {
 352         hbr = MSWGetBgBrush(pDC);
 353     }
 354
 355     return hbr;
 356 }
 357
 358 WXHBRUSH wxControl::MSWControlColor(WXHDC pDC)
 359 {
 360     // by default consider that the controls text shouldn't erase the
 361     // background under it (this is true for all static controls, check boxes,
 362     // radio buttons, ...
 363     ::SetBkMode((HDC)pDC, TRANSPARENT);
 364
 365     return DoMSWControlColor(pDC, wxNullColour);
 366 }
 367
 368 WXHBRUSH wxControl::MSWControlColorDisabled(WXHDC pDC)
 369 {
 370     return DoMSWControlColor(pDC,
 371                              wxSystemSettings::GetColour(wxSYS_COLOUR_BTNFACE));
 372 }
 373
 374 // ---------------------------------------------------------------------------
 375 // global functions
 376 // ---------------------------------------------------------------------------
 377
 378 // this is used in radiobox.cpp and slider95.cpp and should be removed as soon
 379 // as it is not needed there any more!
 380 //
 381 // Call this repeatedly for several wnds to find the overall size
 382 // of the widget.
 383 // Call it initially with wxDefaultCoord for all values in rect.
 384 // Keep calling for other widgets, and rect will be modified
 385 // to calculate largest bounding rectangle.
 386 void wxFindMaxSize(WXHWND wnd, RECT *rect)
 387 {
 388     int left = rect->left;
 389     int right = rect->right;
 390     int top = rect->top;
 391     int bottom = rect->bottom;
 392
 393     GetWindowRect((HWND) wnd, rect);
 394
 395     if (left < 0)
 396         return;
 397
 398     if (left < rect->left)
 399         rect->left = left;
 400
 401     if (right > rect->right)
 402         rect->right = right;
 403
 404     if (top < rect->top)
 405         rect->top = top;
 406
 407     if (bottom > rect->bottom)
 408         rect->bottom = bottom;
 409 }
 410
 411 #endif // wxUSE_CONTROLS