]> git.saurik.com Git - wxWidgets.git/blob - src/msw/control.cpp
added possibility to throw different objects and crash directly from the main frame...
[wxWidgets.git] / 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::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)
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