]> git.saurik.com Git - wxWidgets.git/blame - src/motif/radiobut.cpp
printf() format warning fixes
[wxWidgets.git] / src / motif / radiobut.cpp
CommitLineData
4bb6408c
JS
1/////////////////////////////////////////////////////////////////////////////
2// Name: radiobut.cpp
3// Purpose: wxRadioButton
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#ifdef __GNUG__
13#pragma implementation "radiobut.h"
14#endif
15
bcd055ae
JJ
16#ifdef __VMS
17#define XtDisplay XTDISPLAY
18#endif
19
f6045f99
GD
20#include "wx/defs.h"
21
4bb6408c 22#include "wx/radiobut.h"
a4294b78
JS
23#include "wx/utils.h"
24
338dd992
JJ
25#ifdef __VMS__
26#pragma message disable nosimpint
27#endif
a4294b78
JS
28#include <Xm/Label.h>
29#include <Xm/LabelG.h>
30#include <Xm/ToggleB.h>
31#include <Xm/ToggleBG.h>
32#include <Xm/RowColumn.h>
33#include <Xm/Form.h>
338dd992
JJ
34#ifdef __VMS__
35#pragma message enable nosimpint
36#endif
a4294b78 37
3096bd2f 38#include "wx/motif/private.h"
a4294b78
JS
39
40void wxRadioButtonCallback (Widget w, XtPointer clientData,
2d120f83 41 XmToggleButtonCallbackStruct * cbs);
4bb6408c 42
4bb6408c 43IMPLEMENT_DYNAMIC_CLASS(wxRadioButton, wxControl)
4bb6408c 44
a4294b78
JS
45wxRadioButton::wxRadioButton()
46{
a4294b78
JS
47}
48
4bb6408c 49bool wxRadioButton::Create(wxWindow *parent, wxWindowID id,
2d120f83
JS
50 const wxString& label,
51 const wxPoint& pos,
52 const wxSize& size, long style,
53 const wxValidator& validator,
54 const wxString& name)
4bb6408c
JS
55{
56 SetName(name);
57 SetValidator(validator);
0d57be45
JS
58 m_backgroundColour = parent->GetBackgroundColour();
59 m_foregroundColour = parent->GetForegroundColour();
da175b2c 60 m_font = parent->GetFont();
31528cd3 61
4bb6408c 62 if (parent) parent->AddChild(this);
31528cd3 63
4bb6408c 64 if ( id == -1 )
2d120f83 65 m_windowId = (int)NewControlId();
4bb6408c 66 else
2d120f83 67 m_windowId = id;
31528cd3 68
4bb6408c 69 m_windowStyle = style ;
31528cd3 70
a4294b78 71 Widget parentWidget = (Widget) parent->GetClientWidget();
31528cd3 72
a4294b78 73 wxString label1(wxStripMenuCodes(label));
31528cd3 74
da494b40 75 wxXmString text( label1 );
31528cd3 76
da494b40 77 WXFontType fontType = m_font.GetFontType(XtDisplay(parentWidget));
31528cd3 78
a4294b78
JS
79 Widget radioButtonWidget = XtVaCreateManagedWidget ("toggle",
80#if wxUSE_GADGETS
2d120f83 81 xmToggleButtonGadgetClass, parentWidget,
a4294b78 82#else
2d120f83 83 xmToggleButtonWidgetClass, parentWidget,
a4294b78 84#endif
da494b40
MB
85 wxFont::GetFontTag(), fontType,
86 XmNlabelString, text(),
2d120f83
JS
87 XmNfillOnSelect, True,
88 XmNindicatorType, XmONE_OF_MANY, // diamond-shape
89 NULL);
31528cd3 90
a4294b78 91 XtAddCallback (radioButtonWidget, XmNvalueChangedCallback, (XtCallbackProc) wxRadioButtonCallback,
d7dcb939 92 (XtPointer) this);
31528cd3 93
a4294b78 94 m_mainWidget = (WXWidget) radioButtonWidget;
31528cd3 95
a4294b78 96 XtManageChild (radioButtonWidget);
31528cd3 97
b412f9be 98 AttachWidget (parent, m_mainWidget, (WXWidget) NULL, pos.x, pos.y, size.x, size.y);
31528cd3 99
0d57be45 100 ChangeBackgroundColour();
31528cd3 101
f37907ff
MB
102 //copied from mac/radiobut.cpp (from here till "return TRUE;")
103 m_cycle = this ;
104
105 if (HasFlag(wxRB_GROUP))
106 {
107 AddInCycle( NULL ) ;
108 }
109 else
110 {
111 /* search backward for last group start */
112 wxRadioButton *chief = (wxRadioButton*) NULL;
113 wxWindowList::Node *node = parent->GetChildren().GetLast();
114 while (node)
115 {
116 wxWindow *child = node->GetData();
117 if (child->IsKindOf( CLASSINFO( wxRadioButton ) ) )
118 {
119 chief = (wxRadioButton*) child;
120 if (child->HasFlag(wxRB_GROUP)) break;
121 }
122 node = node->GetPrevious();
123 }
124 AddInCycle( chief ) ;
125 }
a4294b78 126 return TRUE;
4bb6408c
JS
127}
128
129void wxRadioButton::SetValue(bool value)
130{
f37907ff
MB
131 if (GetValue() == value)
132 return;
133
a4294b78
JS
134 m_inSetValue = TRUE;
135 XmToggleButtonSetState ((Widget) m_mainWidget, (Boolean) value, FALSE);
136 m_inSetValue = FALSE;
f37907ff
MB
137
138 ClearSelections();
4bb6408c
JS
139}
140
141// Get single selection, for single choice list items
142bool wxRadioButton::GetValue() const
143{
a4294b78 144 return (XmToggleButtonGetState ((Widget) m_mainWidget) != 0);
4bb6408c
JS
145}
146
147void wxRadioButton::Command (wxCommandEvent & event)
148{
2d120f83
JS
149 SetValue ( (event.m_commandInt != 0) );
150 ProcessCommand (event);
4bb6408c
JS
151}
152
4b5f3fe6 153void wxRadioButton::ChangeFont(bool keepOriginalSize)
0d57be45 154{
4b5f3fe6 155 wxWindow::ChangeFont(keepOriginalSize);
0d57be45
JS
156}
157
158void wxRadioButton::ChangeBackgroundColour()
159{
321db4b6 160 wxWindow::ChangeBackgroundColour();
9838df2c
JS
161
162 // What colour should this be?
eb6fa4b4 163 int selectPixel = wxBLACK->AllocColour(XtDisplay((Widget)m_mainWidget));
9838df2c
JS
164
165 XtVaSetValues ((Widget) GetMainWidget(),
166 XmNselectColor, selectPixel,
167 NULL);
0d57be45
JS
168}
169
170void wxRadioButton::ChangeForegroundColour()
171{
321db4b6 172 wxWindow::ChangeForegroundColour();
0d57be45
JS
173}
174
a4294b78 175void wxRadioButtonCallback (Widget w, XtPointer clientData,
2d120f83 176 XmToggleButtonCallbackStruct * cbs)
a4294b78 177{
2d120f83
JS
178 if (!cbs->set)
179 return;
31528cd3 180
2d120f83
JS
181 wxRadioButton *item = (wxRadioButton *) clientData;
182 if (item->InSetValue())
183 return;
31528cd3 184
f37907ff
MB
185 //based on mac/radiobut.cpp
186 wxRadioButton* old = item->ClearSelections();
187 item->SetValue(TRUE);
188
189 if ( old )
190 {
191 wxCommandEvent event(wxEVT_COMMAND_RADIOBUTTON_SELECTED,
192 old->GetId() );
193 event.SetEventObject(old);
194 event.SetInt( FALSE );
195 old->ProcessCommand(event);
196 }
197 wxCommandEvent event2(wxEVT_COMMAND_RADIOBUTTON_SELECTED, item->GetId() );
198 event2.SetEventObject(item);
199 event2.SetInt( TRUE );
200 item->ProcessCommand(event2);
201}
202
203wxRadioButton* wxRadioButton::AddInCycle(wxRadioButton *cycle)
204{
205 wxRadioButton* next;
206 wxRadioButton* current;
207
208 if (cycle == NULL)
209 {
210 m_cycle = this;
211 return this;
212 }
213 else
214 {
215 current = cycle;
216 while ((next = current->m_cycle) != cycle)
217 current = current->m_cycle;
218 m_cycle = cycle;
219 current->m_cycle = this;
220 return cycle;
221 }
222}
31528cd3 223
f37907ff
MB
224wxRadioButton* wxRadioButton::ClearSelections()
225{
226 wxRadioButton* cycle = NextInCycle();
227 wxRadioButton* old = 0;
228
229 if (cycle)
230 {
231 while (cycle != this)
232 {
233 if ( cycle->GetValue() )
234 {
235 old = cycle;
236 cycle->SetValue(FALSE);
237 }
238 cycle = cycle->NextInCycle();
239 }
240 }
241
242 return old;
a4294b78 243}
4bb6408c 244
f37907ff
MB
245void wxRadioButton::RemoveFromCycle()
246{
247 wxRadioButton* curr = NextInCycle();
248
249 while( curr )
250 {
251 if( curr->NextInCycle() == this )
252 {
253 curr->m_cycle = this->m_cycle;
254 return;
255 }
256
257 curr = curr->NextInCycle();
258 }
259}