src/mac/carbon/control.cpp

/////////////////////////////////////////////////////////////////////////////
// Name:        control.cpp
// Purpose:     wxControl class
// Author:      AUTHOR
// Modified by:
// Created:     ??/??/98
// RCS-ID:      $Id$
// Copyright:   (c) AUTHOR
// Licence:   	wxWindows licence
/////////////////////////////////////////////////////////////////////////////

#ifdef __GNUG__
#pragma implementation "control.h"
#endif

#include "wx/control.h"
#include "wx/panel.h"
#include "wx/app.h"
#include "wx/dc.h"
#include "wx/notebook.h"
#include "wx/tabctrl.h"
#include "wx/radiobox.h"
#include "wx/spinbutt.h"
#include "wx/scrolbar.h"
#include "wx/button.h"
#include "wx/dialog.h"
#include "wx/statbox.h"
#include "wx/sizer.h"
#include "wx/stattext.h"

#if !USE_SHARED_LIBRARY
IMPLEMENT_ABSTRACT_CLASS(wxControl, wxWindow)

BEGIN_EVENT_TABLE(wxControl, wxWindow)
	EVT_MOUSE_EVENTS( wxControl::OnMouseEvent )
	EVT_CHAR( wxControl::OnKeyDown )
	EVT_PAINT( wxControl::OnPaint )
END_EVENT_TABLE()
#endif

#include <wx/mac/uma.h>

// Item members

ControlActionUPP wxMacLiveScrollbarActionUPP = NULL ;

pascal void wxMacLiveScrollbarActionProc( ControlHandle control , ControlPartCode partCode ) ;
pascal void wxMacLiveScrollbarActionProc( ControlHandle control , ControlPartCode partCode )
{
	if ( partCode != 0)
	{
		wxControl*	wx = (wxControl*) GetControlReference( control ) ;
		if ( wx )
		{
			wx->MacHandleControlClick( control , partCode ) ;
		}
	}
}

wxControl::wxControl()
{
	m_macControl = NULL ;
	m_macHorizontalBorder = 0 ; // additional pixels around the real control
	m_macVerticalBorder = 0 ;
    m_backgroundColour = *wxWHITE;
    m_foregroundColour = *wxBLACK;
#if WXWIN_COMPATIBILITY
  m_callback = 0;
#endif // WXWIN_COMPATIBILITY

	if ( wxMacLiveScrollbarActionUPP == NULL )
	{
#ifdef __UNIX__
        wxMacLiveScrollbarActionUPP = NewControlActionUPP( wxMacLiveScrollbarActionProc );
#else
		wxMacLiveScrollbarActionUPP = NewControlActionProc( wxMacLiveScrollbarActionProc ) ;
#endif
	}
}

bool wxControl::Create(wxWindow *parent, wxWindowID id,
                       const wxPoint& pos,
                       const wxSize& size, long style,
                       const wxValidator& validator,
                       const wxString& name)
{
	m_macControl = NULL ;
	m_macHorizontalBorder = 0 ; // additional pixels around the real control
	m_macVerticalBorder = 0 ;
    bool rval = wxWindow::Create(parent, id, pos, size, style, name);
    if (rval) {
#if wxUSE_VALIDATORS
        SetValidator(validator);
#endif
    }
    return rval;
}

wxControl::~wxControl()
{
    m_isBeingDeleted = TRUE;
    // If we delete an item, we should initialize the parent panel,
    // because it could now be invalid.
    wxPanel *panel = wxDynamicCast(GetParent(), wxPanel);
    if ( panel )
    {
        if (panel->GetDefaultItem() == (wxButton*) this)
            panel->SetDefaultItem(NULL);
    }
    if ( m_macControl )
    {
    	UMADisposeControl( m_macControl ) ;
    	m_macControl = NULL ;
    }
}

void wxControl::SetLabel(const wxString& title)
{
	m_label = title ;

	if ( m_macControl )
	{
		Str255 maclabel ;
		wxString label ;

		if( wxApp::s_macDefaultEncodingIsPC )
			label = wxMacMakeMacStringFromPC( title ) ;
		else
			label = title ;

#if TARGET_CARBON
		c2pstrcpy( (StringPtr) maclabel , label ) ;
#else
		strcpy( (char *) maclabel , label ) ;
		c2pstr( (char *) maclabel ) ;
#endif
		::SetControlTitle( m_macControl , maclabel ) ;
	}
}

wxSize wxControl::DoGetBestSize() const
{
    return wxSize(20, 20);
}

bool wxControl::ProcessCommand (wxCommandEvent & event)
{
  // Tries:
  // 1) A callback function (to become obsolete)
  // 2) OnCommand, starting at this window and working up parent hierarchy
  // 3) OnCommand then calls ProcessEvent to search the event tables.
#if WXWIN_COMPATIBILITY
    if ( m_callback )
    {
        (void)(*m_callback)(this, event);

        return TRUE;
    }
    else
#endif // WXWIN_COMPATIBILITY
    {
      return GetEventHandler()->ProcessEvent(event);
    }
}

// ------------------------
wxList *wxWinMacControlList = NULL;
wxControl *wxFindControlFromMacControl(ControlHandle inControl )
{
    wxNode *node = wxWinMacControlList->Find((long)inControl);
    if (!node)
        return NULL;
    return (wxControl *)node->Data();
}

void wxAssociateControlWithMacControl(ControlHandle inControl, wxControl *control)
{
    // adding NULL WindowRef is (first) surely a result of an error and
    // (secondly) breaks menu command processing
    wxCHECK_RET( inControl != (ControlHandle) NULL, "attempt to add a NULL WindowRef to window list" );

    if ( !wxWinMacControlList->Find((long)inControl) )
        wxWinMacControlList->Append((long)inControl, control);
}

void wxRemoveMacControlAssociation(wxControl *control)
{
    wxWinMacControlList->DeleteObject(control);
}

void wxControl::MacPreControlCreate( wxWindow *parent, wxWindowID id, wxString label ,
			 const wxPoint& pos,
			 const wxSize& size, long style,
			 const wxValidator& validator,
			 const wxString& name , Rect *outBounds , StringPtr maclabel )
{
	m_label = label ;
  SetName(name);
  if ( &validator )
  	SetValidator(validator);

  m_windowStyle = style;
  parent->AddChild((wxButton *)this);

  m_backgroundColour = parent->GetBackgroundColour() ;
  m_foregroundColour = parent->GetForegroundColour() ;

  if (id == -1)
      m_windowId = NewControlId();
  else
      m_windowId = id;

	m_width = size.x ;
	m_height = size.y ;
	int x = pos.x ;
	int y = pos.y ;
	AdjustForParentClientOrigin(x, y, wxSIZE_USE_EXISTING);
	m_x = x ;
	m_y = y ;


	parent->MacClientToRootWindow( &x , &y ) ;
	outBounds->top = y + m_macVerticalBorder ;
	outBounds->left = x + m_macHorizontalBorder ;
	outBounds->bottom = outBounds->top + m_height - 2 * m_macVerticalBorder;
	outBounds->right = outBounds->left + m_width - 2 * m_macHorizontalBorder ;

	char c_text[255];
	strcpy( c_text , label ) ;
	if( wxApp::s_macDefaultEncodingIsPC )
	{
		wxMacConvertFromPCForControls( c_text ) ;
	}

#if TARGET_CARBON
	c2pstrcpy( (StringPtr) maclabel , c_text ) ;
#else
	strcpy( (char *) maclabel , c_text ) ;
	c2pstr( (char *) maclabel ) ;
#endif
}

