src/mac/carbon/tglbtn.cpp

   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
   6 // Modified by:
   7 // Created:     08.02.01
   8 // RCS-ID:      $Id$
   9 // Copyright:   (c) 2000 Johnny C. Norris II
  10 // License:     Rocketeer license
  11 /////////////////////////////////////////////////////////////////////////////
  12
  13 // ============================================================================
  14 // declatations
  15 // ============================================================================
  16
  17 // ----------------------------------------------------------------------------
  18 // headers
  19 // ----------------------------------------------------------------------------
  20
  21 #ifdef __GNUG__
  22 #pragma implementation "button.h"
  23 #endif
  24
  25 #include "wx/defs.h"
  26 #include "wx/tglbtn.h"
  27
  28 #if wxUSE_TOGGLEBTN
  29
  30 #include "wx/mac/uma.h"
  31 // Button
  32
  33 static const int kMacOSXHorizontalBorder = 2 ;
  34 static const int kMacOSXVerticalBorder = 4 ;
  35
  36 // ----------------------------------------------------------------------------
  37 // macros
  38 // ----------------------------------------------------------------------------
  39
  40 IMPLEMENT_DYNAMIC_CLASS(wxToggleButton, wxControl)
  41 DEFINE_EVENT_TYPE(wxEVT_COMMAND_TOGGLEBUTTON_CLICKED)
  42
  43 // ============================================================================
  44 // implementation
  45 // ============================================================================
  46
  47 // ----------------------------------------------------------------------------
  48 // wxToggleButton
  49 // ----------------------------------------------------------------------------
  50
  51 // Single check box item
  52 bool wxToggleButton::Create(wxWindow *parent, wxWindowID id,
  53                             const wxString& label,
  54                             const wxPoint& pos,
  55                             const wxSize& size, long style,
  56                             const wxValidator& validator,
  57                             const wxString& name)
  58 {
  59     m_macIsUserPane = FALSE ;
  60
  61     if ( !wxControl::Create(parent, id, pos, size, style, validator, name) )
  62         return false;
  63
  64     m_label = label ;
  65
  66     Rect bounds = wxMacGetBoundsForControl( this , pos , size ) ;
  67
  68     verify_noerr ( CreateBevelButtonControl( MAC_WXHWND(parent->MacGetTopLevelWindowRef()) , &bounds , CFSTR("") ,
  69         kControlBevelButtonNormalBevel , kControlBehaviorToggles , NULL , 0 , 0 , 0 , (ControlRef*) &m_macControl ) ) ;
  70
  71     MacPostControlCreate(pos,size) ;
  72
  73   return TRUE;
  74 }
  75
  76 wxSize wxToggleButton::DoGetBestSize() const
  77 {
  78     int wBtn = 70 ;
  79     int hBtn = 20 ;
  80
  81     int lBtn = m_label.Length() * 8 + 12 ;
  82     if (lBtn > wBtn)
  83         wBtn = lBtn;
  84
  85     return wxSize ( wBtn , hBtn ) ;
  86 }
  87
  88 void wxToggleButton::SetValue(bool val)
  89 {
  90     ::SetControl32BitValue( (ControlRef) m_macControl , val ) ;
  91 }
  92
  93 bool wxToggleButton::GetValue() const
  94 {
  95     return GetControl32BitValue( (ControlRef) m_macControl ) ;
  96 }
  97
  98 void wxToggleButton::Command(wxCommandEvent & event)
  99 {
 100    SetValue((event.GetInt() != 0));
 101    ProcessCommand(event);
 102 }
 103
 104 wxInt32 wxToggleButton::MacControlHit(WXEVENTHANDLERREF WXUNUSED(handler) , WXEVENTREF WXUNUSED(event) )
 105 {
 106     wxCommandEvent event(wxEVT_COMMAND_TOGGLEBUTTON_CLICKED, m_windowId);
 107     event.SetInt(GetValue());
 108     event.SetEventObject(this);
 109     ProcessCommand(event);
 110     return noErr ;
 111 }
 112
 113 #endif // wxUSE_TOGGLEBTN
 114