1 /////////////////////////////////////////////////////////////////////////////
2 // Name: src/mac/tglbtn.cpp
3 // Purpose: Definition of the wxToggleButton class, which implements a
4 // toggle button under wxMac.
5 // Author: Stefan Csomor
9 // Copyright: (c) 2000 Johnny C. Norris II
10 // License: Rocketeer license
11 /////////////////////////////////////////////////////////////////////////////
13 // ============================================================================
15 // ============================================================================
17 // ----------------------------------------------------------------------------
19 // ----------------------------------------------------------------------------
22 #pragma implementation "button.h"
26 #include "wx/tglbtn.h"
30 #include "wx/mac/uma.h"
33 static const int kMacOSXHorizontalBorder
= 2 ;
34 static const int kMacOSXVerticalBorder
= 4 ;
36 // ----------------------------------------------------------------------------
38 // ----------------------------------------------------------------------------
40 IMPLEMENT_DYNAMIC_CLASS(wxToggleButton
, wxControl
)
41 DEFINE_EVENT_TYPE(wxEVT_COMMAND_TOGGLEBUTTON_CLICKED
)
43 // ============================================================================
45 // ============================================================================
47 // ----------------------------------------------------------------------------
49 // ----------------------------------------------------------------------------
51 // Single check box item
52 bool wxToggleButton::Create(wxWindow
*parent
, wxWindowID id
,
53 const wxString
& label
,
55 const wxSize
& size
, long style
,
56 const wxValidator
& validator
,
59 m_macIsUserPane
= FALSE
;
61 if ( !wxControl::Create(parent
, id
, pos
, size
, style
, validator
, name
) )
66 Rect bounds
= wxMacGetBoundsForControl( this , pos
, size
) ;
67 m_macControl
= (WXWidget
) ::NewControl( MAC_WXHWND(parent
->MacGetTopLevelWindowRef()) , &bounds
, "\p" , true , 0 , kControlBehaviorToggles
, 1,
68 kControlBevelButtonNormalBevelProc
, (long) this ) ;
69 wxASSERT_MSG( (ControlRef
) m_macControl
!= NULL
, wxT("No valid mac control") ) ;
71 MacPostControlCreate(pos
,size
) ;
76 wxSize
wxToggleButton::DoGetBestSize() const
81 int lBtn
= m_label
.Length() * 8 + 12 ;
85 return wxSize ( wBtn
, hBtn
) ;
88 void wxToggleButton::SetValue(bool val
)
90 ::SetControl32BitValue( (ControlRef
) m_macControl
, val
) ;
93 bool wxToggleButton::GetValue() const
95 return GetControl32BitValue( (ControlRef
) m_macControl
) ;
98 void wxToggleButton::Command(wxCommandEvent
& event
)
100 SetValue((event
.GetInt() != 0));
101 ProcessCommand(event
);
104 void wxToggleButton::MacHandleControlClick( WXWidget
WXUNUSED(control
) , wxInt16 controlpart
, bool WXUNUSED(mouseStillDown
) )
106 if ( controlpart
!= kControlNoPart
)
108 wxCommandEvent
event(wxEVT_COMMAND_TOGGLEBUTTON_CLICKED
, m_windowId
);
109 event
.SetInt(GetValue());
110 event
.SetEventObject(this);
111 ProcessCommand(event
);
115 #endif // wxUSE_TOGGLEBTN