]> git.saurik.com Git - wxWidgets.git/blob - src/osx/carbon/radiobut.cpp
fixing native font info support bugs
[wxWidgets.git] / src / osx / carbon / radiobut.cpp
1 /////////////////////////////////////////////////////////////////////////////
2 // Name: src/osx/carbon/radiobut.cpp
3 // Purpose: wxRadioButton
4 // Author: Stefan Csomor
5 // Modified by: JS Lair (99/11/15) adding the cyclic group notion for radiobox
6 // Created: 01/01/98
7 // RCS-ID: $Id$
8 // Copyright: (c) Stefan Csomor
9 // Licence: wxWindows licence
10 /////////////////////////////////////////////////////////////////////////////
11
12 #include "wx/wxprec.h"
13
14 #if wxUSE_RADIOBTN
15
16 #include "wx/radiobut.h"
17 #include "wx/osx/private.h"
18
19 wxWidgetImplType* wxWidgetImpl::CreateRadioButton( wxWindowMac* wxpeer,
20 wxWindowMac* parent,
21 wxWindowID WXUNUSED(id),
22 const wxString& WXUNUSED(label),
23 const wxPoint& pos,
24 const wxSize& size,
25 long WXUNUSED(style),
26 long WXUNUSED(extraStyle))
27 {
28 Rect bounds = wxMacGetBoundsForControl( wxpeer , pos , size ) ;
29 wxMacControl* peer = new wxMacControl(wxpeer) ;
30 OSStatus err = CreateRadioButtonControl(
31 MAC_WXHWND(parent->MacGetTopLevelWindowRef()), &bounds, CFSTR(""),
32 0, false /* no autotoggle */, peer->GetControlRefAddr() );
33 verify_noerr( err );
34
35 return peer;
36 }
37
38 #endif