]> git.saurik.com Git - wxWidgets.git/blame_incremental - src/motif/checkbox.cpp
changed wxFileSelector() etc. functions to use wxString (so that any forms of strings...
[wxWidgets.git] / src / motif / checkbox.cpp
... / ...
CommitLineData
1/////////////////////////////////////////////////////////////////////////////
2// Name: src/motif/checkbox.cpp
3// Purpose: wxCheckBox
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// For compilers that support precompilation, includes "wx.h".
13#include "wx/wxprec.h"
14
15#ifdef __VMS
16#define XtDisplay XTDISPLAY
17#endif
18
19#include "wx/checkbox.h"
20
21#ifndef WX_PRECOMP
22 #include "wx/utils.h"
23#endif
24
25#include "wx/tglbtn.h"
26
27#ifdef __VMS__
28#pragma message disable nosimpint
29#endif
30#include <Xm/Label.h>
31#include <Xm/LabelG.h>
32#include <Xm/ToggleB.h>
33#include <Xm/ToggleBG.h>
34#ifdef __VMS__
35#pragma message enable nosimpint
36#endif
37
38#include "wx/motif/private.h"
39
40// define symbols that are missing in old versions of Motif.
41#if wxCHECK_MOTIF_VERSION( 2, 0 )
42 #define wxHAS_3STATE 1
43#else
44 #define wxHAS_3STATE 0
45#endif
46
47#include "wx/motif/private.h"
48
49void wxCheckBoxCallback (Widget w, XtPointer clientData,
50 XtPointer ptr);
51
52IMPLEMENT_DYNAMIC_CLASS(wxCheckBox, wxControl)
53
54// Single check box item
55bool wxCheckBox::Create(wxWindow *parent, wxWindowID id, const wxString& label,
56 const wxPoint& pos,
57 const wxSize& size, long style,
58 const wxValidator& validator,
59 const wxString& name)
60{
61 if( !wxControl::CreateControl( parent, id, pos, size, style, validator,
62 name ) )
63 return false;
64 PreCreation();
65
66 wxXmString text( GetLabelText(label) );
67
68 Widget parentWidget = (Widget) parent->GetClientWidget();
69
70 m_mainWidget = (WXWidget) XtVaCreateManagedWidget ("toggle",
71 xmToggleButtonWidgetClass, parentWidget,
72 wxFont::GetFontTag(), m_font.GetFontTypeC(XtDisplay(parentWidget)),
73 XmNlabelString, text(),
74 XmNrecomputeSize, False,
75 // XmNindicatorOn, XmINDICATOR_CHECK_BOX,
76 // XmNfillOnSelect, False,
77#if wxHAS_3STATE
78 XmNtoggleMode, Is3State() ? XmTOGGLE_INDETERMINATE : XmTOGGLE_BOOLEAN,
79#endif
80 NULL);
81
82 XtAddCallback( (Widget)m_mainWidget,
83 XmNvalueChangedCallback, (XtCallbackProc)wxCheckBoxCallback,
84 (XtPointer)this );
85
86 XmToggleButtonSetState ((Widget) m_mainWidget, False, True);
87
88 PostCreation();
89 AttachWidget( parent, m_mainWidget, (WXWidget)NULL,
90 pos.x, pos.y, size.x, size.y );
91
92 return true;
93}
94
95void wxCheckBox::SetValue(bool val)
96{
97 if (val)
98 {
99 Set3StateValue(wxCHK_CHECKED);
100 }
101 else
102 {
103 Set3StateValue(wxCHK_UNCHECKED);
104 }
105}
106
107bool wxCheckBox::GetValue() const
108{
109 return (Get3StateValue() != 0);
110}
111
112void wxCheckBox::Command (wxCommandEvent & event)
113{
114 int state = event.GetInt();
115 wxCHECK_RET( (state == wxCHK_UNCHECKED) || (state == wxCHK_CHECKED)
116 || (state == wxCHK_UNDETERMINED),
117 wxT("event.GetInt() returned an invalid checkbox state") );
118
119 Set3StateValue((wxCheckBoxState) state);
120 ProcessCommand(event);
121}
122
123void wxCheckBoxCallback (Widget WXUNUSED(w), XtPointer clientData,
124 XtPointer WXUNUSED(ptr))
125{
126 wxCheckBox *item = (wxCheckBox *) clientData;
127
128 if (item->InSetValue())
129 return;
130
131 wxCheckBoxState state = item->Get3StateValue();
132
133 if( !item->Is3rdStateAllowedForUser() && state == wxCHK_UNDETERMINED )
134 {
135 state = wxCHK_UNCHECKED;
136 item->Set3StateValue( state );
137 }
138
139 wxCommandEvent event( item->m_evtType, item->GetId() );
140 event.SetInt( (int)state );
141 event.SetEventObject( item );
142 item->ProcessCommand( event );
143}
144
145void wxCheckBox::ChangeBackgroundColour()
146{
147 if (!m_backgroundColour.Ok())
148 return;
149
150 wxComputeColours (XtDisplay((Widget) m_mainWidget), & m_backgroundColour,
151 (wxColour*) NULL);
152
153 XtVaSetValues ((Widget) m_mainWidget,
154 XmNbackground, g_itemColors[wxBACK_INDEX].pixel,
155 XmNtopShadowColor, g_itemColors[wxTOPS_INDEX].pixel,
156 XmNbottomShadowColor, g_itemColors[wxBOTS_INDEX].pixel,
157 XmNforeground, g_itemColors[wxFORE_INDEX].pixel,
158 NULL);
159
160 wxColour colour = *wxBLACK;
161 WXPixel selectPixel = colour.AllocColour(XtDisplay((Widget)m_mainWidget));
162
163 // Better to have the checkbox selection in black, or it's
164 // hard to determine what state it is in.
165 XtVaSetValues ((Widget) m_mainWidget,
166 XmNselectColor, selectPixel,
167 NULL);
168}
169
170void wxCheckBox::DoSet3StateValue(wxCheckBoxState state)
171{
172 m_inSetValue = true;
173
174#if wxHAS_3STATE
175 unsigned char value;
176
177 switch (state)
178 {
179 case wxCHK_UNCHECKED: value = XmUNSET; break;
180 case wxCHK_CHECKED: value = XmSET; break;
181 case wxCHK_UNDETERMINED: value = XmINDETERMINATE; break;
182 default: wxASSERT(0); return;
183 }
184
185 XtVaSetValues( (Widget) m_mainWidget,
186 XmNset, value,
187 NULL );
188#else
189 XmToggleButtonSetState ((Widget) m_mainWidget,
190 state == wxCHK_CHECKED, True);
191#endif
192
193 m_inSetValue = false;
194}
195
196wxCheckBoxState wxCheckBox::DoGet3StateValue() const
197{
198#if wxHAS_3STATE
199 unsigned char value = 0;
200
201 XtVaGetValues( (Widget) m_mainWidget,
202 XmNset, &value,
203 NULL );
204
205 switch (value)
206 {
207 case XmUNSET: return wxCHK_UNCHECKED;
208 case XmSET: return wxCHK_CHECKED;
209 case XmINDETERMINATE: return wxCHK_UNDETERMINED;
210 }
211
212 // impossible...
213 return wxCHK_UNDETERMINED;
214#else
215 return wxCheckBoxState(XmToggleButtonGetState ((Widget) m_mainWidget));
216#endif
217}
218
219///////////////////////////////////////////////////////////////////////////////
220// wxToggleButton
221///////////////////////////////////////////////////////////////////////////////
222
223#if wxUSE_TOGGLEBTN
224
225DEFINE_EVENT_TYPE(wxEVT_COMMAND_TOGGLEBUTTON_CLICKED)
226IMPLEMENT_DYNAMIC_CLASS(wxToggleButton, wxControl)
227
228bool wxToggleButton::Create( wxWindow* parent, wxWindowID id,
229 const wxString& label,
230 const wxPoint& pos,
231 const wxSize& size,
232 long style,
233 const wxValidator& val,
234 const wxString &name )
235{
236 if( !wxCheckBox::Create( parent, id, label, pos, size, style, val, name ) )
237 return false;
238
239 XtVaSetValues( (Widget)m_mainWidget,
240 XmNindicatorSize, 0,
241#if XmVersion >= 2000
242 XmNindicatorOn, XmINDICATOR_NONE,
243#else
244 XmNindicatorOn, False,
245#endif
246 XmNfillOnSelect, False,
247 XmNshadowThickness, 2,
248 XmNalignment, XmALIGNMENT_CENTER,
249 XmNmarginLeft, 0,
250 XmNmarginRight, 0,
251 NULL );
252
253 // set it again, because the XtVaSetValue above resets it
254 if( size.x != -1 || size.y != -1 )
255 SetSize( size );
256
257 return true;
258}
259
260#endif // wxUSE_TOGGLEBUTTON