]> git.saurik.com Git - wxWidgets.git/blame - src/mac/carbon/radiobut.cpp
removed useless ; to allow smart preprocessing under Mac OS X
[wxWidgets.git] / src / mac / carbon / radiobut.cpp
CommitLineData
e9576ca5
SC
1/////////////////////////////////////////////////////////////////////////////
2// Name: radiobut.cpp
3// Purpose: wxRadioButton
4// Author: AUTHOR
1dd52151 5// Modified by: JS Lair (99/11/15) adding the cyclic groupe notion for radiobox
e9576ca5
SC
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
079c842c 18
e9576ca5 19IMPLEMENT_DYNAMIC_CLASS(wxRadioButton, wxControl)
079c842c 20
1dd52151
UJ
21#include <wx/mac/uma.h>
22
e9576ca5
SC
23bool 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{
1dd52151
UJ
30 Rect bounds ;
31 Str255 title ;
32
1dd52151 33 MacPreControlCreate( parent , id , label , pos , size ,style, validator , name , &bounds , title ) ;
e9576ca5 34
fdaf613a 35 m_macControl = UMANewControl( parent->GetMacRootWindow() , &bounds , title , false , 0 , 0 , 1,
1dd52151
UJ
36 kControlRadioButtonProc , (long) this ) ;
37
38 MacPostControlCreate() ;
e9576ca5 39
aa6c945b 40 m_cycle = this ;
c503ab84 41
0a67a93b
SC
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)
079c842c 52 {
0a67a93b
SC
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();
079c842c 60 }
0a67a93b
SC
61 AddInCycle( chief ) ;
62 }
63 return TRUE;
e9576ca5
SC
64}
65
1dd52151 66void wxRadioButton::SetValue(bool val)
e9576ca5 67{
1dd52151
UJ
68 int i;
69 wxRadioButton *cycle;
fdaf613a
SC
70 if ( GetControlValue( m_macControl ) == val )
71 return ;
72
1dd52151 73 ::SetControlValue( m_macControl , val ) ;
2f1ae414
SC
74 if (val)
75 {
1dd52151
UJ
76 cycle=this->NextInCycle();
77 if (cycle!=NULL) {
78 while (cycle!=this) {
79 cycle->SetValue(false);
80 cycle=cycle->NextInCycle();
81 }
82 }
83 }
e9576ca5
SC
84}
85
e9576ca5
SC
86bool wxRadioButton::GetValue() const
87{
1dd52151 88 return ::GetControlValue( m_macControl ) ;
e9576ca5
SC
89}
90
91void wxRadioButton::Command (wxCommandEvent & event)
92{
1dd52151 93 SetValue ( (event.GetInt() != 0) );
e9576ca5
SC
94 ProcessCommand (event);
95}
96
1dd52151
UJ
97void wxRadioButton::MacHandleControlClick( ControlHandle control , SInt16 controlpart )
98{
f0822896
SC
99 if ( GetValue() )
100 return ;
101
102 wxRadioButton *cycle, *old = NULL ;
103 cycle=this->NextInCycle();
104 if (cycle!=NULL) {
105 while (cycle!=this) {
106 if ( cycle->GetValue() ) {
107 old = cycle ;
108 cycle->SetValue(false);
109 }
110 cycle=cycle->NextInCycle();
111 }
112 }
113
fdaf613a 114 SetValue(true) ;
f0822896
SC
115
116 if ( old ) {
117 wxCommandEvent event(wxEVT_COMMAND_RADIOBUTTON_SELECTED, old->m_windowId );
118 event.SetEventObject(old);
119 event.SetInt( false );
120 old->ProcessCommand(event);
121 }
122 wxCommandEvent event2(wxEVT_COMMAND_RADIOBUTTON_SELECTED, m_windowId );
123 event2.SetEventObject(this);
124 event2.SetInt( true );
125 ProcessCommand(event2);
1dd52151
UJ
126}
127
128wxRadioButton *wxRadioButton::AddInCycle(wxRadioButton *cycle)
129{
130 wxRadioButton *next,*current;
131
132 if (cycle==NULL) {
133 m_cycle=this;
134 return(this);
135 }
136 else {
137 current=cycle;
0a67a93b
SC
138 while ((next=current->m_cycle)!=cycle)
139 current=current->m_cycle;
1dd52151
UJ
140 m_cycle=cycle;
141 current->m_cycle=this;
142 return(cycle);
143 }
144}