-IMPLEMENT_DYNAMIC_CLASS(wxButton, wxControl)
-
-
-bool wxButton::Create(wxWindow *parent,
- wxWindowID id,
- const wxString& lbl,
- const wxPoint& pos,
- const wxSize& size,
- long style,
- const wxValidator& validator,
- const wxString& name)
-{
- wxString label(lbl);
- if (label.empty() && wxIsStockID(id))
- label = wxGetStockLabel(id);
-
- m_macIsUserPane = false ;
-
- if ( !wxButtonBase::Create(parent, id, pos, size, style, validator, name) )
- return false;
-
- m_labelOrig = m_label = label ;
-
- OSStatus err;
- Rect bounds = wxMacGetBoundsForControl( this , pos , size ) ;
- m_peer = new wxMacControl(this) ;
- if ( id == wxID_HELP )
- {
- ControlButtonContentInfo info ;
- info.contentType = kControlContentIconRef ;
- GetIconRef(kOnSystemDisk, kSystemIconsCreator, kHelpIcon, &info.u.iconRef);
- err = CreateRoundButtonControl(
- MAC_WXHWND(parent->MacGetTopLevelWindowRef()),
- &bounds, kControlRoundButtonNormalSize,
- &info, m_peer->GetControlRefAddr() );
- }
- else if ( label.Find('\n' ) == wxNOT_FOUND && label.Find('\r' ) == wxNOT_FOUND)
- {
- // Button height is static in Mac, can't be changed, so we need to force it here
- if ( GetWindowVariant() == wxWINDOW_VARIANT_NORMAL || GetWindowVariant() == wxWINDOW_VARIANT_LARGE )
- {
- bounds.bottom = bounds.top + 20 ;
- m_maxHeight = 20 ;
- }
- else if ( GetWindowVariant() == wxWINDOW_VARIANT_SMALL )
- {
- bounds.bottom = bounds.top + 17 ;
- m_maxHeight = 17 ;
- }
- else if ( GetWindowVariant() == wxWINDOW_VARIANT_MINI )
- {
- bounds.bottom = bounds.top + 15 ;
- m_maxHeight = 15 ;
- }
- err = CreatePushButtonControl(
- MAC_WXHWND(parent->MacGetTopLevelWindowRef()),
- &bounds, CFSTR(""), m_peer->GetControlRefAddr() );
- }
- else
- {
- ControlButtonContentInfo info ;
- info.contentType = kControlNoContent ;
- err = CreateBevelButtonControl(
- MAC_WXHWND(parent->MacGetTopLevelWindowRef()) , &bounds, CFSTR(""),
- kControlBevelButtonLargeBevel, kControlBehaviorPushbutton,
- &info, 0, 0, 0, m_peer->GetControlRefAddr() );
- }
-
- verify_noerr( err );
- wxASSERT_MSG( m_peer != NULL && m_peer->Ok() , wxT("No valid Mac control") ) ;
-
- MacPostControlCreate( pos, size );
-
- return true;
-}
-
-wxWindow *wxButton::SetDefault()
-{
- wxWindow *btnOldDefault = wxButtonBase::SetDefault();
-
- if ( btnOldDefault )
- {
- // cast needed to access the protected member
- btnOldDefault->GetPeer()->SetData(kControlButtonPart , kControlPushButtonDefaultTag , (Boolean) 0 ) ;
- }
-
- m_peer->SetData(kControlButtonPart , kControlPushButtonDefaultTag , (Boolean) 1 ) ;
-
- return btnOldDefault;
-}