-#if wxMAC_USE_QUICKDRAW
-
-IMPLEMENT_DYNAMIC_CLASS( wxMacControl , wxObject )
-
-wxMacControl::wxMacControl()
-{
- Init();
-}
-
-wxMacControl::wxMacControl(wxWindow* peer , bool isRootControl )
-{
- Init();
- m_peer = peer;
- m_isRootControl = isRootControl;
-}
-
-wxMacControl::wxMacControl( wxWindow* peer , ControlRef control )
-{
- Init();
- m_peer = peer;
- m_controlRef = control;
-}
-
-wxMacControl::wxMacControl( wxWindow* peer , WXWidget control )
-{
- Init();
- m_peer = peer;
- m_controlRef = (ControlRef) control;
-}
-
-wxMacControl::~wxMacControl()
-{
-}
-
-void wxMacControl::Init()
-{
- m_peer = NULL;
- m_controlRef = NULL;
- m_needsFocusRect = false;
- m_isRootControl = false;
-}
-
-void wxMacControl::Dispose()
-{
- wxASSERT_MSG( m_controlRef != NULL , wxT("Control Handle already NULL, Dispose called twice ?") );
- wxASSERT_MSG( IsValidControlHandle(m_controlRef) , wxT("Invalid Control Handle (maybe already released) in Dispose") );
-
- // we cannot check the ref count here anymore, as autorelease objects might delete their refs later
- // we can have situations when being embedded, where the control gets deleted behind our back, so only
- // CFRelease if we are safe
- if ( IsValidControlHandle(m_controlRef) )
- CFRelease(m_controlRef);
- m_controlRef = NULL;
-}
-
-void wxMacControl::SetReference( URefCon data )
-{
- SetControlReference( m_controlRef , data );
-}
-
-OSStatus wxMacControl::GetData(ControlPartCode inPartCode , ResType inTag , Size inBufferSize , void * inOutBuffer , Size * outActualSize ) const
-{
- return ::GetControlData( m_controlRef , inPartCode , inTag , inBufferSize , inOutBuffer , outActualSize );
-}
-
-OSStatus wxMacControl::GetDataSize(ControlPartCode inPartCode , ResType inTag , Size * outActualSize ) const
-{
- return ::GetControlDataSize( m_controlRef , inPartCode , inTag , outActualSize );
-}
-
-OSStatus wxMacControl::SetData(ControlPartCode inPartCode , ResType inTag , Size inSize , const void * inData)
-{
- return ::SetControlData( m_controlRef , inPartCode , inTag , inSize , inData );
-}
-
-OSStatus wxMacControl::SendEvent( EventRef event , OptionBits inOptions )
-{
- return SendEventToEventTargetWithOptions( event,
- HIObjectGetEventTarget( (HIObjectRef) m_controlRef ), inOptions );
-}
-
-OSStatus wxMacControl::SendHICommand( HICommand &command , OptionBits inOptions )
-{
- wxMacCarbonEvent event( kEventClassCommand , kEventCommandProcess );
-
- event.SetParameter<HICommand>(kEventParamDirectObject,command);
-
- return SendEvent( event , inOptions );
-}
-
-OSStatus wxMacControl::SendHICommand( UInt32 commandID , OptionBits inOptions )
-{
- HICommand command;
-
- memset( &command, 0 , sizeof(command) );
- command.commandID = commandID;
- return SendHICommand( command , inOptions );
-}
-
-void wxMacControl::Flash( ControlPartCode part , UInt32 ticks )
-{
- unsigned long finalTicks;
-
- HiliteControl( m_controlRef , part );
- Delay( ticks , &finalTicks );
- HiliteControl( m_controlRef , kControlNoPart );
-}
-
-SInt32 wxMacControl::GetValue() const
-{
- return ::GetControl32BitValue( m_controlRef );
-}
-
-SInt32 wxMacControl::GetMaximum() const
-{
- return ::GetControl32BitMaximum( m_controlRef );
-}
-
-SInt32 wxMacControl::GetMinimum() const
-{
- return ::GetControl32BitMinimum( m_controlRef );
-}
-
-void wxMacControl::SetValue( SInt32 v )
-{
- ::SetControl32BitValue( m_controlRef , v );
-}
-
-void wxMacControl::SetMinimum( SInt32 v )
-{
- ::SetControl32BitMinimum( m_controlRef , v );
-}
-
-void wxMacControl::SetMaximum( SInt32 v )
-{
- ::SetControl32BitMaximum( m_controlRef , v );
-}
-
-void wxMacControl::SetValueAndRange( SInt32 value , SInt32 minimum , SInt32 maximum )
-{
- ::SetControl32BitMinimum( m_controlRef , minimum );
- ::SetControl32BitMaximum( m_controlRef , maximum );
- ::SetControl32BitValue( m_controlRef , value );
-}
-
-OSStatus wxMacControl::SetFocus( ControlFocusPart focusPart )
-{
- return SetKeyboardFocus( GetControlOwner( m_controlRef ), m_controlRef, focusPart );
-}
-
-bool wxMacControl::HasFocus() const
-{
- ControlRef control;
- GetKeyboardFocus( GetUserFocusWindow() , &control );
- return control == m_controlRef;
-}
-
-void wxMacControl::SetNeedsFocusRect( bool needs )
-{
- m_needsFocusRect = needs;
-}
-
-bool wxMacControl::NeedsFocusRect() const
-{
- return m_needsFocusRect;
-}
-
-void wxMacControl::VisibilityChanged(bool WXUNUSED(shown))
-{
-}
-
-void wxMacControl::SuperChangedPosition()
-{
-}
-
-void wxMacControl::SetFont( const wxFont & font , const wxColour& foreground , long windowStyle )
-{
- m_font = font;
-#if wxMAC_USE_CORE_TEXT
- if ( UMAGetSystemVersion() >= 0x1050 )
- {
- HIViewPartCode part = 0;
- HIThemeTextHorizontalFlush flush = kHIThemeTextHorizontalFlushDefault;
- if ( ( windowStyle & wxALIGN_MASK ) & wxALIGN_CENTER_HORIZONTAL )
- flush = kHIThemeTextHorizontalFlushCenter;
- else if ( ( windowStyle & wxALIGN_MASK ) & wxALIGN_RIGHT )
- flush = kHIThemeTextHorizontalFlushRight;
- HIViewSetTextFont( m_controlRef , part , (CTFontRef) font.MacGetCTFont() );
- HIViewSetTextHorizontalFlush( m_controlRef, part, flush );
-
- if ( foreground != *wxBLACK )
- {
- ControlFontStyleRec fontStyle;
- foreground.GetRGBColor( &fontStyle.foreColor );
- fontStyle.flags = kControlUseForeColorMask;
- ::SetControlFontStyle( m_controlRef , &fontStyle );
- }
-
- }
-#endif
-#if wxMAC_USE_ATSU_TEXT
- ControlFontStyleRec fontStyle;
- if ( font.MacGetThemeFontID() != kThemeCurrentPortFont )
- {
- switch ( font.MacGetThemeFontID() )
- {
- case kThemeSmallSystemFont :
- fontStyle.font = kControlFontSmallSystemFont;
- break;
-
- case 109 : // mini font
- fontStyle.font = -5;
- break;
-
- case kThemeSystemFont :
- fontStyle.font = kControlFontBigSystemFont;
- break;
-
- default :
- fontStyle.font = kControlFontBigSystemFont;
- break;
- }
-
- fontStyle.flags = kControlUseFontMask;
- }
- else
- {
- fontStyle.font = font.MacGetFontNum();
- fontStyle.style = font.MacGetFontStyle();
- fontStyle.size = font.MacGetFontSize();
- fontStyle.flags = kControlUseFontMask | kControlUseFaceMask | kControlUseSizeMask;
- }
-
- fontStyle.just = teJustLeft;
- fontStyle.flags |= kControlUseJustMask;
- if ( ( windowStyle & wxALIGN_MASK ) & wxALIGN_CENTER_HORIZONTAL )
- fontStyle.just = teJustCenter;
- else if ( ( windowStyle & wxALIGN_MASK ) & wxALIGN_RIGHT )
- fontStyle.just = teJustRight;
-
-
- // we only should do this in case of a non-standard color, as otherwise 'disabled' controls
- // won't get grayed out by the system anymore
-
- if ( foreground != *wxBLACK )
- {
- foreground.GetRGBColor( &fontStyle.foreColor );
- fontStyle.flags |= kControlUseForeColorMask;
- }
-
- ::SetControlFontStyle( m_controlRef , &fontStyle );
-#endif
-}
-
-void wxMacControl::SetBackgroundColour( const wxColour &WXUNUSED(col) )
-{
-// HITextViewSetBackgroundColor( m_textView , color );
-}
-
-void wxMacControl::SetRange( SInt32 minimum , SInt32 maximum )
-{
- ::SetControl32BitMinimum( m_controlRef , minimum );
- ::SetControl32BitMaximum( m_controlRef , maximum );
-}
-
-short wxMacControl::HandleKey( SInt16 keyCode, SInt16 charCode, EventModifiers modifiers )
-{
-#ifndef __LP64__
- return HandleControlKey( m_controlRef , keyCode , charCode , modifiers );
-#else
- return 0;
-#endif
-}
-
-void wxMacControl::SetActionProc( ControlActionUPP actionProc )
-{
- SetControlAction( m_controlRef , actionProc );
-}
-
-void wxMacControl::SetViewSize( SInt32 viewSize )
-{
- SetControlViewSize(m_controlRef , viewSize );
-}
-
-SInt32 wxMacControl::GetViewSize() const
-{
- return GetControlViewSize( m_controlRef );
-}
-
-bool wxMacControl::IsVisible() const
-{
- return IsControlVisible( m_controlRef );
-}
-
-void wxMacControl::SetVisibility( bool visible , bool redraw )
-{
- SetControlVisibility( m_controlRef , visible , redraw );
-}
-
-bool wxMacControl::IsEnabled() const
-{
- return IsControlEnabled( m_controlRef );
-}
-
-bool wxMacControl::IsActive() const
-{
- return IsControlActive( m_controlRef );
-}
-
-void wxMacControl::Enable( bool enable )
-{
- if ( enable )
- EnableControl( m_controlRef );
- else
- DisableControl( m_controlRef );
-}
-
-void wxMacControl::SetDrawingEnabled( bool enable )
-{
- HIViewSetDrawingEnabled( m_controlRef , enable );
-}
-
-bool wxMacControl::GetNeedsDisplay() const
-{
- return HIViewGetNeedsDisplay( m_controlRef );
-}
-
-void wxMacControl::SetNeedsDisplay( RgnHandle where )
-{
- if ( !IsVisible() )
- return;
-
- HIViewSetNeedsDisplayInRegion( m_controlRef , where , true );
-}
-
-void wxMacControl::SetNeedsDisplay( Rect* where )
-{
- if ( !IsVisible() )
- return;
-
- if ( where != NULL )
- {
- RgnHandle update = NewRgn();
- RectRgn( update , where );
- HIViewSetNeedsDisplayInRegion( m_controlRef , update , true );
- DisposeRgn( update );
- }
- else
- HIViewSetNeedsDisplay( m_controlRef , true );
-}
-
-void wxMacControl::Convert( wxPoint *pt , wxMacControl *from , wxMacControl *to )
-{
- HIPoint hiPoint;
-
- hiPoint.x = pt->x;
- hiPoint.y = pt->y;
- HIViewConvertPoint( &hiPoint , from->m_controlRef , to->m_controlRef );
- pt->x = (int)hiPoint.x;
- pt->y = (int)hiPoint.y;
-}
-
-void wxMacControl::SetRect( Rect *r )
-{
- //A HIRect is actually a CGRect on OSX - which consists of two structures -
- //CGPoint and CGSize, which have two floats each
- HIRect hir = { { r->left , r->top }, { r->right - r->left , r->bottom - r->top } };
- HIViewSetFrame ( m_controlRef , &hir );
- // eventuall we might have to do a SetVisibility( false , true );
- // before and a SetVisibility( true , true ); after
-}
-
-void wxMacControl::GetRect( Rect *r )
-{
- GetControlBounds( m_controlRef , r );
-}
-
-void wxMacControl::GetRectInWindowCoords( Rect *r )
-{
- GetControlBounds( m_controlRef , r ) ;
-
- WindowRef tlwref = GetControlOwner( m_controlRef ) ;
-
- wxNonOwnedWindow* tlwwx = wxFindWinFromMacWindow( tlwref ) ;
- if ( tlwwx != NULL )
- {
- ControlRef rootControl = tlwwx->GetPeer()->GetControlRef() ;
- HIPoint hiPoint = CGPointMake( 0 , 0 ) ;
- HIViewConvertPoint( &hiPoint , HIViewGetSuperview(m_controlRef) , rootControl ) ;
- OffsetRect( r , (short) hiPoint.x , (short) hiPoint.y ) ;
- }
-}
-
-void wxMacControl::GetBestRect( Rect *r )
-{
- short baselineoffset;
-
- GetBestControlRect( m_controlRef , r , &baselineoffset );
-}
-
-void wxMacControl::SetLabel( const wxString &title )
-{
- wxFontEncoding encoding;
-
- if ( m_font.Ok() )
- encoding = m_font.GetEncoding();
- else
- encoding = wxFont::GetDefaultEncoding();
-
- SetControlTitleWithCFString( m_controlRef , wxCFStringRef( title , encoding ) );
-}
-
-void wxMacControl::GetFeatures( UInt32 * features )
-{
- GetControlFeatures( m_controlRef , features );
-}
-
-OSStatus wxMacControl::GetRegion( ControlPartCode partCode , RgnHandle region )
-{
- OSStatus err = GetControlRegion( m_controlRef , partCode , region );
- return err;
-}
-
-OSStatus wxMacControl::SetZOrder( bool above , wxMacControl* other )
-{
- return HIViewSetZOrder( m_controlRef,above ? kHIViewZOrderAbove : kHIViewZOrderBelow,
- (other != NULL) ? other->m_controlRef : NULL);
-}
-
-// SetNeedsDisplay would not invalidate the children
-static void InvalidateControlAndChildren( HIViewRef control )
-{
- HIViewSetNeedsDisplay( control , true );
- UInt16 childrenCount = 0;
- OSStatus err = CountSubControls( control , &childrenCount );
- if ( err == errControlIsNotEmbedder )
- return;
-
- wxASSERT_MSG( err == noErr , wxT("Unexpected error when accessing subcontrols") );
-
- for ( UInt16 i = childrenCount; i >=1; --i )
- {
- HIViewRef child;
-
- err = GetIndexedSubControl( control , i , & child );
- if ( err == errControlIsNotEmbedder )
- return;
-
- InvalidateControlAndChildren( child );
- }
-}
-
-void wxMacControl::InvalidateWithChildren()
-{
- InvalidateControlAndChildren( m_controlRef );
-}
-
-void wxMacControl::ScrollRect( wxRect *r , int dx , int dy )
-{
- wxASSERT( r != NULL );
-
- HIRect scrollarea = CGRectMake( r->x , r->y , r->width , r->height);
- HIViewScrollRect ( m_controlRef , &scrollarea , dx ,dy );
-}
-
-OSType wxMacCreator = 'WXMC';
-OSType wxMacControlProperty = 'MCCT';
-
-void wxMacControl::SetReferenceInNativeControl()
-{
- void * data = this;
- verify_noerr( SetControlProperty ( m_controlRef ,
- wxMacCreator,wxMacControlProperty, sizeof(data), &data ) );
-}
-
-wxMacControl* wxMacControl::GetReferenceFromNativeControl(ControlRef control)
-{
- wxMacControl* ctl = NULL;
- ByteCount actualSize;
- if ( GetControlProperty( control ,wxMacCreator,wxMacControlProperty, sizeof(ctl) ,
- &actualSize , &ctl ) == noErr )
- {
- return ctl;
- }
- return NULL;
-}