]> git.saurik.com Git - wxWidgets.git/blob - src/motif/radiobox.cpp
allow dynamically changing most of text control styles in wxGTK
[wxWidgets.git] / src / motif / radiobox.cpp
1 /////////////////////////////////////////////////////////////////////////////
2 // Name: src/motif/radiobox.cpp
3 // Purpose: wxRadioBox
4 // Author: Julian Smart
5 // Modified by:
6 // Created: 17/09/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 #if wxUSE_RADIOBOX
16
17 #ifdef __VMS
18 #define XtDisplay XTDISPLAY
19 #endif
20
21 #include "wx/radiobox.h"
22
23 #ifndef WX_PRECOMP
24 #include "wx/utils.h"
25 #include "wx/arrstr.h"
26 #endif
27
28 #ifdef __VMS__
29 #pragma message disable nosimpint
30 #endif
31 #include <Xm/Label.h>
32 #include <Xm/LabelG.h>
33 #include <Xm/ToggleB.h>
34 #include <Xm/ToggleBG.h>
35 #include <Xm/RowColumn.h>
36 #include <Xm/Frame.h>
37 #ifdef __VMS__
38 #pragma message enable nosimpint
39 #endif
40
41 #include "wx/motif/private.h"
42
43 void wxRadioBoxCallback (Widget w, XtPointer clientData,
44 XmToggleButtonCallbackStruct * cbs);
45
46 IMPLEMENT_DYNAMIC_CLASS(wxRadioBox, wxControl)
47
48 // Radio box item
49 void wxRadioBox::Init()
50 {
51 m_selectedButton = -1;
52 m_noItems = 0;
53 m_noRowsOrCols = 0;
54 }
55
56 bool wxRadioBox::Create(wxWindow *parent, wxWindowID id, const wxString& title,
57 const wxPoint& pos, const wxSize& size,
58 int n, const wxString choices[],
59 int majorDim, long style,
60 const wxValidator& val, const wxString& name)
61 {
62 if( !CreateControl( parent, id, pos, size, style, val, name ) )
63 return false;
64
65 m_noItems = (unsigned int)n;
66 m_noRowsOrCols = majorDim;
67
68 SetMajorDim(majorDim == 0 ? n : majorDim, style);
69
70 Widget parentWidget = (Widget) parent->GetClientWidget();
71 Display* dpy = XtDisplay(parentWidget);
72
73 m_mainWidget = XtVaCreateWidget ("radioboxframe",
74 xmFrameWidgetClass, parentWidget,
75 XmNresizeHeight, True,
76 XmNresizeWidth, True,
77 NULL);
78
79 wxString label1(GetLabelText(title));
80
81 if (!label1.empty())
82 {
83 wxXmString text(label1);
84 m_labelWidget = (WXWidget)
85 XtVaCreateManagedWidget( label1.c_str(),
86 #if wxUSE_GADGETS
87 style & wxCOLOURED ? xmLabelWidgetClass
88 : xmLabelGadgetClass,
89 (Widget)m_mainWidget,
90 #else
91 xmLabelWidgetClass, (Widget)m_mainWidget,
92 #endif
93 wxFont::GetFontTag(), m_font.GetFontTypeC(dpy),
94 XmNlabelString, text(),
95 // XmNframeChildType is not in Motif 1.2, nor in Lesstif,
96 // if it was compiled with 1.2 compatibility
97 // TODO: check this still looks OK for Motif 1.2.
98 #if (XmVersion > 1200)
99 XmNframeChildType, XmFRAME_TITLE_CHILD,
100 #else
101 XmNchildType, XmFRAME_TITLE_CHILD,
102 #endif
103 XmNchildVerticalAlignment, XmALIGNMENT_CENTER,
104 NULL);
105 }
106
107 Arg args[3];
108
109 XtSetArg (args[0], XmNorientation, ((style & wxHORIZONTAL) == wxHORIZONTAL ?
110 XmHORIZONTAL : XmVERTICAL));
111 XtSetArg (args[1], XmNnumColumns, GetMajorDim());
112 XtSetArg (args[2], XmNadjustLast, False);
113
114 Widget radioBoxWidget =
115 XmCreateRadioBox ((Widget)m_mainWidget, wxMOTIF_STR("radioBoxWidget"), args, 3);
116
117 m_radioButtons.reserve(n);
118 m_radioButtonLabels.reserve(n);
119
120 int i;
121 for (i = 0; i < n; i++)
122 {
123 wxString str(GetLabelText(choices[i]));
124 m_radioButtonLabels.push_back(str);
125 Widget radioItem = XtVaCreateManagedWidget (
126 wxConstCast(str.c_str(), char),
127 #if wxUSE_GADGETS
128 xmToggleButtonGadgetClass, radioBoxWidget,
129 #else
130 xmToggleButtonWidgetClass, radioBoxWidget,
131 #endif
132 wxFont::GetFontTag(), m_font.GetFontTypeC(dpy),
133 NULL);
134 m_radioButtons.push_back((WXWidget)radioItem);
135 XtAddCallback (radioItem, XmNvalueChangedCallback,
136 (XtCallbackProc) wxRadioBoxCallback,
137 (XtPointer) this);
138 }
139
140 ChangeFont(false);
141
142 SetSelection (0);
143
144 XtRealizeWidget((Widget)m_mainWidget);
145 XtManageChild (radioBoxWidget);
146 XtManageChild ((Widget)m_mainWidget);
147
148 AttachWidget (parent, m_mainWidget, NULL, pos.x, pos.y, size.x, size.y);
149
150 ChangeBackgroundColour();
151
152 return true;
153 }
154
155 bool wxRadioBox::Create(wxWindow *parent, wxWindowID id, const wxString& title,
156 const wxPoint& pos, const wxSize& size,
157 const wxArrayString& choices,
158 int majorDim, long style,
159 const wxValidator& val, const wxString& name)
160 {
161 wxCArrayString chs(choices);
162 return Create(parent, id, title, pos, size, chs.GetCount(),
163 chs.GetStrings(), majorDim, style, val, name);
164 }
165
166 wxRadioBox::~wxRadioBox()
167 {
168 DetachWidget(m_mainWidget);
169 XtDestroyWidget((Widget) m_mainWidget);
170
171 m_mainWidget = (WXWidget) 0;
172 }
173
174 void wxRadioBox::SetString(unsigned int item, const wxString& label)
175 {
176 if (!IsValid(item))
177 return;
178
179 Widget widget = (Widget)m_radioButtons[item];
180 if (!label.empty())
181 {
182 wxString label1(GetLabelText(label));
183 wxXmString text( label1 );
184 m_radioButtonLabels[item] = label1;
185 XtVaSetValues (widget,
186 XmNlabelString, text(),
187 XmNlabelType, XmSTRING,
188 NULL);
189 }
190 }
191
192 void wxRadioBox::SetSelection(int n)
193 {
194 if (!IsValid(n))
195 return;
196
197 m_selectedButton = n;
198
199 m_inSetValue = true;
200
201 XmToggleButtonSetState ((Widget) m_radioButtons[n], True, False);
202
203 for (unsigned int i = 0; i < m_noItems; i++)
204 if (i != (unsigned int)n)
205 XmToggleButtonSetState ((Widget) m_radioButtons[i], False, False);
206
207 m_inSetValue = false;
208 }
209
210 // Get single selection, for single choice list items
211 int wxRadioBox::GetSelection() const
212 {
213 return m_selectedButton;
214 }
215
216 // Find string for position
217 wxString wxRadioBox::GetString(unsigned int n) const
218 {
219 if (!IsValid(n))
220 return wxEmptyString;
221 return m_radioButtonLabels[n];
222 }
223
224 void wxRadioBox::DoSetSize(int x, int y, int width, int height, int sizeFlags)
225 {
226 bool managed = XtIsManaged((Widget) m_mainWidget);
227
228 if (managed)
229 XtUnmanageChild ((Widget) m_mainWidget);
230
231 int xx = x; int yy = y;
232 AdjustForParentClientOrigin(xx, yy, sizeFlags);
233
234 if (x > -1 || (sizeFlags & wxSIZE_ALLOW_MINUS_ONE))
235 XtVaSetValues ((Widget) m_mainWidget, XmNx, xx, NULL);
236 if (y > -1 || (sizeFlags & wxSIZE_ALLOW_MINUS_ONE))
237 XtVaSetValues ((Widget) m_mainWidget, XmNy, yy, NULL);
238
239 if (width > 0)
240 XtVaSetValues ((Widget) m_mainWidget, XmNwidth, width, NULL);
241 if (height > 0)
242 XtVaSetValues ((Widget) m_mainWidget, XmNheight, height, NULL);
243
244 if (managed)
245 XtManageChild ((Widget) m_mainWidget);
246 }
247
248 // Enable a specific button
249 bool wxRadioBox::Enable(unsigned int n, bool enable)
250 {
251 if (!IsValid(n))
252 return false;
253
254 XtSetSensitive ((Widget) m_radioButtons[n], (Boolean) enable);
255 return true;
256 }
257
258 // Enable all controls
259 bool wxRadioBox::Enable(bool enable)
260 {
261 if ( !wxControl::Enable(enable) )
262 return false;
263
264 for (unsigned int i = 0; i < m_noItems; i++)
265 XtSetSensitive ((Widget) m_radioButtons[i], (Boolean) enable);
266
267 return true;
268 }
269
270 bool wxRadioBox::Show(bool show)
271 {
272 // TODO: show/hide all children
273 return wxControl::Show(show);
274 }
275
276 // Show a specific button
277 bool wxRadioBox::Show(unsigned int n, bool show)
278 {
279 // This method isn't complete, and we try do do our best...
280 // It's main purpose isn't for allowing Show/Unshow dynamically,
281 // but rather to provide a way to design wxRadioBox such:
282 //
283 // o Val1 o Val2 o Val3
284 // o Val4 o Val6
285 // o Val7 o Val8 o Val9
286 //
287 // In my case, this is a 'direction' box, and the Show(5,False) is
288 // coupled with an Enable(5,False)
289 //
290 if (!IsValid(n))
291 return false;
292
293 XtVaSetValues ((Widget) m_radioButtons[n],
294 XmNindicatorOn, (unsigned char) show,
295 NULL);
296
297 // Please note that this is all we can do: removing the label
298 // if switching to unshow state. However, when switching
299 // to the on state, it's the prog. resp. to call SetString(item,...)
300 // after this call!!
301 if (!show)
302 wxRadioBox::SetString (n, " ");
303
304 return true;
305 }
306
307 // For single selection items only
308 wxString wxRadioBox::GetStringSelection () const
309 {
310 int sel = GetSelection ();
311 if (sel != wxNOT_FOUND)
312 return this->GetString((unsigned int)sel);
313 else
314 return wxEmptyString;
315 }
316
317 bool wxRadioBox::SetStringSelection (const wxString& s)
318 {
319 int sel = FindString (s);
320 if (sel > -1)
321 {
322 SetSelection (sel);
323 return true;
324 }
325 else
326 return false;
327 }
328
329 void wxRadioBox::Command (wxCommandEvent & event)
330 {
331 SetSelection (event.GetInt());
332 ProcessCommand (event);
333 }
334
335 void wxRadioBox::ChangeFont(bool keepOriginalSize)
336 {
337 wxWindow::ChangeFont(keepOriginalSize);
338
339 for (unsigned int i = 0; i < m_noItems; i++)
340 {
341 WXWidget radioButton = m_radioButtons[i];
342
343 XtVaSetValues ((Widget) radioButton,
344 wxFont::GetFontTag(), m_font.GetFontTypeC(XtDisplay((Widget) GetTopWidget())),
345 NULL);
346 }
347 }
348
349 void wxRadioBox::ChangeBackgroundColour()
350 {
351 wxWindow::ChangeBackgroundColour();
352
353 wxColour colour = *wxBLACK;
354 WXPixel selectPixel = colour.AllocColour(XtDisplay((Widget)m_mainWidget));
355
356 for (unsigned int i = 0; i < m_noItems; i++)
357 {
358 WXWidget radioButton = m_radioButtons[i];
359
360 wxDoChangeBackgroundColour(radioButton, m_backgroundColour, true);
361
362 XtVaSetValues ((Widget) radioButton,
363 XmNselectColor, selectPixel,
364 NULL);
365 }
366 }
367
368 void wxRadioBox::ChangeForegroundColour()
369 {
370 wxWindow::ChangeForegroundColour();
371
372 for (unsigned int i = 0; i < m_noItems; i++)
373 {
374 WXWidget radioButton = m_radioButtons[i];
375
376 wxDoChangeForegroundColour(radioButton, m_foregroundColour);
377 }
378 }
379
380 void wxRadioBoxCallback (Widget w, XtPointer clientData,
381 XmToggleButtonCallbackStruct * cbs)
382 {
383 if (!cbs->set)
384 return;
385
386 wxRadioBox *item = (wxRadioBox *) clientData;
387 int sel = -1;
388 unsigned int i;
389 const wxWidgetArray& buttons = item->GetRadioButtons();
390 for (i = 0; i < item->GetCount(); i++)
391 if (((Widget)buttons[i]) == w)
392 sel = (int)i;
393 item->SetSel(sel);
394
395 if (item->InSetValue())
396 return;
397
398 wxCommandEvent event (wxEVT_COMMAND_RADIOBOX_SELECTED, item->GetId());
399 event.SetInt(sel);
400 event.SetString(item->GetStringSelection());
401 event.SetEventObject(item);
402 item->ProcessCommand (event);
403 }
404
405 #endif // wxUSE_RADIOBOX