More WinCE mods
[wxWidgets.git] / src / msw / button.cpp
1 /////////////////////////////////////////////////////////////////////////////
2 // Name: msw/button.cpp
3 // Purpose: wxButton
4 // Author: Julian Smart
5 // Modified by:
6 // Created: 04/01/98
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 #ifdef __GNUG__
21 #pragma implementation "button.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_BUTTON
32
33 #ifndef WX_PRECOMP
34 #include "wx/app.h"
35 #include "wx/button.h"
36 #include "wx/brush.h"
37 #include "wx/panel.h"
38 #include "wx/bmpbuttn.h"
39 #include "wx/settings.h"
40 #include "wx/dcscreen.h"
41 #endif
42
43 #include "wx/msw/private.h"
44
45 // ----------------------------------------------------------------------------
46 // macros
47 // ----------------------------------------------------------------------------
48
49 IMPLEMENT_DYNAMIC_CLASS(wxButton, wxControl)
50
51 // this macro tries to adjust the default button height to a reasonable value
52 // using the char height as the base
53 #define BUTTON_HEIGHT_FROM_CHAR_HEIGHT(cy) (11*EDIT_HEIGHT_FROM_CHAR_HEIGHT(cy)/10)
54
55 // ============================================================================
56 // implementation
57 // ============================================================================
58
59 // ----------------------------------------------------------------------------
60 // creation/destruction
61 // ----------------------------------------------------------------------------
62
63 bool wxButton::Create(wxWindow *parent,
64 wxWindowID id,
65 const wxString& label,
66 const wxPoint& pos,
67 const wxSize& size,
68 long style,
69 const wxValidator& validator,
70 const wxString& name)
71 {
72 if ( !CreateControl(parent, id, pos, size, style, validator, name) )
73 return FALSE;
74
75 WXDWORD exstyle;
76 WXDWORD msStyle = MSWGetStyle(style, &exstyle);
77
78 #ifdef __WIN32__
79 // if the label contains several lines we must explicitly tell the button
80 // about it or it wouldn't draw it correctly ("\n"s would just appear as
81 // black boxes)
82 //
83 // NB: we do it here and not in MSWGetStyle() because we need the label
84 // value and m_label is not set yet when MSWGetStyle() is called;
85 // besides changing BS_MULTILINE during run-time is pointless anyhow
86 if ( label.find(_T('\n')) != wxString::npos )
87 {
88 msStyle |= BS_MULTILINE;
89 }
90 #endif // __WIN32__
91
92 return MSWCreateControl(_T("BUTTON"), msStyle, pos, size, label, exstyle);
93 }
94
95 wxButton::~wxButton()
96 {
97 }
98
99 // ----------------------------------------------------------------------------
100 // flags
101 // ----------------------------------------------------------------------------
102
103 WXDWORD wxButton::MSWGetStyle(long style, WXDWORD *exstyle) const
104 {
105 // buttons never have an external border, they draw their own one
106 WXDWORD msStyle = wxControl::MSWGetStyle
107 (
108 (style & ~wxBORDER_MASK) | wxBORDER_NONE, exstyle
109 );
110
111 // we must use WS_CLIPSIBLINGS with the buttons or they would draw over
112 // each other in any resizeable dialog which has more than one button in
113 // the bottom
114 msStyle |= WS_CLIPSIBLINGS;
115
116 #ifdef __WIN32__
117 // don't use "else if" here: weird as it is, but you may combine wxBU_LEFT
118 // and wxBU_RIGHT to get BS_CENTER!
119 if ( style & wxBU_LEFT )
120 msStyle |= BS_LEFT;
121 if ( style & wxBU_RIGHT )
122 msStyle |= BS_RIGHT;
123 if ( style & wxBU_TOP )
124 msStyle |= BS_TOP;
125 if ( style & wxBU_BOTTOM )
126 msStyle |= BS_BOTTOM;
127 #endif // __WIN32__
128
129 return msStyle;
130 }
131
132 // ----------------------------------------------------------------------------
133 // size management including autosizing
134 // ----------------------------------------------------------------------------
135
136 wxSize wxButton::DoGetBestSize() const
137 {
138 int wBtn;
139 GetTextExtent(wxGetWindowText(GetHWND()), &wBtn, NULL);
140
141 int wChar, hChar;
142 wxGetCharSize(GetHWND(), &wChar, &hChar, &GetFont());
143
144 // add a margin -- the button is wider than just its label
145 wBtn += 3*wChar;
146
147 // the button height is proportional to the height of the font used
148 int hBtn = BUTTON_HEIGHT_FROM_CHAR_HEIGHT(hChar);
149
150 // all buttons have at least the standard size unless the user explicitly
151 // wants them to be of smaller size and used wxBU_EXACTFIT style when
152 // creating the button
153 if ( !HasFlag(wxBU_EXACTFIT) )
154 {
155 wxSize sz = GetDefaultSize();
156 if (wBtn > sz.x)
157 sz.x = wBtn;
158 if (hBtn > sz.y)
159 sz.y = hBtn;
160
161 return sz;
162 }
163
164 return wxSize(wBtn, hBtn);
165 }
166
167 /* static */
168 wxSize wxButtonBase::GetDefaultSize()
169 {
170 static wxSize s_sizeBtn;
171
172 if ( s_sizeBtn.x == 0 )
173 {
174 wxScreenDC dc;
175 dc.SetFont(wxSystemSettings::GetFont(wxSYS_DEFAULT_GUI_FONT));
176
177 // the size of a standard button in the dialog units is 50x14,
178 // translate this to pixels
179 // NB1: the multipliers come from the Windows convention
180 // NB2: the extra +1/+2 were needed to get the size be the same as the
181 // size of the buttons in the standard dialog - I don't know how
182 // this happens, but on my system this size is 75x23 in pixels and
183 // 23*8 isn't even divisible by 14... Would be nice to understand
184 // why these constants are needed though!
185 s_sizeBtn.x = (50 * (dc.GetCharWidth() + 1))/4;
186 s_sizeBtn.y = ((14 * dc.GetCharHeight()) + 2)/8;
187 }
188
189 return s_sizeBtn;
190 }
191
192 // ----------------------------------------------------------------------------
193 // default button handling
194 // ----------------------------------------------------------------------------
195
196 /*
197 "Everything you ever wanted to know about the default buttons" or "Why do we
198 have to do all this?"
199
200 In MSW the default button should be activated when the user presses Enter
201 and the current control doesn't process Enter itself somehow. This is
202 handled by ::DefWindowProc() (or maybe ::DefDialogProc()) using DM_SETDEFID
203 Another aspect of "defaultness" is that the default button has different
204 appearance: this is due to BS_DEFPUSHBUTTON style which is completely
205 separate from DM_SETDEFID stuff (!). Also note that BS_DEFPUSHBUTTON should
206 be unset if our parent window is not active so it should be unset whenever
207 we lose activation and set back when we regain it.
208
209 Final complication is that when a button is active, it should be the default
210 one, i.e. pressing Enter on a button always activates it and not another
211 one.
212
213 We handle this by maintaining a permanent and a temporary default items in
214 wxControlContainer (both may be NULL). When a button becomes the current
215 control (i.e. gets focus) it sets itself as the temporary default which
216 ensures that it has the right appearance and that Enter will be redirected
217 to it. When the button loses focus, it unsets the temporary default and so
218 the default item will be the permanent default -- that is the default button
219 if any had been set or none otherwise, which is just what we want.
220
221 NB: all this is quite complicated by now and the worst is that normally
222 it shouldn't be necessary at all as for the normal Windows programs
223 DefWindowProc() and IsDialogMessage() take care of all this
224 automatically -- however in wxWindows programs this doesn't work for
225 nested hierarchies (i.e. a notebook inside a notebook) for unknown
226 reason and so we have to reproduce all this code ourselves. It would be
227 very nice if we could avoid doing it.
228 */
229
230 // set this button as the (permanently) default one in its panel
231 void wxButton::SetDefault()
232 {
233 wxWindow *parent = GetParent();
234
235 wxCHECK_RET( parent, _T("button without parent?") );
236
237 // set this one as the default button both for wxWindows ...
238 wxWindow *winOldDefault = parent->SetDefaultItem(this);
239
240 // ... and Windows
241 SetDefaultStyle(wxDynamicCast(winOldDefault, wxButton), FALSE);
242 SetDefaultStyle(this, TRUE);
243 }
244
245 // set this button as being currently default
246 void wxButton::SetTmpDefault()
247 {
248 wxWindow *parent = GetParent();
249
250 wxCHECK_RET( parent, _T("button without parent?") );
251
252 wxWindow *winOldDefault = parent->GetDefaultItem();
253 parent->SetTmpDefaultItem(this);
254
255 SetDefaultStyle(wxDynamicCast(winOldDefault, wxButton), FALSE);
256 SetDefaultStyle(this, TRUE);
257 }
258
259 // unset this button as currently default, it may still stay permanent default
260 void wxButton::UnsetTmpDefault()
261 {
262 wxWindow *parent = GetParent();
263
264 wxCHECK_RET( parent, _T("button without parent?") );
265
266 parent->SetTmpDefaultItem(NULL);
267
268 wxWindow *winOldDefault = parent->GetDefaultItem();
269
270 SetDefaultStyle(this, FALSE);
271 SetDefaultStyle(wxDynamicCast(winOldDefault, wxButton), TRUE);
272 }
273
274 /* static */
275 void
276 wxButton::SetDefaultStyle(wxButton *btn, bool on)
277 {
278 // we may be called with NULL pointer -- simpler to do the check here than
279 // in the caller which does wxDynamicCast()
280 if ( !btn )
281 return;
282
283 // first, let DefDlgProc() know about the new default button
284 if ( on )
285 {
286 // we shouldn't set BS_DEFPUSHBUTTON for any button if we don't have
287 // focus at all any more
288 if ( !wxTheApp->IsActive() )
289 return;
290
291 // look for a panel-like window
292 wxWindow *win = btn->GetParent();
293 while ( win && !win->HasFlag(wxTAB_TRAVERSAL) )
294 win = win->GetParent();
295
296 if ( win )
297 {
298 ::SendMessage(GetHwndOf(win), DM_SETDEFID, btn->GetId(), 0L);
299
300 // sending DM_SETDEFID also changes the button style to
301 // BS_DEFPUSHBUTTON so there is nothing more to do
302 }
303 }
304
305 // then also change the style as needed
306 long style = ::GetWindowLong(GetHwndOf(btn), GWL_STYLE);
307 if ( !(style & BS_DEFPUSHBUTTON) == on )
308 {
309 // don't do it with the owner drawn buttons because it will
310 // reset BS_OWNERDRAW style bit too (as BS_OWNERDRAW &
311 // BS_DEFPUSHBUTTON != 0)!
312 if ( (style & BS_OWNERDRAW) != BS_OWNERDRAW )
313 {
314 ::SendMessage(GetHwndOf(btn), BM_SETSTYLE,
315 on ? style | BS_DEFPUSHBUTTON
316 : style & ~BS_DEFPUSHBUTTON,
317 1L /* redraw */);
318 }
319 else // owner drawn
320 {
321 // redraw the button - it will notice itself that it's
322 // [not] the default one [any longer]
323 btn->Refresh();
324 }
325 }
326 //else: already has correct style
327 }
328
329 // ----------------------------------------------------------------------------
330 // helpers
331 // ----------------------------------------------------------------------------
332
333 bool wxButton::SendClickEvent()
334 {
335 wxCommandEvent event(wxEVT_COMMAND_BUTTON_CLICKED, GetId());
336 event.SetEventObject(this);
337
338 return ProcessCommand(event);
339 }
340
341 void wxButton::Command(wxCommandEvent & event)
342 {
343 ProcessCommand(event);
344 }
345
346 // ----------------------------------------------------------------------------
347 // event/message handlers
348 // ----------------------------------------------------------------------------
349
350 bool wxButton::MSWCommand(WXUINT param, WXWORD WXUNUSED(id))
351 {
352 bool processed = FALSE;
353 switch ( param )
354 {
355 // NOTE: Apparently older versions (NT 4?) of the common controls send
356 // BN_DOUBLECLICKED but not a second BN_CLICKED for owner-drawn
357 // buttons, so in order to send two EVET_BUTTON events we should
358 // catch both types. Currently (Feb 2003) up-to-date versions of
359 // win98, win2k and winXP all send two BN_CLICKED messages for
360 // all button types, so we don't catch BN_DOUBLECLICKED anymore
361 // in order to not get 3 EVT_BUTTON events. If this is a problem
362 // then we need to figure out which version of the comctl32 changed
363 // this behaviour and test for it.
364
365 case 1: // message came from an accelerator
366 case BN_CLICKED: // normal buttons send this
367 processed = SendClickEvent();
368 break;
369 }
370
371 return processed;
372 }
373
374 long wxButton::MSWWindowProc(WXUINT nMsg, WXWPARAM wParam, WXLPARAM lParam)
375 {
376 // when we receive focus, we want to temporary become the default button in
377 // our parent panel so that pressing "Enter" would activate us -- and when
378 // losing it we should restore the previous default button as well
379 if ( nMsg == WM_SETFOCUS )
380 {
381 SetTmpDefault();
382
383 // let the default processing take place too
384 }
385 else if ( nMsg == WM_KILLFOCUS )
386 {
387 UnsetTmpDefault();
388 }
389 else if ( nMsg == WM_LBUTTONDBLCLK )
390 {
391 // emulate a click event to force an owner-drawn button to change its
392 // appearance - without this, it won't do it
393 (void)wxControl::MSWWindowProc(WM_LBUTTONDOWN, wParam, lParam);
394
395 // and continue with processing the message normally as well
396 }
397
398 // let the base class do all real processing
399 return wxControl::MSWWindowProc(nMsg, wParam, lParam);
400 }
401
402 // ----------------------------------------------------------------------------
403 // owner-drawn buttons support
404 // ----------------------------------------------------------------------------
405
406 #ifdef __WIN32__
407
408 // drawing helpers
409
410 static void DrawButtonText(HDC hdc,
411 RECT *pRect,
412 const wxString& text,
413 COLORREF col)
414 {
415 COLORREF colOld = SetTextColor(hdc, col);
416 int modeOld = SetBkMode(hdc, TRANSPARENT);
417
418 // Note: we must have DT_SINGLELINE for DT_VCENTER to work.
419 ::DrawText(hdc, text, text.length(), pRect, DT_SINGLELINE | DT_CENTER | DT_VCENTER);
420
421 SetBkMode(hdc, modeOld);
422 SetTextColor(hdc, colOld);
423 }
424
425 static void DrawRect(HDC hdc, const RECT& r)
426 {
427 wxDrawLine(hdc, r.left, r.top, r.right, r.top);
428 wxDrawLine(hdc, r.right, r.top, r.right, r.bottom);
429 wxDrawLine(hdc, r.right, r.bottom, r.left, r.bottom);
430 wxDrawLine(hdc, r.left, r.bottom, r.left, r.top);
431 }
432
433 void wxButton::MakeOwnerDrawn()
434 {
435 long style = GetWindowLong(GetHwnd(), GWL_STYLE);
436 if ( (style & BS_OWNERDRAW) != BS_OWNERDRAW )
437 {
438 // make it so
439 style |= BS_OWNERDRAW;
440 SetWindowLong(GetHwnd(), GWL_STYLE, style);
441 }
442 }
443
444 bool wxButton::SetBackgroundColour(const wxColour &colour)
445 {
446 if ( !wxControl::SetBackgroundColour(colour) )
447 {
448 // nothing to do
449 return FALSE;
450 }
451
452 MakeOwnerDrawn();
453
454 Refresh();
455
456 return TRUE;
457 }
458
459 bool wxButton::SetForegroundColour(const wxColour &colour)
460 {
461 if ( !wxControl::SetForegroundColour(colour) )
462 {
463 // nothing to do
464 return FALSE;
465 }
466
467 MakeOwnerDrawn();
468
469 Refresh();
470
471 return TRUE;
472 }
473
474 /*
475 The button frame looks like this normally:
476
477 WWWWWWWWWWWWWWWWWWB
478 WHHHHHHHHHHHHHHHHGB W = white (HILIGHT)
479 WH GB H = light grey (LIGHT)
480 WH GB G = dark grey (SHADOW)
481 WH GB B = black (DKSHADOW)
482 WH GB
483 WGGGGGGGGGGGGGGGGGB
484 BBBBBBBBBBBBBBBBBBB
485
486 When the button is selected, the button becomes like this (the total button
487 size doesn't change):
488
489 BBBBBBBBBBBBBBBBBBB
490 BWWWWWWWWWWWWWWWWBB
491 BWHHHHHHHHHHHHHHGBB
492 BWH GBB
493 BWH GBB
494 BWGGGGGGGGGGGGGGGBB
495 BBBBBBBBBBBBBBBBBBB
496 BBBBBBBBBBBBBBBBBBB
497
498 When the button is pushed (while selected) it is like:
499
500 BBBBBBBBBBBBBBBBBBB
501 BGGGGGGGGGGGGGGGGGB
502 BG GB
503 BG GB
504 BG GB
505 BG GB
506 BGGGGGGGGGGGGGGGGGB
507 BBBBBBBBBBBBBBBBBBB
508 */
509
510 static void DrawButtonFrame(HDC hdc, const RECT& rectBtn,
511 bool selected, bool pushed)
512 {
513 RECT r;
514 CopyRect(&r, &rectBtn);
515
516 HPEN hpenBlack = CreatePen(PS_SOLID, 1, GetSysColor(COLOR_3DDKSHADOW)),
517 hpenGrey = CreatePen(PS_SOLID, 1, GetSysColor(COLOR_3DSHADOW)),
518 hpenLightGr = CreatePen(PS_SOLID, 1, GetSysColor(COLOR_3DLIGHT)),
519 hpenWhite = CreatePen(PS_SOLID, 1, GetSysColor(COLOR_3DHILIGHT));
520
521 HPEN hpenOld = (HPEN)SelectObject(hdc, hpenBlack);
522
523 r.right--;
524 r.bottom--;
525
526 if ( pushed )
527 {
528 DrawRect(hdc, r);
529
530 (void)SelectObject(hdc, hpenGrey);
531 InflateRect(&r, -1, -1);
532
533 DrawRect(hdc, r);
534 }
535 else // !pushed
536 {
537 if ( selected )
538 {
539 DrawRect(hdc, r);
540
541 InflateRect(&r, -1, -1);
542 }
543
544 wxDrawLine(hdc, r.left, r.bottom, r.right, r.bottom);
545 wxDrawLine(hdc, r.right, r.bottom, r.right, r.top - 1);
546
547 (void)SelectObject(hdc, hpenWhite);
548 wxDrawLine(hdc, r.left, r.bottom - 1, r.left, r.top);
549 wxDrawLine(hdc, r.left, r.top, r.right, r.top);
550
551 (void)SelectObject(hdc, hpenLightGr);
552 wxDrawLine(hdc, r.left + 1, r.bottom - 2, r.left + 1, r.top + 1);
553 wxDrawLine(hdc, r.left + 1, r.top + 1, r.right - 1, r.top + 1);
554
555 (void)SelectObject(hdc, hpenGrey);
556 wxDrawLine(hdc, r.left + 1, r.bottom - 1, r.right - 1, r.bottom - 1);
557 wxDrawLine(hdc, r.right - 1, r.bottom - 1, r.right - 1, r.top);
558 }
559
560 (void)SelectObject(hdc, hpenOld);
561 DeleteObject(hpenWhite);
562 DeleteObject(hpenLightGr);
563 DeleteObject(hpenGrey);
564 DeleteObject(hpenBlack);
565 }
566
567 bool wxButton::MSWOnDraw(WXDRAWITEMSTRUCT *wxdis)
568 {
569 LPDRAWITEMSTRUCT lpDIS = (LPDRAWITEMSTRUCT)wxdis;
570
571 RECT rectBtn;
572 CopyRect(&rectBtn, &lpDIS->rcItem);
573
574 COLORREF colBg = wxColourToRGB(GetBackgroundColour()),
575 colFg = wxColourToRGB(GetForegroundColour());
576
577 HDC hdc = lpDIS->hDC;
578 UINT state = lpDIS->itemState;
579
580 // first, draw the background
581 HBRUSH hbrushBackground = ::CreateSolidBrush(colBg);
582
583 FillRect(hdc, &rectBtn, hbrushBackground);
584
585 // draw the border for the current state
586 bool selected = (state & ODS_SELECTED) != 0;
587 if ( !selected )
588 {
589 wxPanel *panel = wxDynamicCast(GetParent(), wxPanel);
590 if ( panel )
591 {
592 selected = panel->GetDefaultItem() == this;
593 }
594 }
595 bool pushed = (SendMessage(GetHwnd(), BM_GETSTATE, 0, 0) & BST_PUSHED) != 0;
596
597 DrawButtonFrame(hdc, rectBtn, selected, pushed);
598
599 // draw the focus rect if needed
600 if ( state & ODS_FOCUS )
601 {
602 RECT rectFocus;
603 CopyRect(&rectFocus, &rectBtn);
604
605 // I don't know where does this constant come from, but this is how
606 // Windows draws them
607 InflateRect(&rectFocus, -4, -4);
608
609 DrawFocusRect(hdc, &rectFocus);
610 }
611
612 if ( pushed )
613 {
614 // the label is shifted by 1 pixel to create "pushed" effect
615 OffsetRect(&rectBtn, 1, 1);
616 }
617
618 DrawButtonText(hdc, &rectBtn, GetLabel(),
619 state & ODS_DISABLED ? GetSysColor(COLOR_GRAYTEXT)
620 : colFg);
621
622 ::DeleteObject(hbrushBackground);
623
624 return TRUE;
625 }
626
627 #endif // __WIN32__
628
629 #endif // wxUSE_BUTTON
630