]> git.saurik.com Git - wxWidgets.git/blob - src/mac/radiobut.cpp
fixed 'patch' #422993 (Error in wxConfigBase::Write for doubles)
[wxWidgets.git] / src / mac / radiobut.cpp
1 /////////////////////////////////////////////////////////////////////////////
2 // Name: radiobut.cpp
3 // Purpose: wxRadioButton
4 // Author: AUTHOR
5 // Modified by: JS Lair (99/11/15) adding the cyclic groupe notion for radiobox
6 // Created: ??/??/98
7 // RCS-ID: $Id$
8 // Copyright: (c) AUTHOR
9 // Licence: wxWindows licence
10 /////////////////////////////////////////////////////////////////////////////
11
12 #ifdef __GNUG__
13 #pragma implementation "radiobut.h"
14 #endif
15
16 #include "wx/radiobut.h"
17
18
19 IMPLEMENT_DYNAMIC_CLASS(wxRadioButton, wxControl)
20
21 #include <wx/mac/uma.h>
22
23 bool wxRadioButton::Create(wxWindow *parent, wxWindowID id,
24 const wxString& label,
25 const wxPoint& pos,
26 const wxSize& size, long style,
27 const wxValidator& validator,
28 const wxString& name)
29 {
30 Rect bounds ;
31 Str255 title ;
32
33 MacPreControlCreate( parent , id , label , pos , size ,style, validator , name , &bounds , title ) ;
34
35 m_macControl = UMANewControl( parent->GetMacRootWindow() , &bounds , title , true , 0 , 0 , 1,
36 kControlRadioButtonProc , (long) this ) ;
37
38 MacPostControlCreate() ;
39
40 m_cycle = this ;
41
42 if (HasFlag(wxRB_GROUP))
43 {
44 AddInCycle( NULL ) ;
45 }
46 else
47 {
48 /* search backward for last group start */
49 wxRadioButton *chief = (wxRadioButton*) NULL;
50 wxWindowList::Node *node = parent->GetChildren().GetLast();
51 while (node)
52 {
53 wxWindow *child = node->GetData();
54 if (child->IsKindOf( CLASSINFO( wxRadioButton ) ) )
55 {
56 chief = (wxRadioButton*) child;
57 if (child->HasFlag(wxRB_GROUP)) break;
58 }
59 node = node->GetPrevious();
60 }
61 AddInCycle( chief ) ;
62 }
63 return TRUE;
64 }
65
66 void wxRadioButton::SetValue(bool val)
67 {
68 int i;
69 wxRadioButton *cycle;
70
71 ::SetControlValue( m_macControl , val ) ;
72
73 if (val)
74 {
75 cycle=this->NextInCycle();
76 if (cycle!=NULL) {
77 while (cycle!=this) {
78 cycle->SetValue(false);
79 cycle=cycle->NextInCycle();
80 }
81 }
82 }
83 }
84
85 bool wxRadioButton::GetValue() const
86 {
87 return ::GetControlValue( m_macControl ) ;
88 }
89
90 void wxRadioButton::Command (wxCommandEvent & event)
91 {
92 SetValue ( (event.GetInt() != 0) );
93 ProcessCommand (event);
94 }
95
96 void wxRadioButton::MacHandleControlClick( ControlHandle control , SInt16 controlpart )
97 {
98 SetValue(true) ;
99 wxCommandEvent event(wxEVT_COMMAND_RADIOBUTTON_SELECTED, m_windowId );
100 event.SetEventObject(this);
101 event.SetInt( GetValue() );
102 ProcessCommand(event);
103 }
104
105 wxRadioButton *wxRadioButton::AddInCycle(wxRadioButton *cycle)
106 {
107 wxRadioButton *next,*current;
108
109 if (cycle==NULL) {
110 m_cycle=this;
111 return(this);
112 }
113 else {
114 current=cycle;
115 while ((next=current->m_cycle)!=cycle)
116 current=current->m_cycle;
117 m_cycle=cycle;
118 current->m_cycle=this;
119 return(cycle);
120 }
121 }