+++ /dev/null
-/////////////////////////////////////////////////////////////////////////////
-// Name: src/mac/carbon/window.cpp
-// Purpose: wxWindowMac
-// Author: Stefan Csomor
-// Modified by:
-// Created: 1998-01-01
-// RCS-ID: $Id$
-// Copyright: (c) Stefan Csomor
-// Licence: wxWindows licence
-/////////////////////////////////////////////////////////////////////////////
-
-#include "wx/wxprec.h"
-
-#include "wx/window.h"
-
-#ifndef WX_PRECOMP
- #include "wx/log.h"
- #include "wx/app.h"
- #include "wx/utils.h"
- #include "wx/panel.h"
- #include "wx/frame.h"
- #include "wx/dc.h"
- #include "wx/dcclient.h"
- #include "wx/button.h"
- #include "wx/menu.h"
- #include "wx/dialog.h"
- #include "wx/settings.h"
- #include "wx/msgdlg.h"
- #include "wx/scrolbar.h"
- #include "wx/statbox.h"
- #include "wx/textctrl.h"
- #include "wx/toolbar.h"
- #include "wx/layout.h"
- #include "wx/statusbr.h"
- #include "wx/menuitem.h"
- #include "wx/treectrl.h"
- #include "wx/listctrl.h"
-#endif
-
-#include "wx/tooltip.h"
-#include "wx/spinctrl.h"
-#include "wx/geometry.h"
-
-#if wxUSE_LISTCTRL
- #include "wx/listctrl.h"
-#endif
-
-#if wxUSE_TREECTRL
- #include "wx/treectrl.h"
-#endif
-
-#if wxUSE_CARET
- #include "wx/caret.h"
-#endif
-
-#if wxUSE_POPUPWIN
- #include "wx/popupwin.h"
-#endif
-
-#if wxUSE_DRAG_AND_DROP
-#include "wx/dnd.h"
-#endif
-
-#include "wx/mac/uma.h"
-
-#define MAC_SCROLLBAR_SIZE 15
-#define MAC_SMALL_SCROLLBAR_SIZE 11
-
-#include <string.h>
-
-#ifdef __WXUNIVERSAL__
- IMPLEMENT_ABSTRACT_CLASS(wxWindowMac, wxWindowBase)
-#else
- IMPLEMENT_DYNAMIC_CLASS(wxWindow, wxWindowBase)
-#endif
-
-BEGIN_EVENT_TABLE(wxWindowMac, wxWindowBase)
- EVT_NC_PAINT(wxWindowMac::OnNcPaint)
- EVT_ERASE_BACKGROUND(wxWindowMac::OnEraseBackground)
- EVT_PAINT(wxWindowMac::OnPaint)
- EVT_MOUSE_EVENTS(wxWindowMac::OnMouseEvent)
-END_EVENT_TABLE()
-
-#define wxMAC_DEBUG_REDRAW 0
-#ifndef wxMAC_DEBUG_REDRAW
-#define wxMAC_DEBUG_REDRAW 0
-#endif
-
-// ---------------------------------------------------------------------------
-// Utility Routines to move between different coordinate systems
-// ---------------------------------------------------------------------------
-
-/*
- * Right now we have the following setup :
- * a border that is not part of the native control is always outside the
- * control's border (otherwise we loose all native intelligence, future ways
- * may be to have a second embedding control responsible for drawing borders
- * and backgrounds eventually)
- * so all this border calculations have to be taken into account when calling
- * native methods or getting native oriented data
- * so we have three coordinate systems here
- * wx client coordinates
- * wx window coordinates (including window frames)
- * native coordinates
- */
-
-//
-// originating from native control
-//
-
-
-void wxMacNativeToWindow( const wxWindow* window , RgnHandle handle )
-{
- OffsetRgn( handle , window->MacGetLeftBorderSize() , window->MacGetTopBorderSize() ) ;
-}
-
-void wxMacNativeToWindow( const wxWindow* window , Rect *rect )
-{
- OffsetRect( rect , window->MacGetLeftBorderSize() , window->MacGetTopBorderSize() ) ;
-}
-
-//
-// directed towards native control
-//
-
-void wxMacWindowToNative( const wxWindow* window , RgnHandle handle )
-{
- OffsetRgn( handle , -window->MacGetLeftBorderSize() , -window->MacGetTopBorderSize() );
-}
-
-void wxMacWindowToNative( const wxWindow* window , Rect *rect )
-{
- OffsetRect( rect , -window->MacGetLeftBorderSize() , -window->MacGetTopBorderSize() ) ;
-}
-
-// ---------------------------------------------------------------------------
-// Carbon Events
-// ---------------------------------------------------------------------------
-
-static const EventTypeSpec eventList[] =
-{
- { kEventClassCommand, kEventProcessCommand } ,
- { kEventClassCommand, kEventCommandUpdateStatus } ,
-
- { kEventClassControl , kEventControlGetClickActivation } ,
- { kEventClassControl , kEventControlHit } ,
-
- { kEventClassTextInput, kEventTextInputUnicodeForKeyEvent } ,
- { kEventClassTextInput, kEventTextInputUpdateActiveInputArea } ,
-
- { kEventClassControl , kEventControlDraw } ,
-
- { kEventClassControl , kEventControlVisibilityChanged } ,
- { kEventClassControl , kEventControlEnabledStateChanged } ,
- { kEventClassControl , kEventControlHiliteChanged } ,
-
- { kEventClassControl , kEventControlActivate } ,
- { kEventClassControl , kEventControlDeactivate } ,
-
- { kEventClassControl , kEventControlSetFocusPart } ,
- { kEventClassControl , kEventControlFocusPartChanged } ,
-
- { kEventClassService , kEventServiceGetTypes },
- { kEventClassService , kEventServiceCopy },
- { kEventClassService , kEventServicePaste },
-
-// { kEventClassControl , kEventControlInvalidateForSizeChange } , // 10.3 only
-// { kEventClassControl , kEventControlBoundsChanged } ,
-} ;
-
-static pascal OSStatus wxMacWindowControlEventHandler( EventHandlerCallRef handler , EventRef event , void *data )
-{
- OSStatus result = eventNotHandledErr ;
- static wxWindowMac* targetFocusWindow = NULL;
- static wxWindowMac* formerFocusWindow = NULL;
-
- wxMacCarbonEvent cEvent( event ) ;
-
- ControlRef controlRef ;
- wxWindowMac* thisWindow = (wxWindowMac*) data ;
-
- cEvent.GetParameter( kEventParamDirectObject , &controlRef ) ;
-
- switch ( GetEventKind( event ) )
- {
- case kEventControlDraw :
- {
- RgnHandle updateRgn = NULL ;
- RgnHandle allocatedRgn = NULL ;
- wxRegion visRegion = thisWindow->MacGetVisibleRegion() ;
-
- if ( cEvent.GetParameter<RgnHandle>(kEventParamRgnHandle, &updateRgn) != noErr )
- {
- HIShapeGetAsQDRgn( visRegion.GetWXHRGN(), updateRgn );
- }
- else
- {
- if ( thisWindow->MacGetLeftBorderSize() != 0 || thisWindow->MacGetTopBorderSize() != 0 )
- {
- // as this update region is in native window locals we must adapt it to wx window local
- allocatedRgn = NewRgn() ;
- CopyRgn( updateRgn , allocatedRgn ) ;
-
- // hide the given region by the new region that must be shifted
- wxMacNativeToWindow( thisWindow , allocatedRgn ) ;
- updateRgn = allocatedRgn ;
- }
- }
-
-#if wxMAC_DEBUG_REDRAW
- if ( thisWindow->MacIsUserPane() )
- {
- static float color = 0.5 ;
- static int channel = 0 ;
- HIRect bounds;
- CGContextRef cgContext = cEvent.GetParameter<CGContextRef>(kEventParamCGContextRef) ;
-
- HIViewGetBounds( controlRef, &bounds );
- CGContextSetRGBFillColor( cgContext, channel == 0 ? color : 0.5 ,
- channel == 1 ? color : 0.5 , channel == 2 ? color : 0.5 , 1 );
- CGContextFillRect( cgContext, bounds );
- color += 0.1 ;
- if ( color > 0.9 )
- {
- color = 0.5 ;
- channel++ ;
- if ( channel == 3 )
- channel = 0 ;
- }
- }
-#endif
-
- {
- bool created = false ;
- CGContextRef cgContext = NULL ;
- OSStatus err = cEvent.GetParameter<CGContextRef>(kEventParamCGContextRef, &cgContext) ;
- if ( err != noErr )
- {
- wxFAIL_MSG("Unable to retrieve CGContextRef");
- }
-
- thisWindow->MacSetCGContextRef( cgContext ) ;
-
- {
- wxMacCGContextStateSaver sg( cgContext ) ;
- CGFloat alpha = (CGFloat)1.0 ;
- {
- wxWindow* iter = thisWindow ;
- while ( iter )
- {
- alpha *= (CGFloat)( iter->GetTransparent()/255.0 ) ;
- if ( iter->IsTopLevel() )
- iter = NULL ;
- else
- iter = iter->GetParent() ;
- }
- }
- CGContextSetAlpha( cgContext , alpha ) ;
-
- if ( thisWindow->GetBackgroundStyle() == wxBG_STYLE_TRANSPARENT )
- {
- HIRect bounds;
- HIViewGetBounds( controlRef, &bounds );
- CGContextClearRect( cgContext, bounds );
- }
-
-
-
- if ( thisWindow->MacDoRedraw( updateRgn , cEvent.GetTicks() ) )
- result = noErr ;
-
- thisWindow->MacSetCGContextRef( NULL ) ;
- }
-
- if ( created )
- CGContextRelease( cgContext ) ;
- }
-
- if ( allocatedRgn )
- DisposeRgn( allocatedRgn ) ;
- }
- break ;
-
- case kEventControlVisibilityChanged :
- // we might have two native controls attributed to the same wxWindow instance
- // eg a scrollview and an embedded textview, make sure we only fire for the 'outer'
- // control, as otherwise native and wx visibility are different
- if ( thisWindow->GetPeer() != NULL && thisWindow->GetPeer()->GetControlRef() == controlRef )
- {
- thisWindow->MacVisibilityChanged() ;
- }
- break ;
-
- case kEventControlEnabledStateChanged :
- thisWindow->MacEnabledStateChanged();
- break ;
-
- case kEventControlHiliteChanged :
- thisWindow->MacHiliteChanged() ;
- break ;
-
- case kEventControlActivate :
- case kEventControlDeactivate :
- // FIXME: we should have a virtual function for this!
-#if wxUSE_TREECTRL
- if ( thisWindow->IsKindOf( CLASSINFO( wxTreeCtrl ) ) )
- thisWindow->Refresh();
-#endif
-#if wxUSE_LISTCTRL
- if ( thisWindow->IsKindOf( CLASSINFO( wxListCtrl ) ) )
- thisWindow->Refresh();
-#endif
- break ;
-
- //
- // focus handling
- // different handling on OS X
- //
-
- case kEventControlFocusPartChanged :
- // the event is emulated by wxmac for systems lower than 10.5
- {
- if ( UMAGetSystemVersion() < 0x1050 )
- {
- // as it is synthesized here, we have to manually avoid propagation
- result = noErr;
- }
- ControlPartCode previousControlPart = cEvent.GetParameter<ControlPartCode>(kEventParamControlPreviousPart , typeControlPartCode );
- ControlPartCode currentControlPart = cEvent.GetParameter<ControlPartCode>(kEventParamControlCurrentPart , typeControlPartCode );
-
- if ( thisWindow->MacGetTopLevelWindow() && thisWindow->GetPeer()->NeedsFocusRect() )
- {
- thisWindow->MacInvalidateBorders();
- }
-
- if ( currentControlPart == 0 )
- {
- // kill focus
-#if wxUSE_CARET
- if ( thisWindow->GetCaret() )
- thisWindow->GetCaret()->OnKillFocus();
-#endif
-
- wxLogTrace(_T("Focus"), _T("focus lost(%p)"), wx_static_cast(void*, thisWindow));
-
- // remove this as soon as posting the synthesized event works properly
- static bool inKillFocusEvent = false ;
-
- if ( !inKillFocusEvent )
- {
- inKillFocusEvent = true ;
- wxFocusEvent event( wxEVT_KILL_FOCUS, thisWindow->GetId());
- event.SetEventObject(thisWindow);
- event.SetWindow(targetFocusWindow);
- thisWindow->HandleWindowEvent(event) ;
- inKillFocusEvent = false ;
- targetFocusWindow = NULL;
- }
- }
- else if ( previousControlPart == 0 )
- {
- // set focus
- // panel wants to track the window which was the last to have focus in it
- wxLogTrace(_T("Focus"), _T("focus set(%p)"), wx_static_cast(void*, thisWindow));
- wxChildFocusEvent eventFocus((wxWindow*)thisWindow);
- thisWindow->HandleWindowEvent(eventFocus);
-
-#if wxUSE_CARET
- if ( thisWindow->GetCaret() )
- thisWindow->GetCaret()->OnSetFocus();
-#endif
-
- wxFocusEvent event(wxEVT_SET_FOCUS, thisWindow->GetId());
- event.SetEventObject(thisWindow);
- event.SetWindow(formerFocusWindow);
- thisWindow->HandleWindowEvent(event) ;
- formerFocusWindow = NULL;
- }
- }
- break;
- case kEventControlSetFocusPart :
- {
-#ifdef __WXMAC_OSX__
- Boolean focusEverything = false ;
- if ( cEvent.GetParameter<Boolean>(kEventParamControlFocusEverything , &focusEverything ) == noErr )
- {
- // put a breakpoint here to catch focus everything events
- }
-#endif
- ControlPartCode controlPart = cEvent.GetParameter<ControlPartCode>(kEventParamControlPart , typeControlPartCode );
- if ( controlPart != kControlFocusNoPart )
- {
- targetFocusWindow = thisWindow;
- wxLogTrace(_T("Focus"), _T("focus to be set(%p)"), wx_static_cast(void*, thisWindow));
- }
- else
- {
- formerFocusWindow = thisWindow;
- wxLogTrace(_T("Focus"), _T("focus to be lost(%p)"), wx_static_cast(void*, thisWindow));
- }
-
- ControlPartCode previousControlPart = 0;
- verify_noerr( HIViewGetFocusPart(controlRef, &previousControlPart));
-
- if ( thisWindow->MacIsUserPane() )
- {
- if ( controlPart != kControlFocusNoPart )
- cEvent.SetParameter<ControlPartCode>( kEventParamControlPart, typeControlPartCode, 1 ) ;
- result = noErr ;
- }
- else
- result = CallNextEventHandler(handler, event);
-
- if ( UMAGetSystemVersion() < 0x1050 )
- {
-// set back to 0 if problems arise
-#if 1
- if ( result == noErr )
- {
- ControlPartCode currentControlPart = cEvent.GetParameter<ControlPartCode>(kEventParamControlPart , typeControlPartCode );
- // synthesize the event focus changed event
- EventRef evRef = NULL ;
-
- OSStatus err = MacCreateEvent(
- NULL , kEventClassControl , kEventControlFocusPartChanged , TicksToEventTime( TickCount() ) ,
- kEventAttributeUserEvent , &evRef );
- verify_noerr( err );
-
- wxMacCarbonEvent iEvent( evRef ) ;
- iEvent.SetParameter<ControlRef>( kEventParamDirectObject , controlRef );
- iEvent.SetParameter<EventTargetRef>( kEventParamPostTarget, typeEventTargetRef, GetControlEventTarget( controlRef ) );
- iEvent.SetParameter<ControlPartCode>( kEventParamControlPreviousPart, typeControlPartCode, previousControlPart );
- iEvent.SetParameter<ControlPartCode>( kEventParamControlCurrentPart, typeControlPartCode, currentControlPart );
-
-#if 1
- // TODO test this first, avoid double posts etc...
- PostEventToQueue( GetMainEventQueue(), evRef , kEventPriorityHigh );
-#else
- wxMacWindowControlEventHandler( NULL , evRef , data ) ;
-#endif
- ReleaseEvent( evRef ) ;
- }
-#else
- // old implementation, to be removed if the new one works
- if ( controlPart == kControlFocusNoPart )
- {
-#if wxUSE_CARET
- if ( thisWindow->GetCaret() )
- thisWindow->GetCaret()->OnKillFocus();
-#endif
-
- wxLogTrace(_T("Focus"), _T("focus lost(%p)"), wx_static_cast(void*, thisWindow));
-
- static bool inKillFocusEvent = false ;
-
- if ( !inKillFocusEvent )
- {
- inKillFocusEvent = true ;
- wxFocusEvent event( wxEVT_KILL_FOCUS, thisWindow->GetId());
- event.SetEventObject(thisWindow);
- thisWindow->HandleWindowEvent(event) ;
- inKillFocusEvent = false ;
- }
- }
- else
- {
- // panel wants to track the window which was the last to have focus in it
- wxLogTrace(_T("Focus"), _T("focus set(%p)"), wx_static_cast(void*, thisWindow));
- wxChildFocusEvent eventFocus((wxWindow*)thisWindow);
- thisWindow->HandleWindowEvent(eventFocus);
-
- #if wxUSE_CARET
- if ( thisWindow->GetCaret() )
- thisWindow->GetCaret()->OnSetFocus();
- #endif
-
- wxFocusEvent event(wxEVT_SET_FOCUS, thisWindow->GetId());
- event.SetEventObject(thisWindow);
- thisWindow->HandleWindowEvent(event) ;
- }
-#endif
- }
- }
- break ;
-
- case kEventControlHit :
- result = thisWindow->MacControlHit( handler , event ) ;
- break ;
-
- case kEventControlGetClickActivation :
- {
- // fix to always have a proper activation for DataBrowser controls (stay in bkgnd otherwise)
- WindowRef owner = cEvent.GetParameter<WindowRef>(kEventParamWindowRef);
- if ( !IsWindowActive(owner) )
- {
- cEvent.SetParameter(kEventParamClickActivation,(UInt32) kActivateAndIgnoreClick) ;
- result = noErr ;
- }
- }
- break ;
-
- default :
- break ;
- }
-
- return result ;
-}
-
-static pascal OSStatus
-wxMacWindowServiceEventHandler(EventHandlerCallRef WXUNUSED(handler),
- EventRef event,
- void *data)
-{
- OSStatus result = eventNotHandledErr ;
-
- wxMacCarbonEvent cEvent( event ) ;
-
- ControlRef controlRef ;
- wxWindowMac* thisWindow = (wxWindowMac*) data ;
- wxTextCtrl* textCtrl = wxDynamicCast( thisWindow , wxTextCtrl ) ;
- cEvent.GetParameter( kEventParamDirectObject , &controlRef ) ;
-
- switch ( GetEventKind( event ) )
- {
- case kEventServiceGetTypes :
- if ( textCtrl )
- {
- long from, to ;
- textCtrl->GetSelection( &from , &to ) ;
-
- CFMutableArrayRef copyTypes = 0 , pasteTypes = 0;
- if ( from != to )
- copyTypes = cEvent.GetParameter< CFMutableArrayRef >( kEventParamServiceCopyTypes , typeCFMutableArrayRef ) ;
- if ( textCtrl->IsEditable() )
- pasteTypes = cEvent.GetParameter< CFMutableArrayRef >( kEventParamServicePasteTypes , typeCFMutableArrayRef ) ;
-
- static const OSType textDataTypes[] = { kTXNTextData /* , 'utxt', 'PICT', 'MooV', 'AIFF' */ };
- for ( size_t i = 0 ; i < WXSIZEOF(textDataTypes) ; ++i )
- {
- CFStringRef typestring = CreateTypeStringWithOSType(textDataTypes[i]);
- if ( typestring )
- {
- if ( copyTypes )
- CFArrayAppendValue(copyTypes, typestring) ;
- if ( pasteTypes )
- CFArrayAppendValue(pasteTypes, typestring) ;
-
- CFRelease( typestring ) ;
- }
- }
-
- result = noErr ;
- }
- break ;
-
- case kEventServiceCopy :
- if ( textCtrl )
- {
- long from, to ;
-
- textCtrl->GetSelection( &from , &to ) ;
- wxString val = textCtrl->GetValue() ;
- val = val.Mid( from , to - from ) ;
- PasteboardRef pasteboard = cEvent.GetParameter<PasteboardRef>( kEventParamPasteboardRef, typePasteboardRef );
- verify_noerr( PasteboardClear( pasteboard ) ) ;
- PasteboardSynchronize( pasteboard );
- // TODO add proper conversion
- CFDataRef data = CFDataCreate( kCFAllocatorDefault, (const UInt8*)val.c_str(), val.length() );
- PasteboardPutItemFlavor( pasteboard, (PasteboardItemID) 1, CFSTR("com.apple.traditional-mac-plain-text"), data, 0);
- CFRelease( data );
- result = noErr ;
- }
- break ;
-
- case kEventServicePaste :
- if ( textCtrl )
- {
- PasteboardRef pasteboard = cEvent.GetParameter<PasteboardRef>( kEventParamPasteboardRef, typePasteboardRef );
- PasteboardSynchronize( pasteboard );
- ItemCount itemCount;
- verify_noerr( PasteboardGetItemCount( pasteboard, &itemCount ) );
- for( UInt32 itemIndex = 1; itemIndex <= itemCount; itemIndex++ )
- {
- PasteboardItemID itemID;
- if ( PasteboardGetItemIdentifier( pasteboard, itemIndex, &itemID ) == noErr )
- {
- CFDataRef flavorData = NULL;
- if ( PasteboardCopyItemFlavorData( pasteboard, itemID, CFSTR("com.apple.traditional-mac-plain-text"), &flavorData ) == noErr )
- {
- CFIndex flavorDataSize = CFDataGetLength( flavorData );
- char *content = new char[flavorDataSize+1] ;
- memcpy( content, CFDataGetBytePtr( flavorData ), flavorDataSize );
- content[flavorDataSize]=0;
- CFRelease( flavorData );
-#if wxUSE_UNICODE
- textCtrl->WriteText( wxString( content , wxConvLocal ) );
-#else
- textCtrl->WriteText( wxString( content ) ) ;
-#endif
-
- delete[] content ;
- result = noErr ;
- }
- }
- }
- }
- break ;
-
- default:
- break ;
- }
-
- return result ;
-}
-
-pascal OSStatus wxMacUnicodeTextEventHandler( EventHandlerCallRef handler , EventRef event , void *data )
-{
- OSStatus result = eventNotHandledErr ;
- wxWindowMac* focus = (wxWindowMac*) data ;
-
- wchar_t* uniChars = NULL ;
- UInt32 when = EventTimeToTicks( GetEventTime( event ) ) ;
-
- UniChar* charBuf = NULL;
- ByteCount dataSize = 0 ;
- int numChars = 0 ;
- UniChar buf[2] ;
- if ( GetEventParameter( event, kEventParamTextInputSendText, typeUnicodeText, NULL, 0 , &dataSize, NULL ) == noErr )
- {
- numChars = dataSize / sizeof( UniChar) + 1;
- charBuf = buf ;
-
- if ( (size_t) numChars * 2 > sizeof(buf) )
- charBuf = new UniChar[ numChars ] ;
- else
- charBuf = buf ;
-
- uniChars = new wchar_t[ numChars ] ;
- GetEventParameter( event, kEventParamTextInputSendText, typeUnicodeText, NULL, dataSize , NULL , charBuf ) ;
- charBuf[ numChars - 1 ] = 0;
-#if SIZEOF_WCHAR_T == 2
- uniChars = (wchar_t*) charBuf ;
-/* memcpy( uniChars , charBuf , numChars * 2 ) ;*/ // is there any point in copying charBuf over itself? (in fact, memcpy isn't even guaranteed to work correctly if the source and destination ranges overlap...)
-#else
- // the resulting string will never have more chars than the utf16 version, so this is safe
- wxMBConvUTF16 converter ;
- numChars = converter.MB2WC( uniChars , (const char*)charBuf , numChars ) ;
-#endif
- }
-
- switch ( GetEventKind( event ) )
- {
- case kEventTextInputUpdateActiveInputArea :
- {
- // An IME input event may return several characters, but we need to send one char at a time to
- // EVT_CHAR
- for (int pos=0 ; pos < numChars ; pos++)
- {
- WXEVENTREF formerEvent = wxTheApp->MacGetCurrentEvent() ;
- WXEVENTHANDLERCALLREF formerHandler = wxTheApp->MacGetCurrentEventHandlerCallRef() ;
- wxTheApp->MacSetCurrentEvent( event , handler ) ;
-
- UInt32 message = uniChars[pos] < 128 ? (char)uniChars[pos] : '?';
-/*
- NB: faking a charcode here is problematic. The kEventTextInputUpdateActiveInputArea event is sent
- multiple times to update the active range during inline input, so this handler will often receive
- uncommited text, which should usually not trigger side effects. It might be a good idea to check the
- kEventParamTextInputSendFixLen parameter and verify if input is being confirmed (see CarbonEvents.h).
- On the other hand, it can be useful for some applications to react to uncommitted text (for example,
- to update a status display), as long as it does not disrupt the inline input session. Ideally, wx
- should add new event types to support advanced text input. For now, I would keep things as they are.
-
- However, the code that was being used caused additional problems:
- UInt32 message = (0 << 8) + ((char)uniChars[pos] );
- Since it simply truncated the unichar to the last byte, it ended up causing weird bugs with inline
- input, such as switching to another field when one attempted to insert the character U+4E09 (the kanji
- for "three"), because it was truncated to 09 (kTabCharCode), which was later "converted" to WXK_TAB
- (still 09) in wxMacTranslateKey; or triggering the default button when one attempted to insert U+840D
- (the kanji for "name"), which got truncated to 0D and interpreted as a carriage return keypress.
- Note that even single-byte characters could have been misinterpreted, since MacRoman charcodes only
- overlap with Unicode within the (7-bit) ASCII range.
- But simply passing a NUL charcode would disable text updated events, because wxTextCtrl::OnChar checks
- for codes within a specific range. Therefore I went for the solution seen above, which keeps ASCII
- characters as they are and replaces the rest with '?', ensuring that update events are triggered.
- It would be better to change wxTextCtrl::OnChar to look at the actual unicode character instead, but
- I don't have time to look into that right now.
- -- CL
-*/
- if ( wxTheApp->MacSendCharEvent(
- focus , message , 0 , when , 0 , 0 , uniChars[pos] ) )
- {
- result = noErr ;
- }
-
- wxTheApp->MacSetCurrentEvent( formerEvent , formerHandler ) ;
- }
- }
- break ;
- case kEventTextInputUnicodeForKeyEvent :
- {
- UInt32 keyCode, modifiers ;
- Point point ;
- EventRef rawEvent ;
- unsigned char charCode ;
-
- GetEventParameter( event, kEventParamTextInputSendKeyboardEvent, typeEventRef, NULL, sizeof(rawEvent), NULL, &rawEvent ) ;
- GetEventParameter( rawEvent, kEventParamKeyMacCharCodes, typeChar, NULL, sizeof(char), NULL, &charCode );
- GetEventParameter( rawEvent, kEventParamKeyCode, typeUInt32, NULL, sizeof(UInt32), NULL, &keyCode );
- GetEventParameter( rawEvent, kEventParamKeyModifiers, typeUInt32, NULL, sizeof(UInt32), NULL, &modifiers );
- GetEventParameter( rawEvent, kEventParamMouseLocation, typeQDPoint, NULL, sizeof(Point), NULL, &point );
-
- UInt32 message = (keyCode << 8) + charCode;
-
- // An IME input event may return several characters, but we need to send one char at a time to
- // EVT_CHAR
- for (int pos=0 ; pos < numChars ; pos++)
- {
- WXEVENTREF formerEvent = wxTheApp->MacGetCurrentEvent() ;
- WXEVENTHANDLERCALLREF formerHandler = wxTheApp->MacGetCurrentEventHandlerCallRef() ;
- wxTheApp->MacSetCurrentEvent( event , handler ) ;
-
- if ( wxTheApp->MacSendCharEvent(
- focus , message , modifiers , when , point.h , point.v , uniChars[pos] ) )
- {
- result = noErr ;
- }
-
- wxTheApp->MacSetCurrentEvent( formerEvent , formerHandler ) ;
- }
- }
- break;
- default:
- break ;
- }
-
- delete [] uniChars ;
- if ( charBuf != buf )
- delete [] charBuf ;
-
- return result ;
-}
-
-static pascal OSStatus
-wxMacWindowCommandEventHandler(EventHandlerCallRef WXUNUSED(handler),
- EventRef event,
- void *data)
-{
- OSStatus result = eventNotHandledErr ;
- wxWindowMac* focus = (wxWindowMac*) data ;
-
- HICommand command ;
-
- wxMacCarbonEvent cEvent( event ) ;
- cEvent.GetParameter<HICommand>(kEventParamDirectObject,typeHICommand,&command) ;
-
- wxMenuItem* item = NULL ;
- wxMenu* itemMenu = wxFindMenuFromMacCommand( command , item ) ;
- int id = wxMacCommandToId( command.commandID ) ;
-
- if ( item )
- {
- wxASSERT( itemMenu != NULL ) ;
-
- switch ( cEvent.GetKind() )
- {
- case kEventProcessCommand :
- result = itemMenu->MacHandleCommandProcess( item, id, focus );
- break ;
-
- case kEventCommandUpdateStatus:
- result = itemMenu->MacHandleCommandUpdateStatus( item, id, focus );
- break ;
-
- default :
- break ;
- }
- }
- return result ;
-}
-
-pascal OSStatus wxMacWindowEventHandler( EventHandlerCallRef handler , EventRef event , void *data )
-{
- EventRef formerEvent = (EventRef) wxTheApp->MacGetCurrentEvent() ;
- EventHandlerCallRef formerEventHandlerCallRef = (EventHandlerCallRef) wxTheApp->MacGetCurrentEventHandlerCallRef() ;
- wxTheApp->MacSetCurrentEvent( event , handler ) ;
- OSStatus result = eventNotHandledErr ;
-
- switch ( GetEventClass( event ) )
- {
- case kEventClassCommand :
- result = wxMacWindowCommandEventHandler( handler , event , data ) ;
- break ;
-
- case kEventClassControl :
- result = wxMacWindowControlEventHandler( handler, event, data ) ;
- break ;
-
- case kEventClassService :
- result = wxMacWindowServiceEventHandler( handler, event , data ) ;
- break ;
-
- case kEventClassTextInput :
- result = wxMacUnicodeTextEventHandler( handler , event , data ) ;
- break ;
-
- default :
- break ;
- }
-
- wxTheApp->MacSetCurrentEvent( formerEvent, formerEventHandlerCallRef ) ;
-
- return result ;
-}
-
-DEFINE_ONE_SHOT_HANDLER_GETTER( wxMacWindowEventHandler )
-
-// ---------------------------------------------------------------------------
-// Scrollbar Tracking for all
-// ---------------------------------------------------------------------------
-
-pascal void wxMacLiveScrollbarActionProc( ControlRef control , ControlPartCode partCode ) ;
-pascal void wxMacLiveScrollbarActionProc( ControlRef control , ControlPartCode partCode )
-{
- if ( partCode != 0)
- {
- wxWindow* wx = wxFindControlFromMacControl( control ) ;
- if ( wx )
- wx->MacHandleControlClick( (WXWidget) control , partCode , true /* stillDown */ ) ;
- }
-}
-wxMAC_DEFINE_PROC_GETTER( ControlActionUPP , wxMacLiveScrollbarActionProc ) ;
-
-// ===========================================================================
-// implementation
-// ===========================================================================
-
-WX_DECLARE_HASH_MAP(ControlRef, wxWindow*, wxPointerHash, wxPointerEqual, MacControlMap);
-
-static MacControlMap wxWinMacControlList;
-
-wxWindow *wxFindControlFromMacControl(ControlRef inControl )
-{
- MacControlMap::iterator node = wxWinMacControlList.find(inControl);
-
- return (node == wxWinMacControlList.end()) ? NULL : node->second;
-}
-
-void wxAssociateControlWithMacControl(ControlRef inControl, wxWindow *control)
-{
- // adding NULL ControlRef is (first) surely a result of an error and
- // (secondly) breaks native event processing
- wxCHECK_RET( inControl != (ControlRef) NULL, wxT("attempt to add a NULL WindowRef to window list") );
-
- wxWinMacControlList[inControl] = control;
-}
-
-void wxRemoveMacControlAssociation(wxWindow *control)
-{
- // iterate over all the elements in the class
- // is the iterator stable ? as we might have two associations pointing to the same wxWindow
- // we should go on...
-
- bool found = true ;
- while ( found )
- {
- found = false ;
- MacControlMap::iterator it;
- for ( it = wxWinMacControlList.begin(); it != wxWinMacControlList.end(); ++it )
- {
- if ( it->second == control )
- {
- wxWinMacControlList.erase(it);
- found = true ;
- break;
- }
- }
- }
-}
-
-// ----------------------------------------------------------------------------
- // constructors and such
-// ----------------------------------------------------------------------------
-
-wxWindowMac::wxWindowMac()
-{
- Init();
-}
-
-wxWindowMac::wxWindowMac(wxWindowMac *parent,
- wxWindowID id,
- const wxPoint& pos ,
- const wxSize& size ,
- long style ,
- const wxString& name )
-{
- Init();
- Create(parent, id, pos, size, style, name);
-}
-
-void wxWindowMac::Init()
-{
- m_peer = NULL ;
- m_macAlpha = 255 ;
- m_cgContextRef = NULL ;
-
- // as all windows are created with WS_VISIBLE style...
- m_isShown = true;
-
- m_hScrollBar = NULL ;
- m_vScrollBar = NULL ;
- m_hScrollBarAlwaysShown = false;
- m_vScrollBarAlwaysShown = false;
-
- m_macIsUserPane = true;
- m_clipChildren = false ;
- m_cachedClippedRectValid = false ;
-}
-
-wxWindowMac::~wxWindowMac()
-{
- SendDestroyEvent();
-
- m_isBeingDeleted = true;
-
- MacInvalidateBorders() ;
-
-#ifndef __WXUNIVERSAL__
- // VS: make sure there's no wxFrame with last focus set to us:
- for ( wxWindow *win = GetParent(); win; win = win->GetParent() )
- {
- wxFrame *frame = wxDynamicCast(win, wxFrame);
- if ( frame )
- {
- if ( frame->GetLastFocus() == this )
- frame->SetLastFocus((wxWindow*)NULL);
- break;
- }
- }
-#endif
-
- // destroy children before destroying this window itself
- DestroyChildren();
-
- // wxRemoveMacControlAssociation( this ) ;
- // If we delete an item, we should initialize the parent panel,
- // because it could now be invalid.
- wxTopLevelWindow *tlw = wxDynamicCast(wxGetTopLevelParent(this), wxTopLevelWindow);
- if ( tlw )
- {
- if ( tlw->GetDefaultItem() == (wxButton*) this)
- tlw->SetDefaultItem(NULL);
- }
-
- if ( m_peer && m_peer->Ok() )
- {
- // in case the callback might be called during destruction
- wxRemoveMacControlAssociation( this) ;
- ::RemoveEventHandler( (EventHandlerRef ) m_macControlEventHandler ) ;
- // we currently are not using this hook
- // ::SetControlColorProc( *m_peer , NULL ) ;
- m_peer->Dispose() ;
- }
-
- if ( g_MacLastWindow == this )
- g_MacLastWindow = NULL ;
-
-#ifndef __WXUNIVERSAL__
- wxFrame* frame = wxDynamicCast( wxGetTopLevelParent( (wxWindow*)this ) , wxFrame ) ;
- if ( frame )
- {
- if ( frame->GetLastFocus() == this )
- frame->SetLastFocus( NULL ) ;
- }
-#endif
-
- // delete our drop target if we've got one
-#if wxUSE_DRAG_AND_DROP
- if ( m_dropTarget != NULL )
- {
- delete m_dropTarget;
- m_dropTarget = NULL;
- }
-#endif
-
- delete m_peer ;
-}
-
-WXWidget wxWindowMac::GetHandle() const
-{
- return (WXWidget) m_peer->GetControlRef() ;
-}
-
-void wxWindowMac::MacInstallEventHandler( WXWidget control )
-{
- wxAssociateControlWithMacControl( (ControlRef) control , this ) ;
- InstallControlEventHandler( (ControlRef)control , GetwxMacWindowEventHandlerUPP(),
- GetEventTypeCount(eventList), eventList, this,
- (EventHandlerRef *)&m_macControlEventHandler);
-}
-
-// Constructor
-bool wxWindowMac::Create(wxWindowMac *parent,
- wxWindowID id,
- const wxPoint& pos,
- const wxSize& size,
- long style,
- const wxString& name)
-{
- wxCHECK_MSG( parent, false, wxT("can't create wxWindowMac without parent") );
-
- if ( !CreateBase(parent, id, pos, size, style, wxDefaultValidator, name) )
- return false;
-
- m_windowVariant = parent->GetWindowVariant() ;
-
- if ( m_macIsUserPane )
- {
- Rect bounds = wxMacGetBoundsForControl( this , pos , size ) ;
-
- UInt32 features = 0
- | kControlSupportsEmbedding
- | kControlSupportsLiveFeedback
- | kControlGetsFocusOnClick
-// | kControlHasSpecialBackground
-// | kControlSupportsCalcBestRect
- | kControlHandlesTracking
- | kControlSupportsFocus
- | kControlWantsActivate
- | kControlWantsIdle ;
-
- m_peer = new wxMacControl(this) ;
- OSStatus err =::CreateUserPaneControl( MAC_WXHWND(GetParent()->MacGetTopLevelWindowRef()) , &bounds, features , m_peer->GetControlRefAddr() );
- verify_noerr( err );
-
- MacPostControlCreate(pos, size) ;
- }
-
-#ifndef __WXUNIVERSAL__
- // Don't give scrollbars to wxControls unless they ask for them
- if ( (! IsKindOf(CLASSINFO(wxControl)) && ! IsKindOf(CLASSINFO(wxStatusBar)))
- || (IsKindOf(CLASSINFO(wxControl)) && ((style & wxHSCROLL) || (style & wxVSCROLL))))
- {
- MacCreateScrollBars( style ) ;
- }
-#endif
-
- wxWindowCreateEvent event(this);
- GetEventHandler()->AddPendingEvent(event);
-
- return true;
-}
-
-void wxWindowMac::MacChildAdded()
-{
- if ( m_vScrollBar )
- m_vScrollBar->Raise() ;
- if ( m_hScrollBar )
- m_hScrollBar->Raise() ;
-}
-
-void wxWindowMac::MacPostControlCreate(const wxPoint& WXUNUSED(pos), const wxSize& size)
-{
- wxASSERT_MSG( m_peer != NULL && m_peer->Ok() , wxT("No valid mac control") ) ;
-
- m_peer->SetReference( (URefCon) this ) ;
- GetParent()->AddChild( this );
-
- MacInstallEventHandler( (WXWidget) m_peer->GetControlRef() );
-
- ControlRef container = (ControlRef) GetParent()->GetHandle() ;
- wxASSERT_MSG( container != NULL , wxT("No valid mac container control") ) ;
- ::EmbedControl( m_peer->GetControlRef() , container ) ;
- GetParent()->MacChildAdded() ;
-
- // adjust font, controlsize etc
- DoSetWindowVariant( m_windowVariant ) ;
-
- m_peer->SetLabel( wxStripMenuCodes(m_label, wxStrip_Mnemonics) ) ;
-
- if (!m_macIsUserPane)
- SetInitialSize(size);
-
- SetCursor( *wxSTANDARD_CURSOR ) ;
-}
-
-void wxWindowMac::DoSetWindowVariant( wxWindowVariant variant )
-{
- // Don't assert, in case we set the window variant before
- // the window is created
- // wxASSERT( m_peer->Ok() ) ;
-
- m_windowVariant = variant ;
-
- if (m_peer == NULL || !m_peer->Ok())
- return;
-
- ControlSize size ;
- ThemeFontID themeFont = kThemeSystemFont ;
-
- // we will get that from the settings later
- // and make this NORMAL later, but first
- // we have a few calculations that we must fix
-
- switch ( variant )
- {
- case wxWINDOW_VARIANT_NORMAL :
- size = kControlSizeNormal;
- themeFont = kThemeSystemFont ;
- break ;
-
- case wxWINDOW_VARIANT_SMALL :
- size = kControlSizeSmall;
- themeFont = kThemeSmallSystemFont ;
- break ;
-
- case wxWINDOW_VARIANT_MINI :
- // not always defined in the headers
- size = 3 ;
- themeFont = 109 ;
- break ;
-
- case wxWINDOW_VARIANT_LARGE :
- size = kControlSizeLarge;
- themeFont = kThemeSystemFont ;
- break ;
-
- default:
- wxFAIL_MSG(_T("unexpected window variant"));
- break ;
- }
-
- m_peer->SetData<ControlSize>(kControlEntireControl, kControlSizeTag, &size ) ;
-
- wxFont font ;
- font.MacCreateFromThemeFont( themeFont ) ;
- SetFont( font ) ;
-}
-
-void wxWindowMac::MacUpdateControlFont()
-{
- m_peer->SetFont( GetFont() , GetForegroundColour() , GetWindowStyle() ) ;
- // do not trigger refreshes upon invisible and possible partly created objects
- if ( IsShownOnScreen() )
- Refresh() ;
-}
-
-bool wxWindowMac::SetFont(const wxFont& font)
-{
- bool retval = wxWindowBase::SetFont( font );
-
- MacUpdateControlFont() ;
-
- return retval;
-}
-
-bool wxWindowMac::SetForegroundColour(const wxColour& col )
-{
- bool retval = wxWindowBase::SetForegroundColour( col );
-
- if (retval)
- MacUpdateControlFont();
-
- return retval;
-}
-
-bool wxWindowMac::SetBackgroundColour(const wxColour& col )
-{
- if ( !wxWindowBase::SetBackgroundColour(col) && m_hasBgCol )
- return false ;
-
- m_peer->SetBackgroundColour( col ) ;
-
- return true ;
-}
-
-bool wxWindowMac::MacCanFocus() const
-{
- // TODO : evaluate performance hits by looking up this value, eventually cache the results for a 1 sec or so
- // CAUTION : the value returned currently is 0 or 2, I've also found values of 1 having the same meaning,
- // but the value range is nowhere documented
- Boolean keyExistsAndHasValidFormat ;
- CFIndex fullKeyboardAccess = CFPreferencesGetAppIntegerValue( CFSTR("AppleKeyboardUIMode" ) ,
- kCFPreferencesCurrentApplication, &keyExistsAndHasValidFormat );
-
- if ( keyExistsAndHasValidFormat && fullKeyboardAccess > 0 )
- {
- return true ;
- }
- else
- {
- UInt32 features = 0 ;
- m_peer->GetFeatures( &features ) ;
-
- return features & ( kControlSupportsFocus | kControlGetsFocusOnClick ) ;
- }
-}
-
-void wxWindowMac::SetFocus()
-{
- if ( !AcceptsFocus() )
- return ;
-
- wxWindow* former = FindFocus() ;
- if ( former == this )
- return ;
-
- // as we cannot rely on the control features to find out whether we are in full keyboard mode,
- // we can only leave in case of an error
- wxLogTrace(_T("Focus"), _T("before wxWindow::SetFocus(%p) %d"), wx_static_cast(void*, this), GetName().c_str());
- OSStatus err = m_peer->SetFocus( kControlFocusNextPart ) ;
- if ( err == errCouldntSetFocus )
- {
- wxLogTrace(_T("Focus"), _T("in wxWindow::SetFocus(%p) errCouldntSetFocus"), wx_static_cast(void*, this));
- return ;
- }
- wxLogTrace(_T("Focus"), _T("after wxWindow::SetFocus(%p)"), wx_static_cast(void*, this));
-
- SetUserFocusWindow( (WindowRef)MacGetTopLevelWindowRef() );
-}
-
-void wxWindowMac::DoCaptureMouse()
-{
- wxApp::s_captureWindow = this ;
-}
-
-wxWindow * wxWindowBase::GetCapture()
-{
- return wxApp::s_captureWindow ;
-}
-
-void wxWindowMac::DoReleaseMouse()
-{
- wxApp::s_captureWindow = NULL ;
-}
-
-#if wxUSE_DRAG_AND_DROP
-
-void wxWindowMac::SetDropTarget(wxDropTarget *pDropTarget)
-{
- if ( m_dropTarget != NULL )
- delete m_dropTarget;
-
- m_dropTarget = pDropTarget;
- if ( m_dropTarget != NULL )
- {
- // TODO:
- }
-}
-
-#endif
-
-// Old-style File Manager Drag & Drop
-void wxWindowMac::DragAcceptFiles(bool WXUNUSED(accept))
-{
- // TODO:
-}
-
-// Returns the size of the native control. In the case of the toplevel window
-// this is the content area root control
-
-void wxWindowMac::MacGetPositionAndSizeFromControl(int& WXUNUSED(x),
- int& WXUNUSED(y),
- int& WXUNUSED(w),
- int& WXUNUSED(h)) const
-{
- wxFAIL_MSG( wxT("Not currently supported") ) ;
-}
-
-// From a wx position / size calculate the appropriate size of the native control
-
-bool wxWindowMac::MacGetBoundsForControl(
- const wxPoint& pos,
- const wxSize& size,
- int& x, int& y,
- int& w, int& h , bool adjustOrigin ) const
-{
- // the desired size, minus the border pixels gives the correct size of the control
- x = (int)pos.x;
- y = (int)pos.y;
-
- // TODO: the default calls may be used as soon as PostCreateControl Is moved here
- w = wxMax(size.x, 0) ; // WidthDefault( size.x );
- h = wxMax(size.y, 0) ; // HeightDefault( size.y ) ;
-
- x += MacGetLeftBorderSize() ;
- y += MacGetTopBorderSize() ;
- w -= MacGetLeftBorderSize() + MacGetRightBorderSize() ;
- h -= MacGetTopBorderSize() + MacGetBottomBorderSize() ;
-
- if ( adjustOrigin )
- AdjustForParentClientOrigin( x , y ) ;
-
- // this is in window relative coordinate, as this parent may have a border, its physical position is offset by this border
- if ( !GetParent()->IsTopLevel() )
- {
- x -= GetParent()->MacGetLeftBorderSize() ;
- y -= GetParent()->MacGetTopBorderSize() ;
- }
-
- return true ;
-}
-
-// Get window size (not client size)
-void wxWindowMac::DoGetSize(int *x, int *y) const
-{
- Rect bounds ;
- m_peer->GetRect( &bounds ) ;
-
- if (x)
- *x = bounds.right - bounds.left + MacGetLeftBorderSize() + MacGetRightBorderSize() ;
- if (y)
- *y = bounds.bottom - bounds.top + MacGetTopBorderSize() + MacGetBottomBorderSize() ;
-}
-
-// get the position of the bounds of this window in client coordinates of its parent
-void wxWindowMac::DoGetPosition(int *x, int *y) const
-{
- Rect bounds ;
- m_peer->GetRect( &bounds ) ;
-
- int x1 = bounds.left ;
- int y1 = bounds.top ;
-
- // get the wx window position from the native one
- x1 -= MacGetLeftBorderSize() ;
- y1 -= MacGetTopBorderSize() ;
-
- if ( !IsTopLevel() )
- {
- wxWindow *parent = GetParent();
- if ( parent )
- {
- // we must first adjust it to be in window coordinates of the parent,
- // as otherwise it gets lost by the ClientAreaOrigin fix
- x1 += parent->MacGetLeftBorderSize() ;
- y1 += parent->MacGetTopBorderSize() ;
-
- // and now to client coordinates
- wxPoint pt(parent->GetClientAreaOrigin());
- x1 -= pt.x ;
- y1 -= pt.y ;
- }
- }
-
- if (x)
- *x = x1 ;
- if (y)
- *y = y1 ;
-}
-
-void wxWindowMac::DoScreenToClient(int *x, int *y) const
-{
- WindowRef window = (WindowRef) MacGetTopLevelWindowRef() ;
- wxCHECK_RET( window , wxT("TopLevel Window missing") ) ;
-
- Point localwhere = { 0, 0 } ;
-
- if (x)
- localwhere.h = *x ;
- if (y)
- localwhere.v = *y ;
-
- wxMacGlobalToLocal( window , &localwhere ) ;
-
- if (x)
- *x = localwhere.h ;
- if (y)
- *y = localwhere.v ;
-
- MacRootWindowToWindow( x , y ) ;
-
- wxPoint origin = GetClientAreaOrigin() ;
- if (x)
- *x -= origin.x ;
- if (y)
- *y -= origin.y ;
-}
-
-void wxWindowMac::DoClientToScreen(int *x, int *y) const
-{
- WindowRef window = (WindowRef) MacGetTopLevelWindowRef() ;
- wxCHECK_RET( window , wxT("TopLevel window missing") ) ;
-
- wxPoint origin = GetClientAreaOrigin() ;
- if (x)
- *x += origin.x ;
- if (y)
- *y += origin.y ;
-
- MacWindowToRootWindow( x , y ) ;
-
- Point localwhere = { 0, 0 };
- if (x)
- localwhere.h = *x ;
- if (y)
- localwhere.v = *y ;
-
- wxMacLocalToGlobal( window, &localwhere ) ;
-
- if (x)
- *x = localwhere.h ;
- if (y)
- *y = localwhere.v ;
-}
-
-void wxWindowMac::MacClientToRootWindow( int *x , int *y ) const
-{
- wxPoint origin = GetClientAreaOrigin() ;
- if (x)
- *x += origin.x ;
- if (y)
- *y += origin.y ;
-
- MacWindowToRootWindow( x , y ) ;
-}
-
-void wxWindowMac::MacRootWindowToClient( int *x , int *y ) const
-{
- MacRootWindowToWindow( x , y ) ;
-
- wxPoint origin = GetClientAreaOrigin() ;
- if (x)
- *x -= origin.x ;
- if (y)
- *y -= origin.y ;
-}
-
-void wxWindowMac::MacWindowToRootWindow( int *x , int *y ) const
-{
- wxPoint pt ;
-
- if (x)
- pt.x = *x ;
- if (y)
- pt.y = *y ;
-
- if ( !IsTopLevel() )
- {
- wxNonOwnedWindow* top = MacGetTopLevelWindow();
- if (top)
- {
- pt.x -= MacGetLeftBorderSize() ;
- pt.y -= MacGetTopBorderSize() ;
- wxMacControl::Convert( &pt , m_peer , top->m_peer ) ;
- }
- }
-
- if (x)
- *x = (int) pt.x ;
- if (y)
- *y = (int) pt.y ;
-}
-
-void wxWindowMac::MacWindowToRootWindow( short *x , short *y ) const
-{
- int x1 , y1 ;
-
- if (x)
- x1 = *x ;
- if (y)
- y1 = *y ;
-
- MacWindowToRootWindow( &x1 , &y1 ) ;
-
- if (x)
- *x = x1 ;
- if (y)
- *y = y1 ;
-}
-
-void wxWindowMac::MacRootWindowToWindow( int *x , int *y ) const
-{
- wxPoint pt ;
-
- if (x)
- pt.x = *x ;
- if (y)
- pt.y = *y ;
-
- if ( !IsTopLevel() )
- {
- wxNonOwnedWindow* top = MacGetTopLevelWindow();
- if (top)
- {
- wxMacControl::Convert( &pt , top->m_peer , m_peer ) ;
- pt.x += MacGetLeftBorderSize() ;
- pt.y += MacGetTopBorderSize() ;
- }
- }
-
- if (x)
- *x = (int) pt.x ;
- if (y)
- *y = (int) pt.y ;
-}
-
-void wxWindowMac::MacRootWindowToWindow( short *x , short *y ) const
-{
- int x1 , y1 ;
-
- if (x)
- x1 = *x ;
- if (y)
- y1 = *y ;
-
- MacRootWindowToWindow( &x1 , &y1 ) ;
-
- if (x)
- *x = x1 ;
- if (y)
- *y = y1 ;
-}
-
-void wxWindowMac::MacGetContentAreaInset( int &left , int &top , int &right , int &bottom )
-{
- RgnHandle rgn = NewRgn() ;
-
- if ( m_peer->GetRegion( kControlContentMetaPart , rgn ) == noErr )
- {
- Rect structure, content ;
-
- GetRegionBounds( rgn , &content ) ;
- m_peer->GetRect( &structure ) ;
- OffsetRect( &structure, -structure.left , -structure.top ) ;
-
- left = content.left - structure.left ;
- top = content.top - structure.top ;
- right = structure.right - content.right ;
- bottom = structure.bottom - content.bottom ;
- }
- else
- {
- left = top = right = bottom = 0 ;
- }
-
- DisposeRgn( rgn ) ;
-}
-
-wxSize wxWindowMac::DoGetSizeFromClientSize( const wxSize & size ) const
-{
- wxSize sizeTotal = size;
-
- RgnHandle rgn = NewRgn() ;
- if ( m_peer->GetRegion( kControlContentMetaPart , rgn ) == noErr )
- {
- Rect content, structure ;
- GetRegionBounds( rgn , &content ) ;
- m_peer->GetRect( &structure ) ;
-
- // structure is in parent coordinates, but we only need width and height, so it's ok
-
- sizeTotal.x += (structure.right - structure.left) - (content.right - content.left) ;
- sizeTotal.y += (structure.bottom - structure.top) - (content.bottom - content.top) ;
- }
-
- DisposeRgn( rgn ) ;
-
- sizeTotal.x += MacGetLeftBorderSize() + MacGetRightBorderSize() ;
- sizeTotal.y += MacGetTopBorderSize() + MacGetBottomBorderSize() ;
-
- return sizeTotal;
-}
-
-// Get size *available for subwindows* i.e. excluding menu bar etc.
-void wxWindowMac::DoGetClientSize( int *x, int *y ) const
-{
- int ww, hh;
-
- RgnHandle rgn = NewRgn() ;
- Rect content ;
- if ( m_peer->GetRegion( kControlContentMetaPart , rgn ) == noErr )
- GetRegionBounds( rgn , &content ) ;
- else
- m_peer->GetRect( &content ) ;
- DisposeRgn( rgn ) ;
-
- ww = content.right - content.left ;
- hh = content.bottom - content.top ;
-
- if (m_hScrollBar && m_hScrollBar->IsShown() )
- hh -= m_hScrollBar->GetSize().y ;
-
- if (m_vScrollBar && m_vScrollBar->IsShown() )
- ww -= m_vScrollBar->GetSize().x ;
-
- if (x)
- *x = ww;
- if (y)
- *y = hh;
-}
-
-bool wxWindowMac::SetCursor(const wxCursor& cursor)
-{
- if (m_cursor.IsSameAs(cursor))
- return false;
-
- if (!cursor.IsOk())
- {
- if ( ! wxWindowBase::SetCursor( *wxSTANDARD_CURSOR ) )
- return false ;
- }
- else
- {
- if ( ! wxWindowBase::SetCursor( cursor ) )
- return false ;
- }
-
- wxASSERT_MSG( m_cursor.Ok(),
- wxT("cursor must be valid after call to the base version"));
-
- wxWindowMac *mouseWin = 0 ;
- {
- wxNonOwnedWindow *tlw = MacGetTopLevelWindow() ;
- WindowRef window = (WindowRef) ( tlw ? tlw->MacGetWindowRef() : 0 ) ;
-
- ControlPartCode part ;
- ControlRef control ;
- Point pt ;
- #if MAC_OS_X_VERSION_MIN_REQUIRED >= MAC_OS_X_VERSION_10_5
- HIPoint hiPoint ;
- HIGetMousePosition(kHICoordSpaceWindow, window, &hiPoint);
- pt.h = hiPoint.x;
- pt.v = hiPoint.y;
- #else
- GetGlobalMouse( &pt );
- int x = pt.h;
- int y = pt.v;
- ScreenToClient(&x, &y);
- pt.h = x;
- pt.v = y;
-#endif
- control = FindControlUnderMouse( pt , window , &part ) ;
- if ( control )
- mouseWin = wxFindControlFromMacControl( control ) ;
-
- }
-
- if ( mouseWin == this && !wxIsBusy() )
- m_cursor.MacInstall() ;
-
- return true ;
-}
-
-#if wxUSE_MENUS
-bool wxWindowMac::DoPopupMenu(wxMenu *menu, int x, int y)
-{
-#ifndef __WXUNIVERSAL__
- menu->SetInvokingWindow((wxWindow*)this);
- menu->UpdateUI();
-
- if ( x == wxDefaultCoord && y == wxDefaultCoord )
- {
- wxPoint mouse = wxGetMousePosition();
- x = mouse.x;
- y = mouse.y;
- }
- else
- {
- ClientToScreen( &x , &y ) ;
- }
-
- menu->MacBeforeDisplay( true ) ;
- long menuResult = ::PopUpMenuSelect((MenuHandle) menu->GetHMenu() , y, x, 0) ;
- if ( HiWord(menuResult) != 0 )
- {
- MenuCommand macid;
- GetMenuItemCommandID( GetMenuHandle(HiWord(menuResult)) , LoWord(menuResult) , &macid );
- int id = wxMacCommandToId( macid );
- wxMenuItem* item = NULL ;
- wxMenu* realmenu ;
- item = menu->FindItem( id, &realmenu ) ;
- if ( item )
- {
- if (item->IsCheckable())
- item->Check( !item->IsChecked() ) ;
-
- menu->SendEvent( id , item->IsCheckable() ? item->IsChecked() : -1 ) ;
- }
- }
-
- menu->MacAfterDisplay( true ) ;
- menu->SetInvokingWindow( NULL );
-
- return true;
-#else
- // actually this shouldn't be called, because universal is having its own implementation
- return false;
-#endif
-}
-#endif
-
-// ----------------------------------------------------------------------------
-// tooltips
-// ----------------------------------------------------------------------------
-
-#if wxUSE_TOOLTIPS
-
-void wxWindowMac::DoSetToolTip(wxToolTip *tooltip)
-{
- wxWindowBase::DoSetToolTip(tooltip);
-
- if ( m_tooltip )
- m_tooltip->SetWindow(this);
-}
-
-#endif
-
-void wxWindowMac::MacInvalidateBorders()
-{
- if ( m_peer == NULL )
- return ;
-
- bool vis = IsShownOnScreen() ;
- if ( !vis )
- return ;
-
- int outerBorder = MacGetLeftBorderSize() ;
- if ( m_peer->NeedsFocusRect() /* && m_peer->HasFocus() */ )
- outerBorder += 4 ;
-
- if ( outerBorder == 0 )
- return ;
-
- // now we know that we have something to do at all
-
- // as the borders are drawn on the parent we have to properly invalidate all these areas
- RgnHandle updateInner , updateOuter;
- Rect rect ;
-
- // this rectangle is in HIViewCoordinates under OSX and in Window Coordinates under Carbon
- updateInner = NewRgn() ;
- updateOuter = NewRgn() ;
-
- m_peer->GetRect( &rect ) ;
- RectRgn( updateInner, &rect ) ;
- InsetRect( &rect , -outerBorder , -outerBorder ) ;
- RectRgn( updateOuter, &rect ) ;
- DiffRgn( updateOuter, updateInner , updateOuter ) ;
-
- GetParent()->m_peer->SetNeedsDisplay( updateOuter ) ;
-
- DisposeRgn( updateOuter ) ;
- DisposeRgn( updateInner ) ;
-}
-
-void wxWindowMac::DoMoveWindow(int x, int y, int width, int height)
-{
- // this is never called for a toplevel window, so we know we have a parent
- int former_x , former_y , former_w, former_h ;
-
- // Get true coordinates of former position
- DoGetPosition( &former_x , &former_y ) ;
- DoGetSize( &former_w , &former_h ) ;
-
- wxWindow *parent = GetParent();
- if ( parent )
- {
- wxPoint pt(parent->GetClientAreaOrigin());
- former_x += pt.x ;
- former_y += pt.y ;
- }
-
- int actualWidth = width ;
- int actualHeight = height ;
- int actualX = x;
- int actualY = y;
-
- if ((m_minWidth != -1) && (actualWidth < m_minWidth))
- actualWidth = m_minWidth;
- if ((m_minHeight != -1) && (actualHeight < m_minHeight))
- actualHeight = m_minHeight;
- if ((m_maxWidth != -1) && (actualWidth > m_maxWidth))
- actualWidth = m_maxWidth;
- if ((m_maxHeight != -1) && (actualHeight > m_maxHeight))
- actualHeight = m_maxHeight;
-
- bool doMove = false, doResize = false ;
-
- if ( actualX != former_x || actualY != former_y )
- doMove = true ;
-
- if ( actualWidth != former_w || actualHeight != former_h )
- doResize = true ;
-
- if ( doMove || doResize )
- {
- // as the borders are drawn outside the native control, we adjust now
-
- wxRect bounds( wxPoint( actualX + MacGetLeftBorderSize() ,actualY + MacGetTopBorderSize() ),
- wxSize( actualWidth - (MacGetLeftBorderSize() + MacGetRightBorderSize()) ,
- actualHeight - (MacGetTopBorderSize() + MacGetBottomBorderSize()) ) ) ;
-
- Rect r ;
- wxMacRectToNative( &bounds , &r ) ;
-
- if ( !GetParent()->IsTopLevel() )
- wxMacWindowToNative( GetParent() , &r ) ;
-
- MacInvalidateBorders() ;
-
- m_cachedClippedRectValid = false ;
- m_peer->SetRect( &r ) ;
-
- wxWindowMac::MacSuperChangedPosition() ; // like this only children will be notified
-
- MacInvalidateBorders() ;
-
- MacRepositionScrollBars() ;
- if ( doMove )
- {
- wxPoint point(actualX, actualY);
- wxMoveEvent event(point, m_windowId);
- event.SetEventObject(this);
- HandleWindowEvent(event) ;
- }
-
- if ( doResize )
- {
- MacRepositionScrollBars() ;
- wxSize size(actualWidth, actualHeight);
- wxSizeEvent event(size, m_windowId);
- event.SetEventObject(this);
- HandleWindowEvent(event);
- }
- }
-}
-
-wxSize wxWindowMac::DoGetBestSize() const
-{
- if ( m_macIsUserPane || IsTopLevel() )
- return wxWindowBase::DoGetBestSize() ;
-
- Rect bestsize = { 0 , 0 , 0 , 0 } ;
- int bestWidth, bestHeight ;
-
- m_peer->GetBestRect( &bestsize ) ;
- if ( EmptyRect( &bestsize ) )
- {
- bestsize.left =
- bestsize.top = 0 ;
- bestsize.right =
- bestsize.bottom = 16 ;
-
- if ( IsKindOf( CLASSINFO( wxScrollBar ) ) )
- {
- bestsize.bottom = 16 ;
- }
-#if wxUSE_SPINBTN
- else if ( IsKindOf( CLASSINFO( wxSpinButton ) ) )
- {
- bestsize.bottom = 24 ;
- }
-#endif
- else
- {
- // return wxWindowBase::DoGetBestSize() ;
- }
- }
-
- bestWidth = bestsize.right - bestsize.left ;
- bestHeight = bestsize.bottom - bestsize.top ;
- if ( bestHeight < 10 )
- bestHeight = 13 ;
-
- return wxSize(bestWidth, bestHeight);
-}
-
-// set the size of the window: if the dimensions are positive, just use them,
-// but if any of them is equal to -1, it means that we must find the value for
-// it ourselves (unless sizeFlags contains wxSIZE_ALLOW_MINUS_ONE flag, in
-// which case -1 is a valid value for x and y)
-//
-// If sizeFlags contains wxSIZE_AUTO_WIDTH/HEIGHT flags (default), we calculate
-// the width/height to best suit our contents, otherwise we reuse the current
-// width/height
-void wxWindowMac::DoSetSize(int x, int y, int width, int height, int sizeFlags)
-{
- // get the current size and position...
- int currentX, currentY;
- int currentW, currentH;
-
- GetPosition(¤tX, ¤tY);
- GetSize(¤tW, ¤tH);
-
- // ... and don't do anything (avoiding flicker) if it's already ok
- if ( x == currentX && y == currentY &&
- width == currentW && height == currentH && ( height != -1 && width != -1 ) )
- {
- // TODO: REMOVE
- MacRepositionScrollBars() ; // we might have a real position shift
-
- return;
- }
-
- if ( !(sizeFlags & wxSIZE_ALLOW_MINUS_ONE) )
- {
- if ( x == wxDefaultCoord )
- x = currentX;
- if ( y == wxDefaultCoord )
- y = currentY;
- }
-
- AdjustForParentClientOrigin( x, y, sizeFlags );
-
- wxSize size = wxDefaultSize;
- if ( width == wxDefaultCoord )
- {
- if ( sizeFlags & wxSIZE_AUTO_WIDTH )
- {
- size = DoGetBestSize();
- width = size.x;
- }
- else
- {
- // just take the current one
- width = currentW;
- }
- }
-
- if ( height == wxDefaultCoord )
- {
- if ( sizeFlags & wxSIZE_AUTO_HEIGHT )
- {
- if ( size.x == wxDefaultCoord )
- size = DoGetBestSize();
- // else: already called DoGetBestSize() above
-
- height = size.y;
- }
- else
- {
- // just take the current one
- height = currentH;
- }
- }
-
- DoMoveWindow( x, y, width, height );
-}
-
-wxPoint wxWindowMac::GetClientAreaOrigin() const
-{
- RgnHandle rgn = NewRgn() ;
- Rect content ;
- if ( m_peer->GetRegion( kControlContentMetaPart , rgn ) == noErr )
- {
- GetRegionBounds( rgn , &content ) ;
- }
- else
- {
- content.left =
- content.top = 0 ;
- }
-
- DisposeRgn( rgn ) ;
-
- return wxPoint( content.left + MacGetLeftBorderSize() , content.top + MacGetTopBorderSize() );
-}
-
-void wxWindowMac::DoSetClientSize(int clientwidth, int clientheight)
-{
- if ( clientwidth != wxDefaultCoord || clientheight != wxDefaultCoord )
- {
- int currentclientwidth , currentclientheight ;
- int currentwidth , currentheight ;
-
- GetClientSize( ¤tclientwidth , ¤tclientheight ) ;
- GetSize( ¤twidth , ¤theight ) ;
-
- DoSetSize( wxDefaultCoord , wxDefaultCoord , currentwidth + clientwidth - currentclientwidth ,
- currentheight + clientheight - currentclientheight , wxSIZE_USE_EXISTING ) ;
- }
-}
-
-void wxWindowMac::SetLabel(const wxString& title)
-{
- m_label = title ;
-
- if ( m_peer && m_peer->Ok() )
- m_peer->SetLabel( wxStripMenuCodes(m_label, wxStrip_Mnemonics) ) ;
-
- // do not trigger refreshes upon invisible and possible partly created objects
- if ( IsShownOnScreen() )
- Refresh() ;
-}
-
-wxString wxWindowMac::GetLabel() const
-{
- return m_label ;
-}
-
-bool wxWindowMac::Show(bool show)
-{
- if ( !wxWindowBase::Show(show) )
- return false;
-
- if ( m_peer )
- m_peer->SetVisibility( show , true ) ;
-
- return true;
-}
-
-void wxWindowMac::DoEnable(bool enable)
-{
- m_peer->Enable( enable ) ;
-}
-
-//
-// status change notifications
-//
-
-void wxWindowMac::MacVisibilityChanged()
-{
-}
-
-void wxWindowMac::MacHiliteChanged()
-{
-}
-
-void wxWindowMac::MacEnabledStateChanged()
-{
- OnEnabled( m_peer->IsEnabled() );
-}
-
-//
-// status queries on the inherited window's state
-//
-
-bool wxWindowMac::MacIsReallyEnabled()
-{
- return m_peer->IsEnabled() ;
-}
-
-bool wxWindowMac::MacIsReallyHilited()
-{
- return m_peer->IsActive();
-}
-
-void wxWindowMac::MacFlashInvalidAreas()
-{
-#if TARGET_API_MAC_OSX
- HIViewFlashDirtyArea( (WindowRef) MacGetTopLevelWindowRef() ) ;
-#endif
-}
-
-int wxWindowMac::GetCharHeight() const
-{
- wxClientDC dc( (wxWindowMac*)this ) ;
-
- return dc.GetCharHeight() ;
-}
-
-int wxWindowMac::GetCharWidth() const
-{
- wxClientDC dc( (wxWindowMac*)this ) ;
-
- return dc.GetCharWidth() ;
-}
-
-void wxWindowMac::GetTextExtent(const wxString& string, int *x, int *y,
- int *descent, int *externalLeading, const wxFont *theFont ) const
-{
- const wxFont *fontToUse = theFont;
- wxFont tempFont;
- if ( !fontToUse )
- {
- tempFont = GetFont();
- fontToUse = &tempFont;
- }
-
- wxClientDC dc( (wxWindowMac*) this ) ;
- wxCoord lx,ly,ld,le ;
- dc.GetTextExtent( string , &lx , &ly , &ld, &le, (wxFont *)fontToUse ) ;
- if ( externalLeading )
- *externalLeading = le ;
- if ( descent )
- *descent = ld ;
- if ( x )
- *x = lx ;
- if ( y )
- *y = ly ;
-}
-
-/*
- * Rect is given in client coordinates, for further reading, read wxTopLevelWindowMac::InvalidateRect
- * we always intersect with the entire window, not only with the client area
- */
-
-void wxWindowMac::Refresh(bool WXUNUSED(eraseBack), const wxRect *rect)
-{
- if ( m_peer == NULL )
- return ;
-
- if ( !IsShownOnScreen() )
- return ;
-
- if ( rect )
- {
- Rect r ;
-
- wxMacRectToNative( rect , &r ) ;
- m_peer->SetNeedsDisplay( &r ) ;
- }
- else
- {
- m_peer->SetNeedsDisplay() ;
- }
-}
-
-void wxWindowMac::DoFreeze()
-{
-#if TARGET_API_MAC_OSX
- if ( m_peer && m_peer->Ok() )
- m_peer->SetDrawingEnabled( false ) ;
-#endif
-}
-
-void wxWindowMac::DoThaw()
-{
-#if TARGET_API_MAC_OSX
- if ( m_peer && m_peer->Ok() )
- {
- m_peer->SetDrawingEnabled( true ) ;
- m_peer->InvalidateWithChildren() ;
- }
-#endif
-}
-
-wxWindowMac *wxGetActiveWindow()
-{
- // actually this is a windows-only concept
- return NULL;
-}
-
-// Coordinates relative to the window
-void wxWindowMac::WarpPointer(int WXUNUSED(x_pos), int WXUNUSED(y_pos))
-{
- // We really don't move the mouse programmatically under Mac.
-}
-
-void wxWindowMac::OnEraseBackground(wxEraseEvent& event)
-{
- if ( MacGetTopLevelWindow() == NULL )
- return ;
-/*
-#if TARGET_API_MAC_OSX
- if ( !m_backgroundColour.Ok() || GetBackgroundStyle() == wxBG_STYLE_TRANSPARENT )
- {
- }
- else
-#endif
-*/
- if ( GetBackgroundStyle() == wxBG_STYLE_COLOUR )
- {
- event.GetDC()->Clear() ;
- }
- else if ( GetBackgroundStyle() == wxBG_STYLE_CUSTOM )
- {
- // don't skip the event here, custom background means that the app
- // is drawing it itself in its OnPaint(), so don't draw it at all
- // now to avoid flicker
- }
- else
- {
- event.Skip() ;
- }
-}
-
-void wxWindowMac::OnNcPaint( wxNcPaintEvent& event )
-{
- event.Skip() ;
-}
-
-int wxWindowMac::GetScrollPos(int orient) const
-{
- if ( orient == wxHORIZONTAL )
- {
- if ( m_hScrollBar )
- return m_hScrollBar->GetThumbPosition() ;
- }
- else
- {
- if ( m_vScrollBar )
- return m_vScrollBar->GetThumbPosition() ;
- }
-
- return 0;
-}
-
-// This now returns the whole range, not just the number
-// of positions that we can scroll.
-int wxWindowMac::GetScrollRange(int orient) const
-{
- if ( orient == wxHORIZONTAL )
- {
- if ( m_hScrollBar )
- return m_hScrollBar->GetRange() ;
- }
- else
- {
- if ( m_vScrollBar )
- return m_vScrollBar->GetRange() ;
- }
-
- return 0;
-}
-
-int wxWindowMac::GetScrollThumb(int orient) const
-{
- if ( orient == wxHORIZONTAL )
- {
- if ( m_hScrollBar )
- return m_hScrollBar->GetThumbSize() ;
- }
- else
- {
- if ( m_vScrollBar )
- return m_vScrollBar->GetThumbSize() ;
- }
-
- return 0;
-}
-
-void wxWindowMac::SetScrollPos(int orient, int pos, bool WXUNUSED(refresh))
-{
- if ( orient == wxHORIZONTAL )
- {
- if ( m_hScrollBar )
- m_hScrollBar->SetThumbPosition( pos ) ;
- }
- else
- {
- if ( m_vScrollBar )
- m_vScrollBar->SetThumbPosition( pos ) ;
- }
-}
-
-void
-wxWindowMac::AlwaysShowScrollbars(bool hflag, bool vflag)
-{
- bool needVisibilityUpdate = false;
-
- if ( m_hScrollBarAlwaysShown != hflag )
- {
- m_hScrollBarAlwaysShown = hflag;
- needVisibilityUpdate = true;
- }
-
- if ( m_vScrollBarAlwaysShown != vflag )
- {
- m_vScrollBarAlwaysShown = vflag;
- needVisibilityUpdate = true;
- }
-
- if ( needVisibilityUpdate )
- DoUpdateScrollbarVisibility();
-}
-
-//
-// we draw borders and grow boxes, are already set up and clipped in the current port / cgContextRef
-// our own window origin is at leftOrigin/rightOrigin
-//
-
-void wxWindowMac::MacPaintGrowBox()
-{
- if ( IsTopLevel() )
- return ;
-
- if ( MacHasScrollBarCorner() )
- {
- Rect rect ;
-
- CGContextRef cgContext = (CGContextRef) MacGetCGContextRef() ;
- wxASSERT( cgContext ) ;
-
- m_peer->GetRect( &rect ) ;
-
- int size = m_hScrollBar ? m_hScrollBar->GetSize().y : ( m_vScrollBar ? m_vScrollBar->GetSize().x : MAC_SCROLLBAR_SIZE ) ;
- CGRect cgrect = CGRectMake( rect.right - size , rect.bottom - size , size , size ) ;
- CGPoint cgpoint = CGPointMake( rect.right - size , rect.bottom - size ) ;
- CGContextSaveGState( cgContext );
-
- if ( m_backgroundColour.Ok() )
- {
- CGContextSetFillColorWithColor( cgContext, m_backgroundColour.GetCGColor() );
- }
- else
- {
- CGContextSetRGBFillColor( cgContext, (CGFloat) 1.0, (CGFloat)1.0 ,(CGFloat) 1.0 , (CGFloat)1.0 );
- }
- CGContextFillRect( cgContext, cgrect );
- CGContextRestoreGState( cgContext );
- }
-}
-
-void wxWindowMac::MacPaintBorders( int WXUNUSED(leftOrigin) , int WXUNUSED(rightOrigin) )
-{
- if ( IsTopLevel() )
- return ;
-
- Rect rect ;
- bool hasFocus = m_peer->NeedsFocusRect() && m_peer->HasFocus() ;
-
- // back to the surrounding frame rectangle
- m_peer->GetRect( &rect ) ;
- InsetRect( &rect, -1 , -1 ) ;
-
- {
- CGRect cgrect = CGRectMake( rect.left , rect.top , rect.right - rect.left ,
- rect.bottom - rect.top ) ;
-
- HIThemeFrameDrawInfo info ;
- memset( &info, 0 , sizeof(info) ) ;
-
- info.version = 0 ;
- info.kind = 0 ;
- info.state = IsEnabled() ? kThemeStateActive : kThemeStateInactive ;
- info.isFocused = hasFocus ;
-
- CGContextRef cgContext = (CGContextRef) GetParent()->MacGetCGContextRef() ;
- wxASSERT( cgContext ) ;
-
- if ( HasFlag(wxRAISED_BORDER) || HasFlag(wxSUNKEN_BORDER) || HasFlag(wxDOUBLE_BORDER) )
- {
- info.kind = kHIThemeFrameTextFieldSquare ;
- HIThemeDrawFrame( &cgrect , &info , cgContext , kHIThemeOrientationNormal ) ;
- }
- else if ( HasFlag(wxSIMPLE_BORDER) )
- {
- info.kind = kHIThemeFrameListBox ;
- HIThemeDrawFrame( &cgrect , &info , cgContext , kHIThemeOrientationNormal ) ;
- }
- else if ( hasFocus )
- {
- HIThemeDrawFocusRect( &cgrect , true , cgContext , kHIThemeOrientationNormal ) ;
- }
-#if 0 // TODO REMOVE now done in a separate call earlier in drawing the window itself
- m_peer->GetRect( &rect ) ;
- if ( MacHasScrollBarCorner() )
- {
- int variant = (m_hScrollBar == NULL ? m_vScrollBar : m_hScrollBar ) ->GetWindowVariant();
- int size = m_hScrollBar ? m_hScrollBar->GetSize().y : ( m_vScrollBar ? m_vScrollBar->GetSize().x : MAC_SCROLLBAR_SIZE ) ;
- CGRect cgrect = CGRectMake( rect.right - size , rect.bottom - size , size , size ) ;
- CGPoint cgpoint = CGPointMake( rect.right - size , rect.bottom - size ) ;
- HIThemeGrowBoxDrawInfo info ;
- memset( &info, 0, sizeof(info) ) ;
- info.version = 0 ;
- info.state = IsEnabled() ? kThemeStateActive : kThemeStateInactive ;
- info.kind = kHIThemeGrowBoxKindNone ;
- // contrary to the docs ...SizeSmall does not work
- info.size = kHIThemeGrowBoxSizeNormal ;
- info.direction = 0 ;
- HIThemeDrawGrowBox( &cgpoint , &info , cgContext , kHIThemeOrientationNormal ) ;
- }
-#endif
- }
-}
-
-void wxWindowMac::RemoveChild( wxWindowBase *child )
-{
- if ( child == m_hScrollBar )
- m_hScrollBar = NULL ;
- if ( child == m_vScrollBar )
- m_vScrollBar = NULL ;
-
- wxWindowBase::RemoveChild( child ) ;
-}
-
-void wxWindowMac::DoUpdateScrollbarVisibility()
-{
- bool triggerSizeEvent = false;
-
- if ( m_hScrollBar )
- {
- bool showHScrollBar = m_hScrollBarAlwaysShown || m_hScrollBar->IsNeeded();
-
- if ( m_hScrollBar->IsShown() != showHScrollBar )
- {
- m_hScrollBar->Show( showHScrollBar );
- triggerSizeEvent = true;
- }
- }
-
- if ( m_vScrollBar)
- {
- bool showVScrollBar = m_vScrollBarAlwaysShown || m_vScrollBar->IsNeeded();
-
- if ( m_vScrollBar->IsShown() != showVScrollBar )
- {
- m_vScrollBar->Show( showVScrollBar ) ;
- triggerSizeEvent = true;
- }
- }
-
- MacRepositionScrollBars() ;
- if ( triggerSizeEvent )
- {
- wxSizeEvent event(GetSize(), m_windowId);
- event.SetEventObject(this);
- HandleWindowEvent(event);
- }
-}
-
-// New function that will replace some of the above.
-void wxWindowMac::SetScrollbar(int orient, int pos, int thumb,
- int range, bool refresh)
-{
- if ( orient == wxHORIZONTAL && m_hScrollBar )
- m_hScrollBar->SetScrollbar(pos, thumb, range, thumb, refresh);
- else if ( orient == wxVERTICAL && m_vScrollBar )
- m_vScrollBar->SetScrollbar(pos, thumb, range, thumb, refresh);
-
- DoUpdateScrollbarVisibility();
-}
-
-// Does a physical scroll
-void wxWindowMac::ScrollWindow(int dx, int dy, const wxRect *rect)
-{
- if ( dx == 0 && dy == 0 )
- return ;
-
- int width , height ;
- GetClientSize( &width , &height ) ;
-
- {
- // note there currently is a bug in OSX which makes inefficient refreshes in case an entire control
- // area is scrolled, this does not occur if width and height are 2 pixels less,
- // TODO: write optimal workaround
- wxRect scrollrect( MacGetLeftBorderSize() , MacGetTopBorderSize() , width , height ) ;
- if ( rect )
- scrollrect.Intersect( *rect ) ;
-
- if ( m_peer->GetNeedsDisplay() )
- {
- // because HIViewScrollRect does not scroll the already invalidated area we have two options:
- // in case there is already a pending redraw on that area
- // either immediate redraw or full invalidate
-#if 1
- // is the better overall solution, as it does not slow down scrolling
- m_peer->SetNeedsDisplay() ;
-#else
- // this would be the preferred version for fast drawing controls
- HIViewRender(m_peer->GetControlRef()) ;
-#endif
- }
-
- // as the native control might be not a 0/0 wx window coordinates, we have to offset
- scrollrect.Offset( -MacGetLeftBorderSize() , -MacGetTopBorderSize() ) ;
- m_peer->ScrollRect( &scrollrect , dx , dy ) ;
-
-#if 0
- // this would be the preferred version for fast drawing controls
- HIViewRender(m_peer->GetControlRef()) ;
-#endif
- }
-
- wxWindowMac *child;
- int x, y, w, h;
- for (wxWindowList::compatibility_iterator node = GetChildren().GetFirst(); node; node = node->GetNext())
- {
- child = node->GetData();
- if (child == NULL)
- continue;
- if (child == m_vScrollBar)
- continue;
- if (child == m_hScrollBar)
- continue;
- if (child->IsTopLevel())
- continue;
-
- child->GetPosition( &x, &y );
- child->GetSize( &w, &h );
- if (rect)
- {
- wxRect rc( x, y, w, h );
- if (rect->Intersects( rc ))
- child->SetSize( x + dx, y + dy, w, h, wxSIZE_AUTO|wxSIZE_ALLOW_MINUS_ONE );
- }
- else
- {
- child->SetSize( x + dx, y + dy, w, h, wxSIZE_AUTO|wxSIZE_ALLOW_MINUS_ONE );
- }
- }
-}
-
-void wxWindowMac::MacOnScroll( wxScrollEvent &event )
-{
- if ( event.GetEventObject() == m_vScrollBar || event.GetEventObject() == m_hScrollBar )
- {
- wxScrollWinEvent wevent;
- wevent.SetPosition(event.GetPosition());
- wevent.SetOrientation(event.GetOrientation());
- wevent.SetEventObject(this);
-
- if (event.GetEventType() == wxEVT_SCROLL_TOP)
- wevent.SetEventType( wxEVT_SCROLLWIN_TOP );
- else if (event.GetEventType() == wxEVT_SCROLL_BOTTOM)
- wevent.SetEventType( wxEVT_SCROLLWIN_BOTTOM );
- else if (event.GetEventType() == wxEVT_SCROLL_LINEUP)
- wevent.SetEventType( wxEVT_SCROLLWIN_LINEUP );
- else if (event.GetEventType() == wxEVT_SCROLL_LINEDOWN)
- wevent.SetEventType( wxEVT_SCROLLWIN_LINEDOWN );
- else if (event.GetEventType() == wxEVT_SCROLL_PAGEUP)
- wevent.SetEventType( wxEVT_SCROLLWIN_PAGEUP );
- else if (event.GetEventType() == wxEVT_SCROLL_PAGEDOWN)
- wevent.SetEventType( wxEVT_SCROLLWIN_PAGEDOWN );
- else if (event.GetEventType() == wxEVT_SCROLL_THUMBTRACK)
- wevent.SetEventType( wxEVT_SCROLLWIN_THUMBTRACK );
- else if (event.GetEventType() == wxEVT_SCROLL_THUMBRELEASE)
- wevent.SetEventType( wxEVT_SCROLLWIN_THUMBRELEASE );
-
- HandleWindowEvent(wevent);
- }
-}
-
-// Get the window with the focus
-wxWindowMac *wxWindowBase::DoFindFocus()
-{
- ControlRef control ;
- GetKeyboardFocus( GetUserFocusWindow() , &control ) ;
- return wxFindControlFromMacControl( control ) ;
-}
-
-void wxWindowMac::OnInternalIdle()
-{
- // This calls the UI-update mechanism (querying windows for
- // menu/toolbar/control state information)
- if (wxUpdateUIEvent::CanUpdate(this) && IsShownOnScreen())
- UpdateWindowUI(wxUPDATE_UI_FROMIDLE);
-}
-
-// Raise the window to the top of the Z order
-void wxWindowMac::Raise()
-{
- m_peer->SetZOrder( true , NULL ) ;
-}
-
-// Lower the window to the bottom of the Z order
-void wxWindowMac::Lower()
-{
- m_peer->SetZOrder( false , NULL ) ;
-}
-
-// static wxWindow *gs_lastWhich = NULL;
-
-bool wxWindowMac::MacSetupCursor( const wxPoint& pt )
-{
- // first trigger a set cursor event
-
- wxPoint clientorigin = GetClientAreaOrigin() ;
- wxSize clientsize = GetClientSize() ;
- wxCursor cursor ;
- if ( wxRect2DInt( clientorigin.x , clientorigin.y , clientsize.x , clientsize.y ).Contains( wxPoint2DInt( pt ) ) )
- {
- wxSetCursorEvent event( pt.x , pt.y );
-
- bool processedEvtSetCursor = HandleWindowEvent(event);
- if ( processedEvtSetCursor && event.HasCursor() )
- {
- cursor = event.GetCursor() ;
- }
- else
- {
- // the test for processedEvtSetCursor is here to prevent using m_cursor
- // if the user code caught EVT_SET_CURSOR() and returned nothing from
- // it - this is a way to say that our cursor shouldn't be used for this
- // point
- if ( !processedEvtSetCursor && m_cursor.Ok() )
- cursor = m_cursor ;
-
- if ( !wxIsBusy() && !GetParent() )
- cursor = *wxSTANDARD_CURSOR ;
- }
-
- if ( cursor.Ok() )
- cursor.MacInstall() ;
- }
-
- return cursor.Ok() ;
-}
-
-wxString wxWindowMac::MacGetToolTipString( wxPoint &WXUNUSED(pt) )
-{
-#if wxUSE_TOOLTIPS
- if ( m_tooltip )
- return m_tooltip->GetTip() ;
-#endif
-
- return wxEmptyString ;
-}
-
-void wxWindowMac::ClearBackground()
-{
- Refresh() ;
- Update() ;
-}
-
-void wxWindowMac::Update()
-{
- wxNonOwnedWindow* top = MacGetTopLevelWindow();
- if (top)
- top->MacPerformUpdates() ;
-}
-
-wxNonOwnedWindow* wxWindowMac::MacGetTopLevelWindow() const
-{
- wxNonOwnedWindow* win = NULL ;
- WindowRef window = (WindowRef) MacGetTopLevelWindowRef() ;
- if ( window )
- win = wxFindWinFromMacWindow( window ) ;
-
- return win ;
-}
-
-const wxRect& wxWindowMac::MacGetClippedClientRect() const
-{
- MacUpdateClippedRects() ;
-
- return m_cachedClippedClientRect ;
-}
-
-const wxRect& wxWindowMac::MacGetClippedRect() const
-{
- MacUpdateClippedRects() ;
-
- return m_cachedClippedRect ;
-}
-
-const wxRect&wxWindowMac:: MacGetClippedRectWithOuterStructure() const
-{
- MacUpdateClippedRects() ;
-
- return m_cachedClippedRectWithOuterStructure ;
-}
-
-const wxRegion& wxWindowMac::MacGetVisibleRegion( bool includeOuterStructures )
-{
- static wxRegion emptyrgn ;
-
- if ( !m_isBeingDeleted && IsShownOnScreen() )
- {
- MacUpdateClippedRects() ;
- if ( includeOuterStructures )
- return m_cachedClippedRegionWithOuterStructure ;
- else
- return m_cachedClippedRegion ;
- }
- else
- {
- return emptyrgn ;
- }
-}
-
-void wxWindowMac::MacUpdateClippedRects() const
-{
- if ( m_cachedClippedRectValid )
- return ;
-
- // includeOuterStructures is true if we try to draw somthing like a focus ring etc.
- // also a window dc uses this, in this case we only clip in the hierarchy for hard
- // borders like a scrollwindow, splitter etc otherwise we end up in a paranoia having
- // to add focus borders everywhere
-
- Rect r, rIncludingOuterStructures ;
-
- m_peer->GetRect( &r ) ;
- r.left -= MacGetLeftBorderSize() ;
- r.top -= MacGetTopBorderSize() ;
- r.bottom += MacGetBottomBorderSize() ;
- r.right += MacGetRightBorderSize() ;
-
- r.right -= r.left ;
- r.bottom -= r.top ;
- r.left = 0 ;
- r.top = 0 ;
-
- rIncludingOuterStructures = r ;
- InsetRect( &rIncludingOuterStructures , -4 , -4 ) ;
-
- wxRect cl = GetClientRect() ;
- Rect rClient = { cl.y , cl.x , cl.y + cl.height , cl.x + cl.width } ;
-
- int x , y ;
- wxSize size ;
- const wxWindow* child = this ;
- const wxWindow* parent = NULL ;
-
- while ( !child->IsTopLevel() && ( parent = child->GetParent() ) != NULL )
- {
- if ( parent->MacIsChildOfClientArea(child) )
- {
- size = parent->GetClientSize() ;
- wxPoint origin = parent->GetClientAreaOrigin() ;
- x = origin.x ;
- y = origin.y ;
- }
- else
- {
- // this will be true for scrollbars, toolbars etc.
- size = parent->GetSize() ;
- y = parent->MacGetTopBorderSize() ;
- x = parent->MacGetLeftBorderSize() ;
- size.x -= parent->MacGetLeftBorderSize() + parent->MacGetRightBorderSize() ;
- size.y -= parent->MacGetTopBorderSize() + parent->MacGetBottomBorderSize() ;
- }
-
- parent->MacWindowToRootWindow( &x, &y ) ;
- MacRootWindowToWindow( &x , &y ) ;
-
- Rect rparent = { y , x , y + size.y , x + size.x } ;
-
- // the wxwindow and client rects will always be clipped
- SectRect( &r , &rparent , &r ) ;
- SectRect( &rClient , &rparent , &rClient ) ;
-
- // the structure only at 'hard' borders
- if ( parent->MacClipChildren() ||
- ( parent->GetParent() && parent->GetParent()->MacClipGrandChildren() ) )
- {
- SectRect( &rIncludingOuterStructures , &rparent , &rIncludingOuterStructures ) ;
- }
-
- child = parent ;
- }
-
- m_cachedClippedRect = wxRect( r.left , r.top , r.right - r.left , r.bottom - r.top ) ;
- m_cachedClippedClientRect = wxRect( rClient.left , rClient.top ,
- rClient.right - rClient.left , rClient.bottom - rClient.top ) ;
- m_cachedClippedRectWithOuterStructure = wxRect(
- rIncludingOuterStructures.left , rIncludingOuterStructures.top ,
- rIncludingOuterStructures.right - rIncludingOuterStructures.left ,
- rIncludingOuterStructures.bottom - rIncludingOuterStructures.top ) ;
-
- m_cachedClippedRegionWithOuterStructure = wxRegion( m_cachedClippedRectWithOuterStructure ) ;
- m_cachedClippedRegion = wxRegion( m_cachedClippedRect ) ;
- m_cachedClippedClientRegion = wxRegion( m_cachedClippedClientRect ) ;
-
- m_cachedClippedRectValid = true ;
-}
-
-/*
- This function must not change the updatergn !
- */
-bool wxWindowMac::MacDoRedraw( void* updatergnr , long time )
-{
- bool handled = false ;
- Rect updatebounds ;
- RgnHandle updatergn = (RgnHandle) updatergnr ;
- GetRegionBounds( updatergn , &updatebounds ) ;
-
- // wxLogDebug(wxT("update for %s bounds %d, %d, %d, %d"), wxString(GetClassInfo()->GetClassName()).c_str(), updatebounds.left, updatebounds.top , updatebounds.right , updatebounds.bottom ) ;
-
- if ( !EmptyRgn(updatergn) )
- {
- RgnHandle newupdate = NewRgn() ;
- wxSize point = GetClientSize() ;
- wxPoint origin = GetClientAreaOrigin() ;
- SetRectRgn( newupdate , origin.x , origin.y , origin.x + point.x , origin.y + point.y ) ;
- SectRgn( newupdate , updatergn , newupdate ) ;
-
- // first send an erase event to the entire update area
- {
- // for the toplevel window this really is the entire area
- // for all the others only their client area, otherwise they
- // might be drawing with full alpha and eg put blue into
- // the grow-box area of a scrolled window (scroll sample)
- wxDC* dc = new wxWindowDC(this);
- if ( IsTopLevel() )
- dc->SetClippingRegion(wxRegion(HIShapeCreateWithQDRgn(updatergn)));
- else
- dc->SetClippingRegion(wxRegion(HIShapeCreateWithQDRgn(newupdate)));
-
- wxEraseEvent eevent( GetId(), dc );
- eevent.SetEventObject( this );
- HandleWindowEvent( eevent );
- delete dc ;
- }
-
- MacPaintGrowBox();
-
- // calculate a client-origin version of the update rgn and set m_updateRegion to that
- OffsetRgn( newupdate , -origin.x , -origin.y ) ;
- m_updateRegion = wxRegion(HIShapeCreateWithQDRgn(newupdate)) ;
- DisposeRgn( newupdate ) ;
-
- if ( !m_updateRegion.Empty() )
- {
- // paint the window itself
-
- wxPaintEvent event;
- event.SetTimestamp(time);
- event.SetEventObject(this);
- HandleWindowEvent(event);
- handled = true ;
- }
-
- // now we cannot rely on having its borders drawn by a window itself, as it does not
- // get the updateRgn wide enough to always do so, so we do it from the parent
- // this would also be the place to draw any custom backgrounds for native controls
- // in Composited windowing
- wxPoint clientOrigin = GetClientAreaOrigin() ;
-
- wxWindowMac *child;
- int x, y, w, h;
- for (wxWindowList::compatibility_iterator node = GetChildren().GetFirst(); node; node = node->GetNext())
- {
- child = node->GetData();
- if (child == NULL)
- continue;
- if (child == m_vScrollBar)
- continue;
- if (child == m_hScrollBar)
- continue;
- if (child->IsTopLevel())
- continue;
- if (!child->IsShown())
- continue;
-
- // only draw those in the update region (add a safety margin of 10 pixels for shadow effects
-
- child->GetPosition( &x, &y );
- child->GetSize( &w, &h );
- Rect childRect = { y , x , y + h , x + w } ;
- OffsetRect( &childRect , clientOrigin.x , clientOrigin.y ) ;
- InsetRect( &childRect , -10 , -10) ;
-
- if ( RectInRgn( &childRect , updatergn ) )
- {
- // paint custom borders
- wxNcPaintEvent eventNc( child->GetId() );
- eventNc.SetEventObject( child );
- if ( !child->HandleWindowEvent( eventNc ) )
- {
- child->MacPaintBorders(0, 0) ;
- }
- }
- }
- }
-
- return handled ;
-}
-
-
-WXWindow wxWindowMac::MacGetTopLevelWindowRef() const
-{
- wxWindowMac *iter = (wxWindowMac*)this ;
-
- while ( iter )
- {
- if ( iter->IsTopLevel() )
- {
- wxTopLevelWindow* toplevel = wxDynamicCast(iter,wxTopLevelWindow);
- if ( toplevel )
- return toplevel->MacGetWindowRef();
-#if wxUSE_POPUPWIN
- wxPopupWindow* popupwin = wxDynamicCast(iter,wxPopupWindow);
- if ( popupwin )
- return popupwin->MacGetWindowRef();
-#endif
- }
- iter = iter->GetParent() ;
- }
-
- return NULL ;
-}
-
-bool wxWindowMac::MacHasScrollBarCorner() const
-{
- /* Returns whether the scroll bars in a wxScrolledWindow should be
- * shortened. Scroll bars should be shortened if either:
- *
- * - both scroll bars are visible, or
- *
- * - there is a resize box in the parent frame's corner and this
- * window shares the bottom and right edge with the parent
- * frame.
- */
-
- if ( m_hScrollBar == NULL && m_vScrollBar == NULL )
- return false;
-
- if ( ( m_hScrollBar && m_hScrollBar->IsShown() )
- && ( m_vScrollBar && m_vScrollBar->IsShown() ) )
- {
- // Both scroll bars visible
- return true;
- }
- else
- {
- wxPoint thisWindowBottomRight = GetScreenRect().GetBottomRight();
-
- for ( const wxWindow *win = this; win; win = win->GetParent() )
- {
- const wxFrame *frame = wxDynamicCast( win, wxFrame ) ;
- if ( frame )
- {
- if ( frame->GetWindowStyleFlag() & wxRESIZE_BORDER )
- {
- // Parent frame has resize handle
- wxPoint frameBottomRight = frame->GetScreenRect().GetBottomRight();
-
- // Note: allow for some wiggle room here as wxMac's
- // window rect calculations seem to be imprecise
- if ( abs( thisWindowBottomRight.x - frameBottomRight.x ) <= 2
- && abs( thisWindowBottomRight.y - frameBottomRight.y ) <= 2 )
- {
- // Parent frame has resize handle and shares
- // right bottom corner
- return true ;
- }
- else
- {
- // Parent frame has resize handle but doesn't
- // share right bottom corner
- return false ;
- }
- }
- else
- {
- // Parent frame doesn't have resize handle
- return false ;
- }
- }
- }
-
- // No parent frame found
- return false ;
- }
-}
-
-void wxWindowMac::MacCreateScrollBars( long style )
-{
- wxASSERT_MSG( m_vScrollBar == NULL && m_hScrollBar == NULL , wxT("attempt to create window twice") ) ;
-
- if ( style & ( wxVSCROLL | wxHSCROLL ) )
- {
- int scrlsize = MAC_SCROLLBAR_SIZE ;
- if ( GetWindowVariant() == wxWINDOW_VARIANT_SMALL || GetWindowVariant() == wxWINDOW_VARIANT_MINI )
- {
- scrlsize = MAC_SMALL_SCROLLBAR_SIZE ;
- }
-
- int adjust = MacHasScrollBarCorner() ? scrlsize - 1: 0 ;
- int width, height ;
- GetClientSize( &width , &height ) ;
-
- wxPoint vPoint(width - scrlsize, 0) ;
- wxSize vSize(scrlsize, height - adjust) ;
- wxPoint hPoint(0, height - scrlsize) ;
- wxSize hSize(width - adjust, scrlsize) ;
-
- // we have to set the min size to a smaller value, otherwise they cannot get smaller (InitialSize sets MinSize)
- if ( style & wxVSCROLL )
- {
- m_vScrollBar = new wxScrollBar((wxWindow*)this, wxID_ANY, vPoint, vSize , wxVERTICAL);
- m_vScrollBar->SetMinSize( wxDefaultSize );
- }
-
- if ( style & wxHSCROLL )
- {
- m_hScrollBar = new wxScrollBar((wxWindow*)this, wxID_ANY, hPoint, hSize , wxHORIZONTAL);
- m_hScrollBar->SetMinSize( wxDefaultSize );
- }
- }
-
- // because the create does not take into account the client area origin
- // we might have a real position shift
- MacRepositionScrollBars() ;
-}
-
-bool wxWindowMac::MacIsChildOfClientArea( const wxWindow* child ) const
-{
- bool result = ((child == NULL) || ((child != m_hScrollBar) && (child != m_vScrollBar)));
-
- return result ;
-}
-
-void wxWindowMac::MacRepositionScrollBars()
-{
- if ( !m_hScrollBar && !m_vScrollBar )
- return ;
-
- int scrlsize = m_hScrollBar ? m_hScrollBar->GetSize().y : ( m_vScrollBar ? m_vScrollBar->GetSize().x : MAC_SCROLLBAR_SIZE ) ;
- int adjust = MacHasScrollBarCorner() ? scrlsize - 1 : 0 ;
-
- // get real client area
- int width, height ;
- GetSize( &width , &height );
-
- width -= MacGetLeftBorderSize() + MacGetRightBorderSize();
- height -= MacGetTopBorderSize() + MacGetBottomBorderSize();
-
- wxPoint vPoint( width - scrlsize, 0 ) ;
- wxSize vSize( scrlsize, height - adjust ) ;
- wxPoint hPoint( 0 , height - scrlsize ) ;
- wxSize hSize( width - adjust, scrlsize ) ;
-
-#if 0
- int x = 0, y = 0, w, h ;
- GetSize( &w , &h ) ;
-
- MacClientToRootWindow( &x , &y ) ;
- MacClientToRootWindow( &w , &h ) ;
-
- wxWindowMac *iter = (wxWindowMac*)this ;
-
- int totW = 10000 , totH = 10000;
- while ( iter )
- {
- if ( iter->IsTopLevel() )
- {
- iter->GetSize( &totW , &totH ) ;
- break ;
- }
-
- iter = iter->GetParent() ;
- }
-
- if ( x == 0 )
- {
- hPoint.x = -1 ;
- hSize.x += 1 ;
- }
- if ( y == 0 )
- {
- vPoint.y = -1 ;
- vSize.y += 1 ;
- }
-
- if ( w - x >= totW )
- {
- hSize.x += 1 ;
- vPoint.x += 1 ;
- }
- if ( h - y >= totH )
- {
- vSize.y += 1 ;
- hPoint.y += 1 ;
- }
-#endif
-
- if ( m_vScrollBar )
- m_vScrollBar->SetSize( vPoint.x , vPoint.y, vSize.x, vSize.y , wxSIZE_ALLOW_MINUS_ONE );
- if ( m_hScrollBar )
- m_hScrollBar->SetSize( hPoint.x , hPoint.y, hSize.x, hSize.y, wxSIZE_ALLOW_MINUS_ONE );
-}
-
-bool wxWindowMac::AcceptsFocus() const
-{
- return MacCanFocus() && wxWindowBase::AcceptsFocus();
-}
-
-void wxWindowMac::MacSuperChangedPosition()
-{
- // only window-absolute structures have to be moved i.e. controls
-
- m_cachedClippedRectValid = false ;
-
- wxWindowMac *child;
- wxWindowList::compatibility_iterator node = GetChildren().GetFirst();
- while ( node )
- {
- child = node->GetData();
- child->MacSuperChangedPosition() ;
-
- node = node->GetNext();
- }
-}
-
-void wxWindowMac::MacTopLevelWindowChangedPosition()
-{
- // only screen-absolute structures have to be moved i.e. glcanvas
-
- wxWindowMac *child;
- wxWindowList::compatibility_iterator node = GetChildren().GetFirst();
- while ( node )
- {
- child = node->GetData();
- child->MacTopLevelWindowChangedPosition() ;
-
- node = node->GetNext();
- }
-}
-
-long wxWindowMac::MacGetLeftBorderSize() const
-{
- if ( IsTopLevel() )
- return 0 ;
-
- SInt32 border = 0 ;
-
- if (HasFlag(wxRAISED_BORDER) || HasFlag( wxSUNKEN_BORDER) || HasFlag(wxDOUBLE_BORDER))
- {
- // this metric is only the 'outset' outside the simple frame rect
- GetThemeMetric( kThemeMetricEditTextFrameOutset , &border ) ;
- border += 1 ;
- }
- else if (HasFlag(wxSIMPLE_BORDER))
- {
- // this metric is only the 'outset' outside the simple frame rect
- GetThemeMetric( kThemeMetricListBoxFrameOutset , &border ) ;
- border += 1 ;
- }
-
- return border ;
-}
-
-long wxWindowMac::MacGetRightBorderSize() const
-{
- // they are all symmetric in mac themes
- return MacGetLeftBorderSize() ;
-}
-
-long wxWindowMac::MacGetTopBorderSize() const
-{
- // they are all symmetric in mac themes
- return MacGetLeftBorderSize() ;
-}
-
-long wxWindowMac::MacGetBottomBorderSize() const
-{
- // they are all symmetric in mac themes
- return MacGetLeftBorderSize() ;
-}
-
-long wxWindowMac::MacRemoveBordersFromStyle( long style )
-{
- return style & ~wxBORDER_MASK ;
-}
-
-// Find the wxWindowMac at the current mouse position, returning the mouse
-// position.
-wxWindowMac * wxFindWindowAtPointer( wxPoint& pt )
-{
- pt = wxGetMousePosition();
- wxWindowMac* found = wxFindWindowAtPoint(pt);
-
- return found;
-}
-
-// Get the current mouse position.
-wxPoint wxGetMousePosition()
-{
- int x, y;
-
- wxGetMousePosition( &x, &y );
-
- return wxPoint(x, y);
-}
-
-void wxWindowMac::OnMouseEvent( wxMouseEvent &event )
-{
- if ( event.GetEventType() == wxEVT_RIGHT_DOWN )
- {
- // copied from wxGTK : CS
- // VZ: shouldn't we move this to base class then?
-
- // generate a "context menu" event: this is similar to wxEVT_RIGHT_DOWN
- // except that:
- //
- // (a) it's a command event and so is propagated to the parent
- // (b) under MSW it can be generated from kbd too
- // (c) it uses screen coords (because of (a))
- wxContextMenuEvent evtCtx(wxEVT_CONTEXT_MENU,
- this->GetId(),
- this->ClientToScreen(event.GetPosition()));
- evtCtx.SetEventObject(this);
- if ( ! HandleWindowEvent(evtCtx) )
- event.Skip() ;
- }
- else
- {
- event.Skip() ;
- }
-}
-
-void wxWindowMac::OnPaint( wxPaintEvent & WXUNUSED(event) )
-{
- // for native controls: call their native paint method
- if ( !MacIsUserPane() || ( IsTopLevel() && GetBackgroundStyle() == wxBG_STYLE_SYSTEM ) )
- {
- if ( wxTheApp->MacGetCurrentEvent() != NULL && wxTheApp->MacGetCurrentEventHandlerCallRef() != NULL
- && GetBackgroundStyle() != wxBG_STYLE_TRANSPARENT )
- CallNextEventHandler(
- (EventHandlerCallRef)wxTheApp->MacGetCurrentEventHandlerCallRef() ,
- (EventRef) wxTheApp->MacGetCurrentEvent() ) ;
- }
-}
-
-void wxWindowMac::MacHandleControlClick(WXWidget WXUNUSED(control),
- wxInt16 WXUNUSED(controlpart),
- bool WXUNUSED(mouseStillDown))
-{
-}
-
-Rect wxMacGetBoundsForControl( wxWindow* window , const wxPoint& pos , const wxSize &size , bool adjustForOrigin )
-{
- int x, y, w, h ;
-
- window->MacGetBoundsForControl( pos , size , x , y, w, h , adjustForOrigin ) ;
- Rect bounds = { y, x, y + h, x + w };
-
- return bounds ;
-}
-
-wxInt32 wxWindowMac::MacControlHit(WXEVENTHANDLERREF WXUNUSED(handler) , WXEVENTREF WXUNUSED(event) )
-{
- return eventNotHandledErr ;
-}
-
-bool wxWindowMac::Reparent(wxWindowBase *newParentBase)
-{
- wxWindowMac *newParent = (wxWindowMac *)newParentBase;
- if ( !wxWindowBase::Reparent(newParent) )
- return false;
-
- // copied from MacPostControlCreate
- ControlRef container = (ControlRef) GetParent()->GetHandle() ;
-
- wxASSERT_MSG( container != NULL , wxT("No valid mac container control") ) ;
-
- ::EmbedControl( m_peer->GetControlRef() , container ) ;
-
- return true;
-}
-
-bool wxWindowMac::SetTransparent(wxByte alpha)
-{
- SetBackgroundStyle(wxBG_STYLE_TRANSPARENT);
-
- if ( alpha != m_macAlpha )
- {
- m_macAlpha = alpha ;
- Refresh() ;
- }
- return true ;
-}
-
-
-bool wxWindowMac::CanSetTransparent()
-{
- return true ;
-}
-
-wxByte wxWindowMac::GetTransparent() const
-{
- return m_macAlpha ;
-}
-
-bool wxWindowMac::IsShownOnScreen() const
-{
-#if TARGET_API_MAC_OSX
- if ( m_peer && m_peer->Ok() )
- {
- bool peerVis = m_peer->IsVisible();
- bool wxVis = wxWindowBase::IsShownOnScreen();
- if( peerVis != wxVis )
- {
- // CS : put a breakpoint here to investigate differences
- // between native an wx visibilities
- // the only place where I've encountered them until now
- // are the hiding/showing sequences where the vis-changed event is
- // first sent to the innermost control, while wx does things
- // from the outmost control
- wxVis = wxWindowBase::IsShownOnScreen();
- return wxVis;
- }
-
- return m_peer->IsVisible();
- }
-#endif
-
- return wxWindowBase::IsShownOnScreen();
-}
projects / wxWidgets.git / blobdiff