1 /////////////////////////////////////////////////////////////////////////////
2 // Name: src/motif/checkbox.cpp
4 // Author: Julian Smart
8 // Copyright: (c) Julian Smart
9 // Licence: wxWindows licence
10 /////////////////////////////////////////////////////////////////////////////
12 // For compilers that support precompilation, includes "wx.h".
13 #include "wx/wxprec.h"
16 #define XtDisplay XTDISPLAY
19 #include "wx/checkbox.h"
20 #include "wx/tglbtn.h"
24 #pragma message disable nosimpint
27 #include <Xm/LabelG.h>
28 #include <Xm/ToggleB.h>
29 #include <Xm/ToggleBG.h>
31 #pragma message enable nosimpint
34 #include "wx/motif/private.h"
36 // define symbols that are missing in old versions of Motif.
37 #if wxCHECK_MOTIF_VERSION( 2, 0 )
38 #define wxHAS_3STATE 1
40 #define wxHAS_3STATE 0
44 #include "wx/motif/private.h"
46 void wxCheckBoxCallback (Widget w
, XtPointer clientData
,
49 IMPLEMENT_DYNAMIC_CLASS(wxCheckBox
, wxControl
)
51 // Single check box item
52 bool wxCheckBox::Create(wxWindow
*parent
, wxWindowID id
, const wxString
& label
,
54 const wxSize
& size
, long style
,
55 const wxValidator
& validator
,
58 if( !wxControl::CreateControl( parent
, id
, pos
, size
, style
, validator
,
62 wxString
label1(wxStripMenuCodes(label
));
63 wxXmString
text( label1
);
65 Widget parentWidget
= (Widget
) parent
->GetClientWidget();
67 m_mainWidget
= (WXWidget
) XtVaCreateManagedWidget ("toggle",
68 xmToggleButtonWidgetClass
, parentWidget
,
69 wxFont::GetFontTag(), m_font
.GetFontTypeC(XtDisplay(parentWidget
)),
70 XmNlabelString
, text(),
71 XmNrecomputeSize
, False
,
72 // XmNindicatorOn, XmINDICATOR_CHECK_BOX,
73 // XmNfillOnSelect, False,
75 XmNtoggleMode
, Is3State() ? XmTOGGLE_INDETERMINATE
: XmTOGGLE_BOOLEAN
,
79 XtAddCallback( (Widget
)m_mainWidget
,
80 XmNvalueChangedCallback
, (XtCallbackProc
)wxCheckBoxCallback
,
83 XmToggleButtonSetState ((Widget
) m_mainWidget
, False
, True
);
85 AttachWidget( parent
, m_mainWidget
, (WXWidget
)NULL
,
86 pos
.x
, pos
.y
, size
.x
, size
.y
);
88 ChangeBackgroundColour();
92 void wxCheckBox::SetValue(bool val
)
96 Set3StateValue(wxCHK_CHECKED
);
100 Set3StateValue(wxCHK_UNCHECKED
);
104 bool wxCheckBox::GetValue() const
106 return (Get3StateValue() != 0);
109 void wxCheckBox::Command (wxCommandEvent
& event
)
111 int state
= event
.GetInt();
112 wxCHECK_RET( (state
== wxCHK_UNCHECKED
) || (state
== wxCHK_CHECKED
)
113 || (state
== wxCHK_UNDETERMINED
),
114 wxT("event.GetInt() returned an invalid checkbox state") );
116 Set3StateValue((wxCheckBoxState
) state
);
117 ProcessCommand(event
);
120 void wxCheckBoxCallback (Widget
WXUNUSED(w
), XtPointer clientData
,
121 XtPointer
WXUNUSED(ptr
))
123 wxCheckBox
*item
= (wxCheckBox
*) clientData
;
125 if (item
->InSetValue())
128 wxCheckBoxState state
= item
->Get3StateValue();
130 if( !item
->Is3rdStateAllowedForUser() && state
== wxCHK_UNDETERMINED
)
132 state
= wxCHK_UNCHECKED
;
133 item
->Set3StateValue( state
);
136 wxCommandEvent
event( item
->m_evtType
, item
->GetId() );
137 event
.SetInt( (int)state
);
138 event
.SetEventObject( item
);
139 item
->ProcessCommand( event
);
142 void wxCheckBox::ChangeBackgroundColour()
144 wxComputeColours (XtDisplay((Widget
) m_mainWidget
), & m_backgroundColour
,
147 XtVaSetValues ((Widget
) m_mainWidget
,
148 XmNbackground
, g_itemColors
[wxBACK_INDEX
].pixel
,
149 XmNtopShadowColor
, g_itemColors
[wxTOPS_INDEX
].pixel
,
150 XmNbottomShadowColor
, g_itemColors
[wxBOTS_INDEX
].pixel
,
151 XmNforeground
, g_itemColors
[wxFORE_INDEX
].pixel
,
154 wxColour colour
= *wxBLACK
;
155 int selectPixel
= colour
.AllocColour(XtDisplay((Widget
)m_mainWidget
));
157 // Better to have the checkbox selection in black, or it's
158 // hard to determine what state it is in.
159 XtVaSetValues ((Widget
) m_mainWidget
,
160 XmNselectColor
, selectPixel
,
164 void wxCheckBox::DoSet3StateValue(wxCheckBoxState state
)
173 case wxCHK_UNCHECKED
: value
= XmUNSET
; break;
174 case wxCHK_CHECKED
: value
= XmSET
; break;
175 case wxCHK_UNDETERMINED
: value
= XmINDETERMINATE
; break;
176 default: wxASSERT(0); return;
179 XtVaSetValues( (Widget
) m_mainWidget
,
183 XmToggleButtonSetState ((Widget
) m_mainWidget
,
184 state
== wxCHK_CHECKED
, True
);
187 m_inSetValue
= false;
190 wxCheckBoxState
wxCheckBox::DoGet3StateValue() const
193 unsigned char value
= 0;
195 XtVaGetValues( (Widget
) m_mainWidget
,
201 case XmUNSET
: return wxCHK_UNCHECKED
;
202 case XmSET
: return wxCHK_CHECKED
;
203 case XmINDETERMINATE
: return wxCHK_UNDETERMINED
;
207 return wxCHK_UNDETERMINED
;
209 return wxCheckBoxState(XmToggleButtonGetState ((Widget
) m_mainWidget
));
213 ///////////////////////////////////////////////////////////////////////////////
215 ///////////////////////////////////////////////////////////////////////////////
219 DEFINE_EVENT_TYPE(wxEVT_COMMAND_TOGGLEBUTTON_CLICKED
)
220 IMPLEMENT_DYNAMIC_CLASS(wxToggleButton
, wxControl
)
222 bool wxToggleButton::Create( wxWindow
* parent
, wxWindowID id
,
223 const wxString
& label
,
227 const wxValidator
& val
,
228 const wxString
&name
)
230 if( !wxCheckBox::Create( parent
, id
, label
, pos
, size
, style
, val
, name
) )
233 XtVaSetValues( (Widget
)m_mainWidget
,
235 #if XmVersion >= 2000
236 XmNindicatorOn
, XmINDICATOR_NONE
,
238 XmNindicatorOn
, False
,
240 XmNfillOnSelect
, False
,
241 XmNshadowThickness
, 2,
242 XmNalignment
, XmALIGNMENT_CENTER
,
247 // set it again, because the XtVaSetValue above resets it
248 if( size
.x
!= -1 || size
.y
!= -1 )
254 #endif // wxUSE_TOGGLEBUTTON