1 /////////////////////////////////////////////////////////////////////////////
2 // Name:        src/msw/tglbtn.cpp
3 // Purpose:     Definition of the wxToggleButton class, which implements a
4 //              toggle button under wxMSW.
5 // Author:      John Norris, minor changes by Axel Schlueter
6 //              and William Gallafent.
7 // Modified by:
8 // Created:     08.02.01
9 // RCS-ID:      $Id: tglbtn.cpp 41632 2006-10-04 23:02:13Z VZ $
10 // Copyright:   (c) 2000 Johnny C. Norris II
11 // License:     wxWindows licence
12 /////////////////////////////////////////////////////////////////////////////
13 
14 // ============================================================================
15 // declarations
16 // ============================================================================
17 
18 // ----------------------------------------------------------------------------
19 // headers
20 // ----------------------------------------------------------------------------
21 
22 #include "wx/wxprec.h"
23 
24 #ifdef __BORLANDC__
25     #pragma hdrstop
26 #endif
27 
28 #if wxUSE_TOGGLEBTN
29 
30 #include "wx/tglbtn.h"
31 
32 #ifndef WX_PRECOMP
33     #include "wx/button.h"
34     #include "wx/brush.h"
35     #include "wx/dcscreen.h"
36     #include "wx/settings.h"
37 
38     #include "wx/log.h"
39 #endif // WX_PRECOMP
40 
41 #include "wx/msw/private.h"
42 
43 // ----------------------------------------------------------------------------
44 // macros
45 // ----------------------------------------------------------------------------
46 
IMPLEMENT_DYNAMIC_CLASS(wxToggleButton,wxControl)47 IMPLEMENT_DYNAMIC_CLASS(wxToggleButton, wxControl)
48 DEFINE_EVENT_TYPE(wxEVT_COMMAND_TOGGLEBUTTON_CLICKED)
49 
50 #define BUTTON_HEIGHT_FROM_CHAR_HEIGHT(cy) (11*EDIT_HEIGHT_FROM_CHAR_HEIGHT(cy)/10)
51 
52 // ============================================================================
53 // implementation
54 // ============================================================================
55 
56 // ----------------------------------------------------------------------------
57 // wxToggleButton
58 // ----------------------------------------------------------------------------
59 
60 bool wxToggleButton::MSWCommand(WXUINT WXUNUSED(param), WXWORD WXUNUSED(id))
61 {
62    wxCommandEvent event(wxEVT_COMMAND_TOGGLEBUTTON_CLICKED, m_windowId);
63    event.SetInt(GetValue());
64    event.SetEventObject(this);
65    ProcessCommand(event);
66    return true;
67 }
68 
69 // Single check box item
Create(wxWindow * parent,wxWindowID id,const wxString & label,const wxPoint & pos,const wxSize & size,long style,const wxValidator & validator,const wxString & name)70 bool wxToggleButton::Create(wxWindow *parent, wxWindowID id,
71                             const wxString& label,
72                             const wxPoint& pos,
73                             const wxSize& size, long style,
74                             const wxValidator& validator,
75                             const wxString& name)
76 {
77     if ( !CreateControl(parent, id, pos, size, style, validator, name) )
78         return false;
79 
80     if ( !MSWCreateControl(wxT("BUTTON"), label, pos, size) )
81       return false;
82 
83     return true;
84 }
85 
GetDefaultBorder() const86 wxBorder wxToggleButton::GetDefaultBorder() const
87 {
88     return wxBORDER_NONE;
89 }
90 
MSWGetStyle(long style,WXDWORD * exstyle) const91 WXDWORD wxToggleButton::MSWGetStyle(long style, WXDWORD *exstyle) const
92 {
93     WXDWORD msStyle = wxControl::MSWGetStyle(style, exstyle);
94 
95 #ifndef BS_PUSHLIKE
96 #define BS_PUSHLIKE 0x00001000L
97 #endif
98 
99     msStyle |= BS_AUTOCHECKBOX | BS_PUSHLIKE | WS_TABSTOP;
100 
101     if(style & wxBU_LEFT)
102       msStyle |= BS_LEFT;
103     if(style & wxBU_RIGHT)
104       msStyle |= BS_RIGHT;
105     if(style & wxBU_TOP)
106       msStyle |= BS_TOP;
107     if(style & wxBU_BOTTOM)
108       msStyle |= BS_BOTTOM;
109 
110     return msStyle;
111 }
112 
DoGetBestSize() const113 wxSize wxToggleButton::DoGetBestSize() const
114 {
115    wxString label = wxGetWindowText(GetHWND());
116    int wBtn;
117    GetTextExtent(GetLabelText(label), &wBtn, NULL);
118 
119    int wChar, hChar;
120    wxGetCharSize(GetHWND(), &wChar, &hChar, GetFont());
121 
122    // add a margin - the button is wider than just its label
123    wBtn += 3*wChar;
124 
125    // the button height is proportional to the height of the font used
126    int hBtn = BUTTON_HEIGHT_FROM_CHAR_HEIGHT(hChar);
127 
128 #if wxUSE_BUTTON
129    // make all buttons of at least standard size unless wxBU_EXACTFIT is given
130    if ( !HasFlag(wxBU_EXACTFIT) )
131    {
132        const wxSize szMin = wxButton::GetDefaultSize();
133        if ( wBtn < szMin.x )
134            wBtn = szMin.x;
135        if ( hBtn < szMin.y )
136            hBtn = szMin.y;
137    }
138 #endif // wxUSE_BUTTON
139 
140    wxSize sz(wBtn, hBtn);
141 
142    CacheBestSize(sz);
143    return sz;
144 }
145 
SetValue(bool val)146 void wxToggleButton::SetValue(bool val)
147 {
148    ::SendMessage(GetHwnd(), BM_SETCHECK, val, 0);
149 }
150 
151 #ifndef BST_CHECKED
152 #define BST_CHECKED 0x0001
153 #endif
154 
GetValue() const155 bool wxToggleButton::GetValue() const
156 {
157 #ifdef __WIN32__
158    return (::SendMessage(GetHwnd(), BM_GETCHECK, 0, 0) == BST_CHECKED);
159 #else
160    return ((0x001 & ::SendMessage(GetHwnd(), BM_GETCHECK, 0, 0)) == 0x001);
161 #endif
162 }
163 
Command(wxCommandEvent & event)164 void wxToggleButton::Command(wxCommandEvent & event)
165 {
166    SetValue((event.GetInt() != 0));
167    ProcessCommand(event);
168 }
169 
170 #endif // wxUSE_TOGGLEBTN
171