void wxControl::MacPostControlCreate()
{
	wxASSERT_MSG( m_macControl != NULL , "No valid mac control" ) ;

	if ( IsKindOf( CLASSINFO( wxScrollBar ) ) )
	{
		// no font
	}
	else if ( IsKindOf( CLASSINFO( wxStaticBox ) ) || IsKindOf( CLASSINFO( wxRadioBox ) ) || IsKindOf( CLASSINFO( wxButton ) ) )
	{
		ControlFontStyleRec		controlstyle ;
		controlstyle.flags = kControlUseFontMask ;
		controlstyle.font = kControlFontSmallBoldSystemFont ;

		::UMASetControlFontStyle( m_macControl , &controlstyle ) ;
	}
	else
	{
		ControlFontStyleRec		controlstyle ;
		controlstyle.flags = kControlUseFontMask ;
		controlstyle.font = kControlFontSmallSystemFont ;

		::UMASetControlFontStyle( m_macControl , &controlstyle ) ;
	}
	ControlHandle container = GetParent()->MacGetContainerForEmbedding() ;
	wxASSERT_MSG( container != NULL , "No valid mac container control" ) ;
	::UMAEmbedControl( m_macControl , container ) ;
	m_macControlIsShown  = true ;
	MacAdjustControlRect() ;
	wxAssociateControlWithMacControl( m_macControl , this ) ;
}

void wxControl::MacAdjustControlRect()
{
	wxASSERT_MSG( m_macControl != NULL , "No valid mac control" ) ;
	if ( m_width == -1 || m_height == -1 )
	{
		Rect 	bestsize = { 0 , 0 , 0 , 0 } ;
		short	baselineoffset ;

		UMAGetBestControlRect( m_macControl , &bestsize , &baselineoffset ) ;

		if ( EmptyRect( &bestsize ) )
		{
			baselineoffset = 0;
			bestsize.left = bestsize.top = 0 ;
			bestsize.right = 16 ;
			bestsize.bottom = 16 ;
			if ( IsKindOf( CLASSINFO( wxScrollBar ) ) )
			{
				bestsize.bottom = 16 ;
			}
			else if ( IsKindOf( CLASSINFO( wxSpinButton ) ) )
			{
				bestsize.bottom = 24 ;
			}
		}

		if ( m_width == -1 )
		{
			if ( IsKindOf( CLASSINFO( wxButton ) ) )
			{
				m_width = m_label.Length() * 8 + 12 ;
				if ( m_width < 70 )
				  m_width = 70 ;
			}
			else if ( IsKindOf( CLASSINFO( wxStaticText ) ) )
			{
				m_width = m_label.Length() * 8 ;
			}
			else
				m_width = bestsize.right - bestsize.left ;

			m_width += 2 * m_macHorizontalBorder ;
		}
		if ( m_height == -1 )
		{
			m_height = bestsize.bottom - bestsize.top ;
			if ( m_height < 10 )
				m_height = 13 ;

			m_height += 2 * m_macVerticalBorder;
		}

		wxMacDrawingHelper helper ( wxFindWinFromMacWindow( GetMacRootWindow() ) ) ;
		if ( helper.Ok() )
		{
	    	UMASizeControl( m_macControl , m_width - 2 * m_macHorizontalBorder, m_height -  2 * m_macVerticalBorder ) ;
  		}
	}
}
ControlHandle wxControl::MacGetContainerForEmbedding()
{
	if ( m_macControl )
		return m_macControl ;

	return wxWindow::MacGetContainerForEmbedding() ;
}

void wxControl::MacSuperChangedPosition()
{
	if ( m_macControl )
	{
		Rect contrlRect ;
		GetControlBounds( m_macControl , &contrlRect ) ;
		int former_mac_x = contrlRect.left ;
		int former_mac_y = contrlRect.top ;
		int mac_x = m_x ;
		int mac_y = m_y ;
		GetParent()->MacClientToRootWindow( & mac_x , & mac_y ) ;

		WindowRef rootwindow = GetMacRootWindow() ;
		wxWindow* wxrootwindow = wxFindWinFromMacWindow( rootwindow ) ;
		UMASetThemeWindowBackground( rootwindow , kThemeBrushDialogBackgroundActive , false ) ;
		wxMacDrawingHelper focus( wxrootwindow ) ;

		if ( mac_x != former_mac_x || mac_y != former_mac_y )
		{
			{
				Rect inval = { former_mac_y , former_mac_x , former_mac_y + m_height , former_mac_x + m_width } ;
				InvalWindowRect( rootwindow , &inval ) ;
			}
	  		UMAMoveControl( m_macControl , mac_x + m_macHorizontalBorder , mac_y + m_macVerticalBorder ) ;
			{
				Rect inval = { mac_y , mac_x , mac_y + m_height , mac_x + m_width } ;
				InvalWindowRect( rootwindow , &inval ) ;
			}
		}
		if ( wxrootwindow->IsKindOf( CLASSINFO( wxDialog ) ) )
		{
		}
		else
		{
			UMASetThemeWindowBackground( rootwindow , kThemeBrushDocumentWindowBackground , false ) ;
		}
	}

	wxWindow::MacSuperChangedPosition() ;
}

void wxControl::MacSuperEnabled( bool enabled )
{
/*
	if ( m_macControl )
	{
		if ( UMAHasAppearance() )
		{
			if ( !enabled )
			{
				::DeactivateControl( m_macControl ) ;
			}
			else
			{
				if ( m_macEnabled )
					::ActivateControl( m_macControl ) ;
			}
		}
		else
		{
			if ( !enabled )
			{
				::HiliteControl( m_macControl , 255 ) ;
			}
			else
			{
				if ( m_macEnabled )
					::HiliteControl( m_macControl , 0 ) ;
			}
		}
	}
	wxWindow::MacSuperEnabled( enabled ) ;
*/
}

void  wxControl::MacSuperShown( bool show )
{
	if ( m_macControl )
	{
		if ( !show )
		{
			if ( m_macControlIsShown )
			{
				::UMAHideControl( m_macControl ) ;
				m_macControlIsShown = false ;
			}
		}
		else
		{
			if ( MacIsReallyShown() && !m_macControlIsShown )
			{
				::UMAShowControl( m_macControl ) ;
				m_macControlIsShown = true ;
			}
		}
	}

	wxWindow::MacSuperShown( show ) ;
}

