+ m_macHorizontalBorder = 2 ; // additional pixels around the real control
+ m_macVerticalBorder = 2 ;
+ Rect bounds ;
+ Str255 title ;
+ MacPreControlCreate( parent , id , "" , pos , wxSize( width , height ) ,style, validator , name , &bounds , title ) ;
+
+ m_macControl = UMANewControl( parent->GetMacRootWindow() , &bounds , title , true , 0 ,
+ kControlBehaviorOffsetContents + kControlContentPictHandle , 0,
+ kControlBevelButtonNormalBevelProc , (long) this ) ;
+ wxASSERT_MSG( m_macControl != NULL , "No valid mac control" ) ;
+
+ m_buttonBitmap = bitmap;
+ PicHandle icon = NULL ;
+ if ( m_buttonBitmap.Ok() )
+ {
+ wxBitmapRefData * bmap = (wxBitmapRefData*) ( m_buttonBitmap.GetRefData()) ;
+ if ( bmap->m_bitmapType == kMacBitmapTypePict )
+ icon = bmap->m_hPict ;
+ else if ( bmap->m_bitmapType == kMacBitmapTypeGrafWorld )
+ {
+ icon = MakePict( bmap->m_hBitmap ) ;
+ }
+ }
+ ControlButtonContentInfo info ;
+
+ info.contentType = kControlContentPictHandle ;
+ info.u.picture = icon ;
+
+ UMASetControlData( m_macControl , kControlButtonPart , kControlBevelButtonContentTag , sizeof(info) , (char*) &info ) ;
+
+ MacPostControlCreate() ;