]>
Commit | Line | Data |
---|---|---|
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 | |
40 | void wxRadioButtonCallback (Widget w, XtPointer clientData, | |
2d120f83 | 41 | XmToggleButtonCallbackStruct * cbs); |
4bb6408c | 42 | |
4bb6408c | 43 | IMPLEMENT_DYNAMIC_CLASS(wxRadioButton, wxControl) |
4bb6408c | 44 | |
a4294b78 JS |
45 | wxRadioButton::wxRadioButton() |
46 | { | |
a4294b78 JS |
47 | } |
48 | ||
4bb6408c | 49 | bool 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; | |
ac32ba44 | 113 | wxWindowList::compatibility_iterator node = parent->GetChildren().GetLast(); |
f37907ff MB |
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 | ||
129 | void 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 | |
142 | bool wxRadioButton::GetValue() const | |
143 | { | |
a4294b78 | 144 | return (XmToggleButtonGetState ((Widget) m_mainWidget) != 0); |
4bb6408c JS |
145 | } |
146 | ||
147 | void wxRadioButton::Command (wxCommandEvent & event) | |
148 | { | |
2d120f83 JS |
149 | SetValue ( (event.m_commandInt != 0) ); |
150 | ProcessCommand (event); | |
4bb6408c JS |
151 | } |
152 | ||
4b5f3fe6 | 153 | void wxRadioButton::ChangeFont(bool keepOriginalSize) |
0d57be45 | 154 | { |
4b5f3fe6 | 155 | wxWindow::ChangeFont(keepOriginalSize); |
0d57be45 JS |
156 | } |
157 | ||
158 | void 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 | ||
170 | void wxRadioButton::ChangeForegroundColour() | |
171 | { | |
321db4b6 | 172 | wxWindow::ChangeForegroundColour(); |
0d57be45 JS |
173 | } |
174 | ||
a4294b78 | 175 | void 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 | ||
203 | wxRadioButton* 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 |
224 | wxRadioButton* 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 |
245 | void 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 | } |