void  wxControl::DoSetSize(int x, int y,
            int width, int height,
            int sizeFlags )
{
	if ( m_macControl == NULL )
	{
		wxWindow::DoSetSize( x , y ,width , height ,sizeFlags ) ;
		return ;
	}

	WindowRef rootwindow = GetMacRootWindow() ;
	wxWindow* wxrootwindow = wxFindWinFromMacWindow( rootwindow ) ;
	UMASetThemeWindowBackground( rootwindow , kThemeBrushDialogBackgroundActive , false ) ;

	int former_x = m_x ;
	int former_y = m_y ;
	int former_w = m_width ;
	int former_h = m_height ;

	Rect contrlRect ;
	GetControlBounds( m_macControl , &contrlRect ) ;
	int former_mac_x = contrlRect.left ;
	int former_mac_y = contrlRect.top ;

  int currentX, currentY;
  GetPosition(&currentX, &currentY);
  int currentW,currentH;
  GetSize(&currentW, &currentH);

  int actualWidth = width;
  int actualHeight = height;
  int actualX = x;
  int actualY = y;
  if (x == -1 && !(sizeFlags & wxSIZE_ALLOW_MINUS_ONE))
      actualX = currentX;
  if (y == -1 && !(sizeFlags & wxSIZE_ALLOW_MINUS_ONE))
      actualY = currentY;
  if (width == -1)
      actualWidth = currentW ;
  if (height == -1)
      actualHeight = currentH ;

	if ( actualX == currentX && actualY == currentY && actualWidth == currentW && actualHeight == currentH)
		return ;

	AdjustForParentClientOrigin(actualX, actualY, sizeFlags);
	WindowRef macrootwindow = GetMacRootWindow() ;
	wxMacDrawingHelper focus( wxFindWinFromMacWindow( macrootwindow ) ) ;

	int mac_x = actualX ;
	int mac_y = actualY ;
	GetParent()->MacClientToRootWindow( & mac_x , & mac_y ) ;

	if ( mac_x != former_mac_x || mac_y != former_mac_y )
	{
		{
			Rect inval = { former_mac_y , former_mac_x , former_mac_y + m_height , former_mac_x + m_width } ;
			InvalWindowRect( macrootwindow, &inval ) ;
		}
  		UMAMoveControl( m_macControl , mac_x + m_macHorizontalBorder , mac_y  + m_macVerticalBorder ) ;
		{
			Rect inval = { mac_y , mac_x , mac_y + m_height , mac_x + m_width } ;
			InvalWindowRect(macrootwindow, &inval ) ;
		}
	}

	if ( actualX != former_x || actualY != former_y )
	{
		m_x = actualX ;
		m_y = actualY ;

		MacRepositionScrollBars() ;
		// To consider -> should the parameters be the effective or the virtual coordinates (AdjustForParent..)
    wxMoveEvent event(wxPoint(m_x, m_y), m_windowId);
    event.SetEventObject(this);
    GetEventHandler()->ProcessEvent(event);
	}
	if ( actualWidth != former_w || actualHeight != former_h )
	{
		{
			Rect inval = { mac_y , mac_x , mac_y + former_h , mac_x + former_w } ;
			InvalWindowRect( macrootwindow, &inval ) ;
		}
		m_width = actualWidth ;
		m_height = actualHeight ;

   		UMASizeControl( m_macControl ,  m_width - 2 * m_macHorizontalBorder, m_height -  2 * m_macVerticalBorder ) ;
		{
			Rect inval = { mac_y , mac_x , mac_y + m_height , mac_x + m_width } ;
			InvalWindowRect( macrootwindow , &inval ) ;
		}

		MacRepositionScrollBars() ;
    wxSizeEvent event(wxSize(m_width, m_height), m_windowId);
    event.SetEventObject(this);
    GetEventHandler()->ProcessEvent(event);
	}
	if ( wxrootwindow->IsKindOf( CLASSINFO( wxDialog ) ) )
	{
	}
	else
	{
		UMASetThemeWindowBackground( rootwindow , kThemeBrushDocumentWindowBackground , false ) ;
	}
}

bool  wxControl::Show(bool show)
{
	if ( !wxWindow::Show( show ) )
		return FALSE ;

	if ( m_macControl )
	{
		if ( !show )
		{
			if ( m_macControlIsShown )
			{
				::UMAHideControl( m_macControl ) ;
				m_macControlIsShown = false ;
			}
		}
		else
		{
			if ( MacIsReallyShown() && !m_macControlIsShown )
			{
				::UMAShowControl( m_macControl ) ;
				m_macControlIsShown = true ;
			}
		}
	}
	return TRUE ;
}

bool  wxControl::Enable(bool enable)
{
    if ( !wxWindow::Enable(enable) )
        return FALSE;

	if ( m_macControl )
	{

		if ( UMAHasAppearance() )
		{
			if ( enable )
				::ActivateControl( m_macControl ) ;
			else
				::DeactivateControl( m_macControl ) ;
		}
		else
		{
			if ( enable )
				::HiliteControl( m_macControl , 0 ) ;
			else
				::HiliteControl( m_macControl , 255 ) ;
		}
	}
	return TRUE ;
}

void wxControl::Refresh(bool eraseBack, const wxRect *rect)
{
  if ( m_macControl )
  {
  	wxWindow::Refresh( eraseBack , rect ) ;
	}
  else
  {
  	wxWindow::Refresh( eraseBack , rect ) ;
  }
}

void wxControl::MacRedrawControl()
{
	if ( m_macControl )
	{
		WindowRef window = GetMacRootWindow() ;
		if ( window )
		{
			wxWindow* win = wxFindWinFromMacWindow( window ) ;
			if ( win )
			{
				wxMacDrawingHelper help( win ) ;
				// the mac control manager always assumes to have the origin at 0,0
				SetOrigin( 0 , 0 ) ;

				bool			hasTabBehind = false ;
				wxWindow* parent = GetParent() ;
				while ( parent )
				{
					if( parent->MacGetWindowData() )
					{
						UMASetThemeWindowBackground( win->MacGetWindowData()->m_macWindow , kThemeBrushDialogBackgroundActive , false ) ;
						break ;
					}

					if( parent->IsKindOf( CLASSINFO( wxNotebook ) ) ||  parent->IsKindOf( CLASSINFO( wxTabCtrl ) ))
					{
						if ( ((wxControl*)parent)->m_macControl )
							SetUpControlBackground( ((wxControl*)parent)->m_macControl , -1 , true ) ;
						break ;
					}

					parent = parent->GetParent() ;
				}

				UMADrawControl( m_macControl ) ;
				UMASetThemeWindowBackground( win->MacGetWindowData()->m_macWindow , win->MacGetWindowData()->m_macWindowBackgroundTheme , false ) ;
			}
		}
	}
}

