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.
10 // Copyright: (c) 2000 Johnny C. Norris II
11 // License: wxWindows licence
12 /////////////////////////////////////////////////////////////////////////////
14 // ============================================================================
16 // ============================================================================
18 // ----------------------------------------------------------------------------
20 // ----------------------------------------------------------------------------
22 #include "wx/wxprec.h"
28 #include "wx/tglbtn.h"
33 #include "wx/button.h"
35 #include "wx/dcscreen.h"
36 #include "wx/settings.h"
41 #include "wx/msw/private.h"
43 // ----------------------------------------------------------------------------
45 // ----------------------------------------------------------------------------
47 IMPLEMENT_DYNAMIC_CLASS(wxToggleButton
, wxControl
)
48 DEFINE_EVENT_TYPE(wxEVT_COMMAND_TOGGLEBUTTON_CLICKED
)
50 #define BUTTON_HEIGHT_FROM_CHAR_HEIGHT(cy) (11*EDIT_HEIGHT_FROM_CHAR_HEIGHT(cy)/10)
52 // ============================================================================
54 // ============================================================================
56 // ----------------------------------------------------------------------------
58 // ----------------------------------------------------------------------------
60 bool wxToggleButton::OS2Command(WXUINT
WXUNUSED(param
), WXWORD
WXUNUSED(id
))
62 wxCommandEvent
event(wxEVT_COMMAND_TOGGLEBUTTON_CLICKED
, m_windowId
);
63 event
.SetInt(GetValue());
64 event
.SetEventObject(this);
65 ProcessCommand(event
);
69 // Single check box item
70 bool wxToggleButton::Create(wxWindow
*parent
, wxWindowID id
,
71 const wxString
& label
,
73 const wxSize
& size
, long style
,
74 const wxValidator
& validator
,
77 if ( !CreateControl(parent
, id
, pos
, size
, style
, validator
, name
) )
80 if ( !OS2CreateControl(wxT("BUTTON"), label
, pos
, size
, 0) )
86 wxBorder
wxToggleButton::GetDefaultBorder() const
91 WXDWORD
wxToggleButton::OS2GetStyle(long style
, WXDWORD
*exstyle
) const
93 WXDWORD msStyle
= wxControl::OS2GetStyle(style
, exstyle
);
96 #define BS_PUSHLIKE 0x00001000L
99 msStyle
|= BS_AUTOCHECKBOX
| BS_PUSHLIKE
| WS_TABSTOP
;
104 wxSize
wxToggleButton::DoGetBestSize() const
106 wxString label
= wxGetWindowText(GetHWND());
108 wxFont vFont
= GetFont();
112 GetTextExtent(label
, &wBtn
, NULL
);
115 wxGetCharSize(GetHWND(), &wChar
, &hChar
, &vFont
);
117 // add a margin - the button is wider than just its label
120 // the button height is proportional to the height of the font used
121 int hBtn
= BUTTON_HEIGHT_FROM_CHAR_HEIGHT(hChar
);
124 wxSize sz
= wxButton::GetDefaultSize();
130 wxSize
sz(wBtn
, hBtn
);
136 void wxToggleButton::SetValue(bool val
)
138 ::WinSendMsg(GetHwnd(), BM_SETCHECK
, MPFROMSHORT(val
), (MPARAM
)0);
142 #define BST_CHECKED 0x0001
145 bool wxToggleButton::GetValue() const
147 return (::WinSendMsg(GetHwnd(), BM_QUERYCHECK
, 0, 0) == (MRESULT
)BST_CHECKED
);
150 void wxToggleButton::Command(wxCommandEvent
& event
)
152 SetValue((event
.GetInt() != 0));
153 ProcessCommand(event
);
156 #endif // wxUSE_TOGGLEBTN