]> git.saurik.com Git - wxWidgets.git/blame - src/os2/tglbtn.cpp
wxGTK1 : wx/private/eventloopsourcesmanager.h was missing in evtloop.cpp
[wxWidgets.git] / src / os2 / tglbtn.cpp
CommitLineData
322d45dd 1/////////////////////////////////////////////////////////////////////////////
f1e01716 2// Name: src/os2/tglbtn.cpp
322d45dd
DW
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
322d45dd 9// Copyright: (c) 2000 Johnny C. Norris II
526954c5 10// Licence: wxWindows licence
322d45dd
DW
11/////////////////////////////////////////////////////////////////////////////
12
13// ============================================================================
14// declatations
15// ============================================================================
16
17// ----------------------------------------------------------------------------
18// headers
19// ----------------------------------------------------------------------------
20
21#include "wx/wxprec.h"
22
23#ifdef __BORLANDC__
24 #pragma hdrstop
25#endif
26
322d45dd
DW
27#if wxUSE_TOGGLEBTN
28
f1e01716
WS
29#include "wx/tglbtn.h"
30
322d45dd
DW
31#ifndef WX_PRECOMP
32 #include "wx/button.h"
33 #include "wx/brush.h"
34 #include "wx/dcscreen.h"
35 #include "wx/settings.h"
36
37 #include "wx/log.h"
38#endif // WX_PRECOMP
39
322d45dd
DW
40// ----------------------------------------------------------------------------
41// macros
42// ----------------------------------------------------------------------------
43
44IMPLEMENT_DYNAMIC_CLASS(wxToggleButton, wxControl)
ce7fe42e 45wxDEFINE_EVENT( wxEVT_TOGGLEBUTTON, wxCommandEvent );
322d45dd
DW
46
47#define BUTTON_HEIGHT_FROM_CHAR_HEIGHT(cy) (11*EDIT_HEIGHT_FROM_CHAR_HEIGHT(cy)/10)
48
49// ============================================================================
50// implementation
51// ============================================================================
52
53// ----------------------------------------------------------------------------
54// wxToggleButton
55// ----------------------------------------------------------------------------
56
57bool wxToggleButton::OS2Command(WXUINT WXUNUSED(param), WXWORD WXUNUSED(id))
58{
ce7fe42e 59 wxCommandEvent event(wxEVT_TOGGLEBUTTON, m_windowId);
322d45dd
DW
60 event.SetInt(GetValue());
61 event.SetEventObject(this);
62 ProcessCommand(event);
63 return true;
64}
65
66// Single check box item
67bool wxToggleButton::Create(wxWindow *parent, wxWindowID id,
68 const wxString& label,
69 const wxPoint& pos,
70 const wxSize& size, long style,
71 const wxValidator& validator,
72 const wxString& name)
73{
74 if ( !CreateControl(parent, id, pos, size, style, validator, name) )
75 return false;
76
77 if ( !OS2CreateControl(wxT("BUTTON"), label, pos, size, 0) )
78 return false;
79
80 return true;
81}
82
83wxBorder wxToggleButton::GetDefaultBorder() const
84{
85 return wxBORDER_NONE;
86}
87
88WXDWORD wxToggleButton::OS2GetStyle(long style, WXDWORD *exstyle) const
89{
90 WXDWORD msStyle = wxControl::OS2GetStyle(style, exstyle);
91
92#ifndef BS_PUSHLIKE
93#define BS_PUSHLIKE 0x00001000L
94#endif
95
96 msStyle |= BS_AUTOCHECKBOX | BS_PUSHLIKE | WS_TABSTOP;
97
98 return msStyle;
99}
100
101wxSize wxToggleButton::DoGetBestSize() const
102{
103 wxString label = wxGetWindowText(GetHWND());
104 int wBtn;
105 wxFont vFont = GetFont();
106 int wChar;
107 int hChar;
108
109 GetTextExtent(label, &wBtn, NULL);
110
111
112 wxGetCharSize(GetHWND(), &wChar, &hChar, &vFont);
113
114 // add a margin - the button is wider than just its label
115 wBtn += 3*wChar;
116
117 // the button height is proportional to the height of the font used
118 int hBtn = BUTTON_HEIGHT_FROM_CHAR_HEIGHT(hChar);
119
120#if wxUSE_BUTTON
121 wxSize sz = wxButton::GetDefaultSize();
122 if (wBtn > sz.x)
123 sz.x = wBtn;
124 if (hBtn > sz.y)
125 sz.y = hBtn;
126#else
127 wxSize sz(wBtn, hBtn);
128#endif
129
130 return sz;
131}
132
133void wxToggleButton::SetValue(bool val)
134{
135 ::WinSendMsg(GetHwnd(), BM_SETCHECK, MPFROMSHORT(val), (MPARAM)0);
136}
137
138#ifndef BST_CHECKED
139#define BST_CHECKED 0x0001
140#endif
141
142bool wxToggleButton::GetValue() const
143{
144 return (::WinSendMsg(GetHwnd(), BM_QUERYCHECK, 0, 0) == (MRESULT)BST_CHECKED);
145}
146
147void wxToggleButton::Command(wxCommandEvent & event)
148{
149 SetValue((event.GetInt() != 0));
150 ProcessCommand(event);
151}
152
153#endif // wxUSE_TOGGLEBTN