]> git.saurik.com Git - wxWidgets.git/blame - src/msw/tglbtn.cpp
really show the window after creation (calling Show(TRUE) doesn't do it any more)
[wxWidgets.git] / src / msw / tglbtn.cpp
CommitLineData
1db8dc4a
VZ
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// Modified by:
7// Created: 08.02.01
8// RCS-ID: $Id$
9// Copyright: (c) 2000 Johnny C. Norris II
10// License: Rocketeer license
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
27#include "wx/tglbtn.h"
28
29#if wxUSE_TOGGLEBTN
30
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
40#include "wx/msw/private.h"
41
42// ----------------------------------------------------------------------------
43// macros
44// ----------------------------------------------------------------------------
45
46IMPLEMENT_DYNAMIC_CLASS(wxToggleButton, wxControl)
47DEFINE_EVENT_TYPE(wxEVT_COMMAND_TOGGLEBUTTON_CLICKED)
48
49#define BUTTON_HEIGHT_FROM_CHAR_HEIGHT(cy) (11*EDIT_HEIGHT_FROM_CHAR_HEIGHT(cy)/10)
50
51// ============================================================================
52// implementation
53// ============================================================================
54
55// ----------------------------------------------------------------------------
56// wxToggleButton
57// ----------------------------------------------------------------------------
58
59bool wxToggleButton::MSWCommand(WXUINT WXUNUSED(param), WXWORD WXUNUSED(id))
60{
61 wxCommandEvent event(wxEVT_COMMAND_TOGGLEBUTTON_CLICKED, m_windowId);
62 event.SetInt(GetValue());
63 event.SetEventObject(this);
64 ProcessCommand(event);
65 return TRUE;
66}
67
68// Single check box item
69bool wxToggleButton::Create(wxWindow *parent, wxWindowID id,
70 const wxString& label,
71 const wxPoint& pos,
72 const wxSize& size, long style,
73 const wxValidator& validator,
74 const wxString& name)
75{
983d2e14
JS
76 // default border for this control is none
77 if ( (style & wxBORDER_MASK) == wxBORDER_DEFAULT )
78 {
79 style |= wxBORDER_NONE;
80 }
81
1db8dc4a
VZ
82 if (!CreateBase(parent, id, pos, size, style, validator, name))
83 return FALSE;
84
85 parent->AddChild(this);
86
87 m_backgroundColour = parent->GetBackgroundColour();
88 m_foregroundColour = parent->GetForegroundColour();
89
788722ac
JS
90#ifndef BS_PUSHLIKE
91#define BS_PUSHLIKE 0x00001000L
92#endif
93
fe3d9123
JS
94 WXDWORD exStyle = 0;
95 long msStyle = MSWGetStyle(style, & exStyle) ;
b0766406 96
acd42a23 97 msStyle |= BS_AUTOCHECKBOX | BS_PUSHLIKE | WS_TABSTOP ;
b0766406 98
1db8dc4a
VZ
99#ifdef __WIN32__
100 if(m_windowStyle & wxBU_LEFT)
101 msStyle |= BS_LEFT;
102 if(m_windowStyle & wxBU_RIGHT)
103 msStyle |= BS_RIGHT;
104 if(m_windowStyle & wxBU_TOP)
105 msStyle |= BS_TOP;
106 if(m_windowStyle & wxBU_BOTTOM)
107 msStyle |= BS_BOTTOM;
108#endif
109
fe3d9123 110 m_hWnd = (WXHWND)CreateWindowEx(exStyle,
1db8dc4a
VZ
111 wxT("BUTTON"), label,
112 msStyle, 0, 0, 0, 0,
113 (HWND)parent->GetHWND(),
114 (HMENU)m_windowId,
115 wxGetInstance(), NULL);
116
117 if ( m_hWnd == 0 )
118 {
119 wxLogError(_T("Failed to create a toggle button"));
120
121 return FALSE;
122 }
123
124 // Subclass again for purposes of dialog editing mode
125 SubclassWin(m_hWnd);
126
127 SetFont(parent->GetFont());
128
129 SetSize(pos.x, pos.y, size.x, size.y);
130
131 return TRUE;
132}
133
134void wxToggleButton::SetLabel(const wxString& label)
135{
136 SetWindowText(GetHwnd(), label);
137}
138
139wxSize wxToggleButton::DoGetBestSize() const
140{
141 wxString label = wxGetWindowText(GetHWND());
142 int wBtn;
143 GetTextExtent(label, &wBtn, NULL);
144
145 int wChar, hChar;
146 wxGetCharSize(GetHWND(), &wChar, &hChar, &GetFont());
147
148 // add a margin - the button is wider than just its label
149 wBtn += 3*wChar;
150
151 // the button height is proportional to the height of the font used
152 int hBtn = BUTTON_HEIGHT_FROM_CHAR_HEIGHT(hChar);
153
154 wxSize sz = wxButton::GetDefaultSize();
155 if (wBtn > sz.x)
156 sz.x = wBtn;
157 if (hBtn > sz.y)
158 sz.y = hBtn;
159
160 return sz;
161}
162
163void wxToggleButton::SetValue(bool val)
164{
165 SendMessage(GetHwnd(), BM_SETCHECK, val, 0);
166}
167
168#ifndef BST_CHECKED
169#define BST_CHECKED 0x0001
170#endif
171
172bool wxToggleButton::GetValue() const
173{
174#ifdef __WIN32__
175 return (SendMessage(GetHwnd(), BM_GETCHECK, 0, 0) == BST_CHECKED);
176#else
177 return ((0x001 & SendMessage(GetHwnd(), BM_GETCHECK, 0, 0)) == 0x001);
178#endif
179}
180
181void wxToggleButton::Command(wxCommandEvent & event)
182{
183 SetValue((event.GetInt() != 0));
184 ProcessCommand(event);
185}
186
187#endif // wxUSE_TOGGLEBTN
188