void wxControl::OnPaint(wxPaintEvent& event)
{
	if ( m_macControl )
	{
		WindowRef window = GetMacRootWindow() ;
		if ( window )
		{
			wxWindow* win = wxFindWinFromMacWindow( window ) ;
			if ( win )
			{
				wxMacDrawingHelper help( win ) ;
				// the mac control manager always assumes to have the origin at 0,0
				SetOrigin( 0 , 0 ) ;

				bool			hasTabBehind = false ;
				wxWindow* parent = GetParent() ;
				while ( parent )
				{
					if( parent->MacGetWindowData() )
					{
						UMASetThemeWindowBackground( win->MacGetWindowData()->m_macWindow , kThemeBrushDialogBackgroundActive , false ) ;
						break ;
					}

					if( parent->IsKindOf( CLASSINFO( wxNotebook ) ) ||  parent->IsKindOf( CLASSINFO( wxTabCtrl ) ))
					{
						if ( ((wxControl*)parent)->m_macControl )
							SetUpControlBackground( ((wxControl*)parent)->m_macControl , -1 , true ) ;
						break ;
					}

					parent = parent->GetParent() ;
				}

				UMADrawControl( m_macControl ) ;
				UMASetThemeWindowBackground( win->MacGetWindowData()->m_macWindow , win->MacGetWindowData()->m_macWindowBackgroundTheme , false ) ;
			}
		}
	}
	else
	{
		// wxWindow::OnPaint( event ) ;
	}
}
void wxControl::OnEraseBackground(wxEraseEvent& event)
{
    // In general, you don't want to erase the background of a control,
    // or you'll get a flicker.
    // TODO: move this 'null' function into each control that
    // might flicker.
}


void  wxControl::OnKeyDown( wxKeyEvent &event )
{
	if ( m_macControl == NULL )
		return ;

	EventRecord *ev = wxTheApp->MacGetCurrentEvent() ;
	short keycode ;
	short keychar ;
	keychar = short(ev->message & charCodeMask);
	keycode = short(ev->message & keyCodeMask) >> 8 ;

	UMAHandleControlKey( m_macControl , keycode , keychar , ev->modifiers ) ;
}

void  wxControl::OnMouseEvent( wxMouseEvent &event )
{
	if ( m_macControl == NULL )
	{
		event.Skip() ;
		return ;
	}

	if (event.GetEventType() == wxEVT_LEFT_DOWN || event.GetEventType() == wxEVT_LEFT_DCLICK )
	{

		int x = event.m_x ;
		int y = event.m_y ;

		MacClientToRootWindow( &x , &y ) ;

		ControlHandle	control ;
		Point		localwhere ;
		GrafPtr		port ;
		SInt16		controlpart ;
		WindowRef	window = GetMacRootWindow() ;

		localwhere.h = x ;
		localwhere.v = y ;

		short modifiers = 0;

		if ( !event.m_leftDown && !event.m_rightDown )
			modifiers  |= btnState ;

		if ( event.m_shiftDown )
			modifiers |= shiftKey ;

		if ( event.m_controlDown )
			modifiers |= controlKey ;

		if ( event.m_altDown )
			modifiers |= optionKey ;

		if ( event.m_metaDown )
			modifiers |= cmdKey ;

		controlpart = FindControl( localwhere , window , &control ) ;
		{
		/*
			if ( AcceptsFocus() && FindFocus() != this )
			{
				SetFocus() ;
			}
		*/
			if ( control && UMAIsControlActive( control ) )
			{
				{
					if ( controlpart == kControlIndicatorPart && !UMAHasAppearance() )
						controlpart = UMAHandleControlClick( control , localwhere , modifiers , (ControlActionUPP) NULL ) ;
					else
						controlpart = UMAHandleControlClick( control , localwhere , modifiers , (ControlActionUPP) -1 ) ;
					wxTheApp->s_lastMouseDown = 0 ;
					if ( controlpart && ! ( ( UMAHasAppearance() || (controlpart != kControlIndicatorPart) )
						&& (IsKindOf( CLASSINFO( wxScrollBar ) ) ) ) ) // otherwise we will get the event twice
					{
						MacHandleControlClick( control , controlpart ) ;
					}
				}
			}
		}
	}
}

bool wxControl::MacCanFocus() const
{
		{ if ( m_macControl == NULL )
				return true ;
			else
			return false ;
		}
}

void wxControl::MacHandleControlClick( ControlHandle control , SInt16 controlpart )
{
	wxASSERT_MSG( m_macControl != NULL , "No valid mac control" ) ;
}
Commit	Line	Data
	1	/////////////////////////////////////////////////////////////////////////////
	2	// Name: control.cpp
	3	// Purpose: wxControl class
	4	// Author: AUTHOR
	5	// Modified by:
	6	// Created: ??/??/98
	7	// RCS-ID: $Id$
	8	// Copyright: (c) AUTHOR
	9	// Licence: wxWindows licence
	10	/////////////////////////////////////////////////////////////////////////////
	11
	12	#ifdef __GNUG__
	13	#pragma implementation "control.h"
	14	#endif
	15
	16	#include "wx/control.h"
	17	#include "wx/panel.h"
	18	#include "wx/app.h"
	19	#include "wx/dc.h"
	20	#include "wx/notebook.h"
	21	#include "wx/tabctrl.h"
	22	#include "wx/radiobox.h"
	23	#include "wx/spinbutt.h"
	24	#include "wx/scrolbar.h"
	25	#include "wx/button.h"
	26	#include "wx/dialog.h"
	27	#include "wx/statbox.h"
	28	#include "wx/sizer.h"
	29	#include "wx/stattext.h"
	30
	31	#if !USE_SHARED_LIBRARY
	32	IMPLEMENT_ABSTRACT_CLASS(wxControl, wxWindow)
	33
	34	BEGIN_EVENT_TABLE(wxControl, wxWindow)
	35	EVT_MOUSE_EVENTS( wxControl::OnMouseEvent )
	36	EVT_CHAR( wxControl::OnKeyDown )
	37	EVT_PAINT( wxControl::OnPaint )
	38	END_EVENT_TABLE()
	39	#endif
	40
	41	#include <wx/mac/uma.h>
	42
	43	// Item members
	44
	45	ControlActionUPP wxMacLiveScrollbarActionUPP = NULL ;
	46
	47	pascal void wxMacLiveScrollbarActionProc( ControlHandle control , ControlPartCode partCode ) ;
	48	pascal void wxMacLiveScrollbarActionProc( ControlHandle control , ControlPartCode partCode )
	49	{
	50	if ( partCode != 0)
	51	{
	52	wxControl* wx = (wxControl*) GetControlReference( control ) ;
	53	if ( wx )
	54	{
	55	wx->MacHandleControlClick( control , partCode ) ;
	56	}
	57	}
	58	}
	59
	60	wxControl::wxControl()
	61	{
	62	m_macControl = NULL ;
	63	m_macHorizontalBorder = 0 ; // additional pixels around the real control
	64	m_macVerticalBorder = 0 ;
	65	m_backgroundColour = *wxWHITE;
	66	m_foregroundColour = *wxBLACK;
	67	#if WXWIN_COMPATIBILITY
	68	m_callback = 0;
	69	#endif // WXWIN_COMPATIBILITY
	70
	71	if ( wxMacLiveScrollbarActionUPP == NULL )
	72	{
	73	#ifdef __UNIX__
	74	wxMacLiveScrollbarActionUPP = NewControlActionUPP( wxMacLiveScrollbarActionProc );
	75	#else
	76	wxMacLiveScrollbarActionUPP = NewControlActionProc( wxMacLiveScrollbarActionProc ) ;
	77	#endif
	78	}
	79	}
	80
	81	bool wxControl::Create(wxWindow *parent, wxWindowID id,
	82	const wxPoint& pos,
	83	const wxSize& size, long style,
	84	const wxValidator& validator,
	85	const wxString& name)
	86	{
	87	m_macControl = NULL ;
	88	m_macHorizontalBorder = 0 ; // additional pixels around the real control
	89	m_macVerticalBorder = 0 ;
	90	bool rval = wxWindow::Create(parent, id, pos, size, style, name);
	91	if (rval) {
	92	#if wxUSE_VALIDATORS
	93	SetValidator(validator);
	94	#endif
	95	}
	96	return rval;
	97	}
	98
	99	wxControl::~wxControl()
	100	{
	101	m_isBeingDeleted = TRUE;
	102	// If we delete an item, we should initialize the parent panel,
	103	// because it could now be invalid.
	104	wxPanel *panel = wxDynamicCast(GetParent(), wxPanel);
	105	if ( panel )
	106	{
	107	if (panel->GetDefaultItem() == (wxButton*) this)
	108	panel->SetDefaultItem(NULL);
	109	}
	110	if ( m_macControl )
	111	{
	112	UMADisposeControl( m_macControl ) ;
	113	m_macControl = NULL ;
	114	}
	115	}
	116
	117	void wxControl::SetLabel(const wxString& title)
	118	{
	119	m_label = title ;
	120
	121	if ( m_macControl )
	122	{
	123	Str255 maclabel ;
	124	wxString label ;
	125
	126	if( wxApp::s_macDefaultEncodingIsPC )
	127	label = wxMacMakeMacStringFromPC( title ) ;
	128	else
	129	label = title ;
	130
	131	#if TARGET_CARBON
	132	c2pstrcpy( (StringPtr) maclabel , label ) ;
	133	#else
	134	strcpy( (char *) maclabel , label ) ;
	135	c2pstr( (char *) maclabel ) ;
	136	#endif
	137	::SetControlTitle( m_macControl , maclabel ) ;
	138	}
	139	}
	140
	141	wxSize wxControl::DoGetBestSize() const
	142	{
	143	return wxSize(20, 20);
	144	}
	145
	146	bool wxControl::ProcessCommand (wxCommandEvent & event)
	147	{
	148	// Tries:
	149	// 1) A callback function (to become obsolete)
	150	// 2) OnCommand, starting at this window and working up parent hierarchy
	151	// 3) OnCommand then calls ProcessEvent to search the event tables.
	152	#if WXWIN_COMPATIBILITY
	153	if ( m_callback )
	154	{
	155	(void)(*m_callback)(this, event);
	156
	157	return TRUE;
	158	}
	159	else
	160	#endif // WXWIN_COMPATIBILITY
	161	{
	162	return GetEventHandler()->ProcessEvent(event);
	163	}
	164	}
	165
	166	// ------------------------
	167	wxList *wxWinMacControlList = NULL;
	168	wxControl *wxFindControlFromMacControl(ControlHandle inControl )
	169	{
	170	wxNode *node = wxWinMacControlList->Find((long)inControl);
	171	if (!node)
	172	return NULL;
	173	return (wxControl *)node->Data();
	174	}
	175
	176	void wxAssociateControlWithMacControl(ControlHandle inControl, wxControl *control)
	177	{
	178	// adding NULL WindowRef is (first) surely a result of an error and
	179	// (secondly) breaks menu command processing
	180	wxCHECK_RET( inControl != (ControlHandle) NULL, "attempt to add a NULL WindowRef to window list" );
	181
	182	if ( !wxWinMacControlList->Find((long)inControl) )
	183	wxWinMacControlList->Append((long)inControl, control);
	184	}
	185
	186	void wxRemoveMacControlAssociation(wxControl *control)
	187	{
	188	wxWinMacControlList->DeleteObject(control);
	189	}
	190
	191	void wxControl::MacPreControlCreate( wxWindow *parent, wxWindowID id, wxString label ,
	192	const wxPoint& pos,
	193	const wxSize& size, long style,
	194	const wxValidator& validator,
	195	const wxString& name , Rect *outBounds , StringPtr maclabel )
	196	{
	197	m_label = label ;
	198	SetName(name);
	199	if ( &validator )
	200	SetValidator(validator);
	201
	202	m_windowStyle = style;
	203	parent->AddChild((wxButton *)this);
	204
	205	m_backgroundColour = parent->GetBackgroundColour() ;
	206	m_foregroundColour = parent->GetForegroundColour() ;
	207
	208	if (id == -1)
	209	m_windowId = NewControlId();
	210	else
	211	m_windowId = id;
	212
	213	m_width = size.x ;
	214	m_height = size.y ;
	215	int x = pos.x ;
	216	int y = pos.y ;
	217	AdjustForParentClientOrigin(x, y, wxSIZE_USE_EXISTING);
	218	m_x = x ;
	219	m_y = y ;
	220
	221
	222	parent->MacClientToRootWindow( &x , &y ) ;
	223	outBounds->top = y + m_macVerticalBorder ;
	224	outBounds->left = x + m_macHorizontalBorder ;
	225	outBounds->bottom = outBounds->top + m_height - 2 * m_macVerticalBorder;
	226	outBounds->right = outBounds->left + m_width - 2 * m_macHorizontalBorder ;
	227
	228	char c_text[255];
	229	strcpy( c_text , label ) ;
	230	if( wxApp::s_macDefaultEncodingIsPC )
	231	{
	232	wxMacConvertFromPCForControls( c_text ) ;
	233	}
	234
	235	#if TARGET_CARBON
	236	c2pstrcpy( (StringPtr) maclabel , c_text ) ;
	237	#else
	238	strcpy( (char *) maclabel , c_text ) ;
	239	c2pstr( (char *) maclabel ) ;
	240	#endif
	241	}
	242
	243	void wxControl::MacPostControlCreate()
	244	{
	245	wxASSERT_MSG( m_macControl != NULL , "No valid mac control" ) ;
	246
	247	if ( IsKindOf( CLASSINFO( wxScrollBar ) ) )
	248	{
	249	// no font
	250	}
	251	else if ( IsKindOf( CLASSINFO( wxStaticBox ) ) \|\| IsKindOf( CLASSINFO( wxRadioBox ) ) \|\| IsKindOf( CLASSINFO( wxButton ) ) )
	252	{
	253	ControlFontStyleRec controlstyle ;
	254	controlstyle.flags = kControlUseFontMask ;
	255	controlstyle.font = kControlFontSmallBoldSystemFont ;
	256
	257	::UMASetControlFontStyle( m_macControl , &controlstyle ) ;
	258	}
	259	else
	260	{
	261	ControlFontStyleRec controlstyle ;
	262	controlstyle.flags = kControlUseFontMask ;
	263	controlstyle.font = kControlFontSmallSystemFont ;
	264
	265	::UMASetControlFontStyle( m_macControl , &controlstyle ) ;
	266	}
	267	ControlHandle container = GetParent()->MacGetContainerForEmbedding() ;
	268	wxASSERT_MSG( container != NULL , "No valid mac container control" ) ;
	269	::UMAEmbedControl( m_macControl , container ) ;
	270	m_macControlIsShown = true ;
	271	MacAdjustControlRect() ;
	272	wxAssociateControlWithMacControl( m_macControl , this ) ;
	273	}
	274
	275	void wxControl::MacAdjustControlRect()
	276	{
	277	wxASSERT_MSG( m_macControl != NULL , "No valid mac control" ) ;
	278	if ( m_width == -1 \|\| m_height == -1 )
	279	{
	280	Rect bestsize = { 0 , 0 , 0 , 0 } ;
	281	short baselineoffset ;
	282
	283	UMAGetBestControlRect( m_macControl , &bestsize , &baselineoffset ) ;
	284
	285	if ( EmptyRect( &bestsize ) )
	286	{
	287	baselineoffset = 0;
	288	bestsize.left = bestsize.top = 0 ;
	289	bestsize.right = 16 ;
	290	bestsize.bottom = 16 ;
	291	if ( IsKindOf( CLASSINFO( wxScrollBar ) ) )
	292	{
	293	bestsize.bottom = 16 ;
	294	}
	295	else if ( IsKindOf( CLASSINFO( wxSpinButton ) ) )
	296	{
	297	bestsize.bottom = 24 ;
	298	}
	299	}
	300
	301	if ( m_width == -1 )
	302	{
	303	if ( IsKindOf( CLASSINFO( wxButton ) ) )
	304	{
	305	m_width = m_label.Length() * 8 + 12 ;
	306	if ( m_width < 70 )
	307	m_width = 70 ;
	308	}
	309	else if ( IsKindOf( CLASSINFO( wxStaticText ) ) )
	310	{
	311	m_width = m_label.Length() * 8 ;
	312	}
	313	else
	314	m_width = bestsize.right - bestsize.left ;
	315
	316	m_width += 2 * m_macHorizontalBorder ;
	317	}
	318	if ( m_height == -1 )
	319	{
	320	m_height = bestsize.bottom - bestsize.top ;
	321	if ( m_height < 10 )
	322	m_height = 13 ;
	323
	324	m_height += 2 * m_macVerticalBorder;
	325	}
	326
	327	wxMacDrawingHelper helper ( wxFindWinFromMacWindow( GetMacRootWindow() ) ) ;
	328	if ( helper.Ok() )
	329	{
	330	UMASizeControl( m_macControl , m_width - 2 * m_macHorizontalBorder, m_height - 2 * m_macVerticalBorder ) ;
	331	}
	332	}
	333	}
	334	ControlHandle wxControl::MacGetContainerForEmbedding()
	335	{
	336	if ( m_macControl )
	337	return m_macControl ;
	338
	339	return wxWindow::MacGetContainerForEmbedding() ;
	340	}
	341
	342	void wxControl::MacSuperChangedPosition()
	343	{
	344	if ( m_macControl )
	345	{
	346	Rect contrlRect ;
	347	GetControlBounds( m_macControl , &contrlRect ) ;
	348	int former_mac_x = contrlRect.left ;
	349	int former_mac_y = contrlRect.top ;
	350	int mac_x = m_x ;
	351	int mac_y = m_y ;
	352	GetParent()->MacClientToRootWindow( & mac_x , & mac_y ) ;
	353
	354	WindowRef rootwindow = GetMacRootWindow() ;
	355	wxWindow* wxrootwindow = wxFindWinFromMacWindow( rootwindow ) ;
	356	UMASetThemeWindowBackground( rootwindow , kThemeBrushDialogBackgroundActive , false ) ;
	357	wxMacDrawingHelper focus( wxrootwindow ) ;
	358
	359	if ( mac_x != former_mac_x \|\| mac_y != former_mac_y )
	360	{
	361	{
	362	Rect inval = { former_mac_y , former_mac_x , former_mac_y + m_height , former_mac_x + m_width } ;
	363	InvalWindowRect( rootwindow , &inval ) ;
	364	}
	365	UMAMoveControl( m_macControl , mac_x + m_macHorizontalBorder , mac_y + m_macVerticalBorder ) ;
	366	{
	367	Rect inval = { mac_y , mac_x , mac_y + m_height , mac_x + m_width } ;
	368	InvalWindowRect( rootwindow , &inval ) ;
	369	}
	370	}
	371	if ( wxrootwindow->IsKindOf( CLASSINFO( wxDialog ) ) )
	372	{
	373	}
	374	else
	375	{
	376	UMASetThemeWindowBackground( rootwindow , kThemeBrushDocumentWindowBackground , false ) ;
	377	}
	378	}
	379
	380	wxWindow::MacSuperChangedPosition() ;
	381	}
	382
	383	void wxControl::MacSuperEnabled( bool enabled )
	384	{
	385	/*
	386	if ( m_macControl )
	387	{
	388	if ( UMAHasAppearance() )
	389	{
	390	if ( !enabled )
	391	{
	392	::DeactivateControl( m_macControl ) ;
	393	}
	394	else
	395	{
	396	if ( m_macEnabled )
	397	::ActivateControl( m_macControl ) ;
	398	}
	399	}
	400	else
	401	{
	402	if ( !enabled )
	403	{
	404	::HiliteControl( m_macControl , 255 ) ;
	405	}
	406	else
	407	{
	408	if ( m_macEnabled )
	409	::HiliteControl( m_macControl , 0 ) ;
	410	}
	411	}
	412	}
	413	wxWindow::MacSuperEnabled( enabled ) ;
	414	*/
	415	}
	416
	417	void wxControl::MacSuperShown( bool show )
	418	{
	419	if ( m_macControl )
	420	{
	421	if ( !show )
	422	{
	423	if ( m_macControlIsShown )
	424	{
	425	::UMAHideControl( m_macControl ) ;
	426	m_macControlIsShown = false ;
	427	}
	428	}
	429	else
	430	{
	431	if ( MacIsReallyShown() && !m_macControlIsShown )
	432	{
	433	::UMAShowControl( m_macControl ) ;
	434	m_macControlIsShown = true ;
	435	}
	436	}
	437	}
	438
	439	wxWindow::MacSuperShown( show ) ;
	440	}
	441
	442	void wxControl::DoSetSize(int x, int y,
	443	int width, int height,
	444	int sizeFlags )
	445	{
	446	if ( m_macControl == NULL )
	447	{
	448	wxWindow::DoSetSize( x , y ,width , height ,sizeFlags ) ;
	449	return ;
	450	}
	451
	452	WindowRef rootwindow = GetMacRootWindow() ;
	453	wxWindow* wxrootwindow = wxFindWinFromMacWindow( rootwindow ) ;
	454	UMASetThemeWindowBackground( rootwindow , kThemeBrushDialogBackgroundActive , false ) ;
	455
	456	int former_x = m_x ;
	457	int former_y = m_y ;
	458	int former_w = m_width ;
	459	int former_h = m_height ;
	460
	461	Rect contrlRect ;
	462	GetControlBounds( m_macControl , &contrlRect ) ;
	463	int former_mac_x = contrlRect.left ;
	464	int former_mac_y = contrlRect.top ;
	465
	466	int currentX, currentY;
	467	GetPosition(&currentX, &currentY);
	468	int currentW,currentH;
	469	GetSize(&currentW, &currentH);
	470
	471	int actualWidth = width;
	472	int actualHeight = height;
	473	int actualX = x;
	474	int actualY = y;
	475	if (x == -1 && !(sizeFlags & wxSIZE_ALLOW_MINUS_ONE))
	476	actualX = currentX;
	477	if (y == -1 && !(sizeFlags & wxSIZE_ALLOW_MINUS_ONE))
	478	actualY = currentY;
	479	if (width == -1)
	480	actualWidth = currentW ;
	481	if (height == -1)
	482	actualHeight = currentH ;
	483
	484	if ( actualX == currentX && actualY == currentY && actualWidth == currentW && actualHeight == currentH)
	485	return ;
	486
	487	AdjustForParentClientOrigin(actualX, actualY, sizeFlags);
	488	WindowRef macrootwindow = GetMacRootWindow() ;
	489	wxMacDrawingHelper focus( wxFindWinFromMacWindow( macrootwindow ) ) ;
	490
	491	int mac_x = actualX ;
	492	int mac_y = actualY ;
	493	GetParent()->MacClientToRootWindow( & mac_x , & mac_y ) ;
	494
	495	if ( mac_x != former_mac_x \|\| mac_y != former_mac_y )
	496	{
	497	{
	498	Rect inval = { former_mac_y , former_mac_x , former_mac_y + m_height , former_mac_x + m_width } ;
	499	InvalWindowRect( macrootwindow, &inval ) ;
	500	}
	501	UMAMoveControl( m_macControl , mac_x + m_macHorizontalBorder , mac_y + m_macVerticalBorder ) ;
	502	{
	503	Rect inval = { mac_y , mac_x , mac_y + m_height , mac_x + m_width } ;
	504	InvalWindowRect(macrootwindow, &inval ) ;
	505	}
	506	}
	507
	508	if ( actualX != former_x \|\| actualY != former_y )
	509	{
	510	m_x = actualX ;
	511	m_y = actualY ;
	512
	513	MacRepositionScrollBars() ;
	514	// To consider -> should the parameters be the effective or the virtual coordinates (AdjustForParent..)
	515	wxMoveEvent event(wxPoint(m_x, m_y), m_windowId);
	516	event.SetEventObject(this);
	517	GetEventHandler()->ProcessEvent(event);
	518	}
	519	if ( actualWidth != former_w \|\| actualHeight != former_h )
	520	{
	521	{
	522	Rect inval = { mac_y , mac_x , mac_y + former_h , mac_x + former_w } ;
	523	InvalWindowRect( macrootwindow, &inval ) ;
	524	}
	525	m_width = actualWidth ;
	526	m_height = actualHeight ;
	527
	528	UMASizeControl( m_macControl , m_width - 2 * m_macHorizontalBorder, m_height - 2 * m_macVerticalBorder ) ;
	529	{
	530	Rect inval = { mac_y , mac_x , mac_y + m_height , mac_x + m_width } ;
	531	InvalWindowRect( macrootwindow , &inval ) ;
	532	}
	533
	534	MacRepositionScrollBars() ;
	535	wxSizeEvent event(wxSize(m_width, m_height), m_windowId);
	536	event.SetEventObject(this);
	537	GetEventHandler()->ProcessEvent(event);
	538	}
	539	if ( wxrootwindow->IsKindOf( CLASSINFO( wxDialog ) ) )
	540	{
	541	}
	542	else
	543	{
	544	UMASetThemeWindowBackground( rootwindow , kThemeBrushDocumentWindowBackground , false ) ;
	545	}
	546	}
	547
	548	bool wxControl::Show(bool show)
	549	{
	550	if ( !wxWindow::Show( show ) )
	551	return FALSE ;
	552
	553	if ( m_macControl )
	554	{
	555	if ( !show )
	556	{
	557	if ( m_macControlIsShown )
	558	{
	559	::UMAHideControl( m_macControl ) ;
	560	m_macControlIsShown = false ;
	561	}
	562	}
	563	else
	564	{
	565	if ( MacIsReallyShown() && !m_macControlIsShown )
	566	{
	567	::UMAShowControl( m_macControl ) ;
	568	m_macControlIsShown = true ;
	569	}
	570	}
	571	}
	572	return TRUE ;
	573	}
	574
	575	bool wxControl::Enable(bool enable)
	576	{
	577	if ( !wxWindow::Enable(enable) )
	578	return FALSE;
	579
	580	if ( m_macControl )
	581	{
	582
	583	if ( UMAHasAppearance() )
	584	{
	585	if ( enable )
	586	::ActivateControl( m_macControl ) ;
	587	else
	588	::DeactivateControl( m_macControl ) ;
	589	}
	590	else
	591	{
	592	if ( enable )
	593	::HiliteControl( m_macControl , 0 ) ;
	594	else
	595	::HiliteControl( m_macControl , 255 ) ;
	596	}
	597	}
	598	return TRUE ;
	599	}
	600
	601	void wxControl::Refresh(bool eraseBack, const wxRect *rect)
	602	{
	603	if ( m_macControl )
	604	{
	605	wxWindow::Refresh( eraseBack , rect ) ;
	606	}
	607	else
	608	{
	609	wxWindow::Refresh( eraseBack , rect ) ;
	610	}
	611	}
	612
	613	void wxControl::MacRedrawControl()
	614	{
	615	if ( m_macControl )
	616	{
	617	WindowRef window = GetMacRootWindow() ;
	618	if ( window )
	619	{
	620	wxWindow* win = wxFindWinFromMacWindow( window ) ;
	621	if ( win )
	622	{
	623	wxMacDrawingHelper help( win ) ;
	624	// the mac control manager always assumes to have the origin at 0,0
	625	SetOrigin( 0 , 0 ) ;
	626
	627	bool hasTabBehind = false ;
	628	wxWindow* parent = GetParent() ;
	629	while ( parent )
	630	{
	631	if( parent->MacGetWindowData() )
	632	{
	633	UMASetThemeWindowBackground( win->MacGetWindowData()->m_macWindow , kThemeBrushDialogBackgroundActive , false ) ;
	634	break ;
	635	}
	636
	637	if( parent->IsKindOf( CLASSINFO( wxNotebook ) ) \|\| parent->IsKindOf( CLASSINFO( wxTabCtrl ) ))
	638	{
	639	if ( ((wxControl*)parent)->m_macControl )
	640	SetUpControlBackground( ((wxControl*)parent)->m_macControl , -1 , true ) ;
	641	break ;
	642	}
	643
	644	parent = parent->GetParent() ;
	645	}
	646
	647	UMADrawControl( m_macControl ) ;
	648	UMASetThemeWindowBackground( win->MacGetWindowData()->m_macWindow , win->MacGetWindowData()->m_macWindowBackgroundTheme , false ) ;
	649	}
	650	}
	651	}
	652	}
	653
	654	void wxControl::OnPaint(wxPaintEvent& event)
	655	{
	656	if ( m_macControl )
	657	{
	658	WindowRef window = GetMacRootWindow() ;
	659	if ( window )
	660	{
	661	wxWindow* win = wxFindWinFromMacWindow( window ) ;
	662	if ( win )
	663	{
	664	wxMacDrawingHelper help( win ) ;
	665	// the mac control manager always assumes to have the origin at 0,0
	666	SetOrigin( 0 , 0 ) ;
	667
	668	bool hasTabBehind = false ;
	669	wxWindow* parent = GetParent() ;
	670	while ( parent )
	671	{
	672	if( parent->MacGetWindowData() )
	673	{
	674	UMASetThemeWindowBackground( win->MacGetWindowData()->m_macWindow , kThemeBrushDialogBackgroundActive , false ) ;
	675	break ;
	676	}
	677
	678	if( parent->IsKindOf( CLASSINFO( wxNotebook ) ) \|\| parent->IsKindOf( CLASSINFO( wxTabCtrl ) ))
	679	{
	680	if ( ((wxControl*)parent)->m_macControl )
	681	SetUpControlBackground( ((wxControl*)parent)->m_macControl , -1 , true ) ;
	682	break ;
	683	}
	684
	685	parent = parent->GetParent() ;
	686	}
	687
	688	UMADrawControl( m_macControl ) ;
	689	UMASetThemeWindowBackground( win->MacGetWindowData()->m_macWindow , win->MacGetWindowData()->m_macWindowBackgroundTheme , false ) ;
	690	}
	691	}
	692	}
	693	else
	694	{
	695	// wxWindow::OnPaint( event ) ;
	696	}
	697	}
	698	void wxControl::OnEraseBackground(wxEraseEvent& event)
	699	{
	700	// In general, you don't want to erase the background of a control,
	701	// or you'll get a flicker.
	702	// TODO: move this 'null' function into each control that
	703	// might flicker.
	704	}
	705
	706
	707	void wxControl::OnKeyDown( wxKeyEvent &event )
	708	{
	709	if ( m_macControl == NULL )
	710	return ;
	711
	712	EventRecord *ev = wxTheApp->MacGetCurrentEvent() ;
	713	short keycode ;
	714	short keychar ;
	715	keychar = short(ev->message & charCodeMask);
	716	keycode = short(ev->message & keyCodeMask) >> 8 ;
	717
	718	UMAHandleControlKey( m_macControl , keycode , keychar , ev->modifiers ) ;
	719	}
	720
	721	void wxControl::OnMouseEvent( wxMouseEvent &event )
	722	{
	723	if ( m_macControl == NULL )
	724	{
	725	event.Skip() ;
	726	return ;
	727	}
	728
	729	if (event.GetEventType() == wxEVT_LEFT_DOWN \|\| event.GetEventType() == wxEVT_LEFT_DCLICK )
	730	{
	731
	732	int x = event.m_x ;
	733	int y = event.m_y ;
	734
	735	MacClientToRootWindow( &x , &y ) ;
	736
	737	ControlHandle control ;
	738	Point localwhere ;
	739	GrafPtr port ;
	740	SInt16 controlpart ;
	741	WindowRef window = GetMacRootWindow() ;
	742
	743	localwhere.h = x ;
	744	localwhere.v = y ;
	745
	746	short modifiers = 0;
	747
	748	if ( !event.m_leftDown && !event.m_rightDown )
	749	modifiers \|= btnState ;
	750
	751	if ( event.m_shiftDown )
	752	modifiers \|= shiftKey ;
	753
	754	if ( event.m_controlDown )
	755	modifiers \|= controlKey ;
	756
	757	if ( event.m_altDown )
	758	modifiers \|= optionKey ;
	759
	760	if ( event.m_metaDown )
	761	modifiers \|= cmdKey ;
	762
	763	controlpart = FindControl( localwhere , window , &control ) ;
	764	{
	765	/*
	766	if ( AcceptsFocus() && FindFocus() != this )
	767	{
	768	SetFocus() ;
	769	}
	770	*/
	771	if ( control && UMAIsControlActive( control ) )
	772	{
	773	{
	774	if ( controlpart == kControlIndicatorPart && !UMAHasAppearance() )
	775	controlpart = UMAHandleControlClick( control , localwhere , modifiers , (ControlActionUPP) NULL ) ;
	776	else
	777	controlpart = UMAHandleControlClick( control , localwhere , modifiers , (ControlActionUPP) -1 ) ;
	778	wxTheApp->s_lastMouseDown = 0 ;
	779	if ( controlpart && ! ( ( UMAHasAppearance() \|\| (controlpart != kControlIndicatorPart) )
	780	&& (IsKindOf( CLASSINFO( wxScrollBar ) ) ) ) ) // otherwise we will get the event twice
	781	{
	782	MacHandleControlClick( control , controlpart ) ;
	783	}
	784	}
	785	}
	786	}
	787	}
	788	}
	789
	790	bool wxControl::MacCanFocus() const
	791	{
	792	{ if ( m_macControl == NULL )
	793	return true ;
	794	else
	795	return false ;
	796	}
	797	}
	798
	799	void wxControl::MacHandleControlClick( ControlHandle control , SInt16 controlpart )
	800	{
	801	wxASSERT_MSG( m_macControl != NULL , "No valid mac control" ) ;
	802	}
	803