X-Git-Url: https://git.saurik.com/wxWidgets.git/blobdiff_plain/a01d9a255c8887521b4d47c15b6637bf38c4b688..ffbf7f6634ebdce1055ec21256c4fd3e3bd410c8:/src/mac/carbon/toplevel.cpp diff --git a/src/mac/carbon/toplevel.cpp b/src/mac/carbon/toplevel.cpp index 57847ae885..b1b9e62997 100644 --- a/src/mac/carbon/toplevel.cpp +++ b/src/mac/carbon/toplevel.cpp @@ -53,1329 +53,119 @@ // for targeting OSX #include "wx/mac/private.h" -// ---------------------------------------------------------------------------- -// constants -// ---------------------------------------------------------------------------- - -// unified title and toolbar constant - not in Tiger headers, so we duplicate it here -#define kWindowUnifiedTitleAndToolbarAttribute (1 << 7) - -// trace mask for activation tracing messages -static const wxChar *TRACE_ACTIVATE = _T("activation"); - -// ---------------------------------------------------------------------------- -// globals -// ---------------------------------------------------------------------------- - -// list of all frames and modeless dialogs -wxWindowList wxModelessWindows; - -static pascal long wxShapedMacWindowDef(short varCode, WindowRef window, SInt16 message, SInt32 param); - // ============================================================================ // wxTopLevelWindowMac implementation -// ============================================================================ - -BEGIN_EVENT_TABLE(wxTopLevelWindowMac, wxTopLevelWindowBase) -END_EVENT_TABLE() - -// --------------------------------------------------------------------------- -// Carbon Events -// --------------------------------------------------------------------------- - -static const EventTypeSpec eventList[] = -{ - // TODO: remove control related event like key and mouse (except for WindowLeave events) - - { kEventClassKeyboard, kEventRawKeyDown } , - { kEventClassKeyboard, kEventRawKeyRepeat } , - { kEventClassKeyboard, kEventRawKeyUp } , - { kEventClassKeyboard, kEventRawKeyModifiersChanged } , - - { kEventClassTextInput, kEventTextInputUnicodeForKeyEvent } , - { kEventClassTextInput, kEventTextInputUpdateActiveInputArea } , - - { kEventClassWindow , kEventWindowShown } , - { kEventClassWindow , kEventWindowActivated } , - { kEventClassWindow , kEventWindowDeactivated } , - { kEventClassWindow , kEventWindowBoundsChanging } , - { kEventClassWindow , kEventWindowBoundsChanged } , - { kEventClassWindow , kEventWindowClose } , - { kEventClassWindow , kEventWindowGetRegion } , - - // we have to catch these events on the toplevel window level, - // as controls don't get the raw mouse events anymore - - { kEventClassMouse , kEventMouseDown } , - { kEventClassMouse , kEventMouseUp } , - { kEventClassMouse , kEventMouseWheelMoved } , - { kEventClassMouse , kEventMouseMoved } , - { kEventClassMouse , kEventMouseDragged } , -} ; - -static pascal OSStatus KeyboardEventHandler( EventHandlerCallRef handler , EventRef event , void *data ) -{ - OSStatus result = eventNotHandledErr ; - // call DoFindFocus instead of FindFocus, because for Composite Windows(like WxGenericListCtrl) - // FindFocus does not return the actual focus window, but the enclosing window - wxWindow* focus = wxWindow::DoFindFocus(); - if ( focus == NULL ) - focus = (wxTopLevelWindowMac*) data ; - - unsigned char charCode ; - wxChar uniChar[2] ; - uniChar[0] = 0; - uniChar[1] = 0; - - UInt32 keyCode ; - UInt32 modifiers ; - Point point ; - UInt32 when = EventTimeToTicks( GetEventTime( event ) ) ; - -#if wxUSE_UNICODE - ByteCount dataSize = 0 ; - if ( GetEventParameter( event, kEventParamKeyUnicodes, typeUnicodeText, NULL, 0 , &dataSize, NULL ) == noErr ) - { - UniChar buf[2] ; - int numChars = dataSize / sizeof( UniChar) + 1; - - UniChar* charBuf = buf ; - - if ( numChars * 2 > 4 ) - charBuf = new UniChar[ numChars ] ; - GetEventParameter( event, kEventParamKeyUnicodes, typeUnicodeText, NULL, dataSize , NULL , charBuf ) ; - charBuf[ numChars - 1 ] = 0; - -#if SIZEOF_WCHAR_T == 2 - uniChar = charBuf[0] ; -#else - wxMBConvUTF16 converter ; - converter.MB2WC( uniChar , (const char*)charBuf , 2 ) ; -#endif - - if ( numChars * 2 > 4 ) - delete[] charBuf ; - } -#endif - - GetEventParameter( event, kEventParamKeyMacCharCodes, typeChar, NULL, sizeof(char), NULL, &charCode ); - GetEventParameter( event, kEventParamKeyCode, typeUInt32, NULL, sizeof(UInt32), NULL, &keyCode ); - GetEventParameter( event, kEventParamKeyModifiers, typeUInt32, NULL, sizeof(UInt32), NULL, &modifiers ); - GetEventParameter( event, kEventParamMouseLocation, typeQDPoint, NULL, sizeof(Point), NULL, &point ); - - UInt32 message = (keyCode << 8) + charCode; - switch ( GetEventKind( event ) ) - { - case kEventRawKeyRepeat : - case kEventRawKeyDown : - { - WXEVENTREF formerEvent = wxTheApp->MacGetCurrentEvent() ; - WXEVENTHANDLERCALLREF formerHandler = wxTheApp->MacGetCurrentEventHandlerCallRef() ; - wxTheApp->MacSetCurrentEvent( event , handler ) ; - if ( /* focus && */ wxTheApp->MacSendKeyDownEvent( - focus , message , modifiers , when , point.h , point.v , uniChar[0] ) ) - { - result = noErr ; - } - wxTheApp->MacSetCurrentEvent( formerEvent , formerHandler ) ; - } - break ; - - case kEventRawKeyUp : - if ( /* focus && */ wxTheApp->MacSendKeyUpEvent( - focus , message , modifiers , when , point.h , point.v , uniChar[0] ) ) - { - result = noErr ; - } - break ; - - case kEventRawKeyModifiersChanged : - { - wxKeyEvent event(wxEVT_KEY_DOWN); - - event.m_shiftDown = modifiers & shiftKey; - event.m_controlDown = modifiers & controlKey; - event.m_altDown = modifiers & optionKey; - event.m_metaDown = modifiers & cmdKey; - event.m_x = point.h; - event.m_y = point.v; - -#if wxUSE_UNICODE - event.m_uniChar = uniChar[0] ; -#endif - - event.SetTimestamp(when); - event.SetEventObject(focus); - - if ( /* focus && */ (modifiers ^ wxApp::s_lastModifiers ) & controlKey ) - { - event.m_keyCode = WXK_CONTROL ; - event.SetEventType( ( modifiers & controlKey ) ? wxEVT_KEY_DOWN : wxEVT_KEY_UP ) ; - focus->GetEventHandler()->ProcessEvent( event ) ; - } - if ( /* focus && */ (modifiers ^ wxApp::s_lastModifiers ) & shiftKey ) - { - event.m_keyCode = WXK_SHIFT ; - event.SetEventType( ( modifiers & shiftKey ) ? wxEVT_KEY_DOWN : wxEVT_KEY_UP ) ; - focus->GetEventHandler()->ProcessEvent( event ) ; - } - if ( /* focus && */ (modifiers ^ wxApp::s_lastModifiers ) & optionKey ) - { - event.m_keyCode = WXK_ALT ; - event.SetEventType( ( modifiers & optionKey ) ? wxEVT_KEY_DOWN : wxEVT_KEY_UP ) ; - focus->GetEventHandler()->ProcessEvent( event ) ; - } - if ( /* focus && */ (modifiers ^ wxApp::s_lastModifiers ) & cmdKey ) - { - event.m_keyCode = WXK_COMMAND ; - event.SetEventType( ( modifiers & cmdKey ) ? wxEVT_KEY_DOWN : wxEVT_KEY_UP ) ; - focus->GetEventHandler()->ProcessEvent( event ) ; - } - - wxApp::s_lastModifiers = modifiers ; - } - break ; - - default: - break; - } - - return result ; -} - -// we don't interfere with foreign controls on our toplevel windows, therefore we always give back eventNotHandledErr -// for windows that we didn't create (like eg Scrollbars in a databrowser), or for controls where we did not handle the -// mouse down at all -// -// This handler can also be called from app level where data (ie target window) may be null or a non wx window - -wxWindow* g_MacLastWindow = NULL ; - -EventMouseButton g_lastButton = 0 ; -bool g_lastButtonWasFakeRight = false ; - -void SetupMouseEvent( wxMouseEvent &wxevent , wxMacCarbonEvent &cEvent ) -{ - UInt32 modifiers = cEvent.GetParameter(kEventParamKeyModifiers, typeUInt32) ; - Point screenMouseLocation = cEvent.GetParameter(kEventParamMouseLocation) ; - - // these parameters are not given for all events - EventMouseButton button = 0 ; - UInt32 clickCount = 0 ; - UInt32 mouseChord = 0; - - cEvent.GetParameter( kEventParamMouseButton, typeMouseButton , &button ) ; - cEvent.GetParameter( kEventParamClickCount, typeUInt32 , &clickCount ) ; - // the chord is the state of the buttons pressed currently - cEvent.GetParameter( kEventParamMouseChord, typeUInt32 , &mouseChord ) ; - - wxevent.m_x = screenMouseLocation.h; - wxevent.m_y = screenMouseLocation.v; - wxevent.m_shiftDown = modifiers & shiftKey; - wxevent.m_controlDown = modifiers & controlKey; - wxevent.m_altDown = modifiers & optionKey; - wxevent.m_metaDown = modifiers & cmdKey; - wxevent.m_clickCount = clickCount; - wxevent.SetTimestamp( cEvent.GetTicks() ) ; - - // a control click is interpreted as a right click - bool thisButtonIsFakeRight = false ; - if ( button == kEventMouseButtonPrimary && (modifiers & controlKey) ) - { - button = kEventMouseButtonSecondary ; - thisButtonIsFakeRight = true ; - } - - // otherwise we report double clicks by connecting a left click with a ctrl-left click - if ( clickCount > 1 && button != g_lastButton ) - clickCount = 1 ; - - // we must make sure that our synthetic 'right' button corresponds in - // mouse down, moved and mouse up, and does not deliver a right down and left up - - if ( cEvent.GetKind() == kEventMouseDown ) - { - g_lastButton = button ; - g_lastButtonWasFakeRight = thisButtonIsFakeRight ; - } - - if ( button == 0 ) - { - g_lastButton = 0 ; - g_lastButtonWasFakeRight = false ; - } - else if ( g_lastButton == kEventMouseButtonSecondary && g_lastButtonWasFakeRight ) - button = g_lastButton ; - - // Adjust the chord mask to remove the primary button and add the - // secondary button. It is possible that the secondary button is - // already pressed, e.g. on a mouse connected to a laptop, but this - // possibility is ignored here: - if( thisButtonIsFakeRight && ( mouseChord & 1U ) ) - mouseChord = ((mouseChord & ~1U) | 2U); - - if(mouseChord & 1U) - wxevent.m_leftDown = true ; - if(mouseChord & 2U) - wxevent.m_rightDown = true ; - if(mouseChord & 4U) - wxevent.m_middleDown = true ; - - // translate into wx types - switch ( cEvent.GetKind() ) - { - case kEventMouseDown : - switch ( button ) - { - case kEventMouseButtonPrimary : - wxevent.SetEventType( clickCount > 1 ? wxEVT_LEFT_DCLICK : wxEVT_LEFT_DOWN ) ; - break ; - - case kEventMouseButtonSecondary : - wxevent.SetEventType( clickCount > 1 ? wxEVT_RIGHT_DCLICK : wxEVT_RIGHT_DOWN ) ; - break ; - - case kEventMouseButtonTertiary : - wxevent.SetEventType( clickCount > 1 ? wxEVT_MIDDLE_DCLICK : wxEVT_MIDDLE_DOWN ) ; - break ; - - default: - break ; - } - break ; - - case kEventMouseUp : - switch ( button ) - { - case kEventMouseButtonPrimary : - wxevent.SetEventType( wxEVT_LEFT_UP ) ; - break ; - - case kEventMouseButtonSecondary : - wxevent.SetEventType( wxEVT_RIGHT_UP ) ; - break ; - - case kEventMouseButtonTertiary : - wxevent.SetEventType( wxEVT_MIDDLE_UP ) ; - break ; - - default: - break ; - } - break ; - - case kEventMouseWheelMoved : - { - wxevent.SetEventType( wxEVT_MOUSEWHEEL ) ; - - EventMouseWheelAxis axis = cEvent.GetParameter(kEventParamMouseWheelAxis, typeMouseWheelAxis) ; - SInt32 delta = cEvent.GetParameter(kEventParamMouseWheelDelta, typeSInt32) ; - - wxevent.m_wheelRotation = delta; - wxevent.m_wheelDelta = 1; - wxevent.m_linesPerAction = 1; - if ( axis == kEventMouseWheelAxisX ) - wxevent.m_wheelAxis = 1; - } - break ; - - case kEventMouseEntered : - case kEventMouseExited : - case kEventMouseDragged : - case kEventMouseMoved : - wxevent.SetEventType( wxEVT_MOTION ) ; - break; - default : - break ; - } -} - -ControlRef wxMacFindSubControl( wxTopLevelWindowMac* toplevelWindow, const Point& location , ControlRef superControl , ControlPartCode *outPart ) -{ - if ( superControl ) - { - UInt16 childrenCount = 0 ; - ControlHandle sibling ; - Rect r ; - OSStatus err = CountSubControls( superControl , &childrenCount ) ; - if ( err == errControlIsNotEmbedder ) - return NULL ; - - wxASSERT_MSG( err == noErr , wxT("Unexpected error when accessing subcontrols") ) ; - - for ( UInt16 i = childrenCount ; i >=1 ; --i ) - { - err = GetIndexedSubControl( superControl , i , & sibling ) ; - if ( err == errControlIsNotEmbedder ) - return NULL ; - - wxASSERT_MSG( err == noErr , wxT("Unexpected error when accessing subcontrols") ) ; - if ( IsControlVisible( sibling ) ) - { - UMAGetControlBoundsInWindowCoords( sibling , &r ) ; - if ( MacPtInRect( location , &r ) ) - { - ControlHandle child = wxMacFindSubControl( toplevelWindow , location , sibling , outPart ) ; - if ( child ) - { - return child ; - } - else - { - Point testLocation = location ; - - if ( toplevelWindow ) - { - testLocation.h -= r.left ; - testLocation.v -= r.top ; - } - - *outPart = TestControl( sibling , testLocation ) ; - - return sibling ; - } - } - } - } - } - - return NULL ; -} - - -#define NEW_CAPTURE_HANDLING 1 - -pascal OSStatus -wxMacTopLevelMouseEventHandler(EventHandlerCallRef WXUNUSED(handler), - EventRef event, - void *data) -{ - wxTopLevelWindowMac* toplevelWindow = (wxTopLevelWindowMac*) data ; - - OSStatus result = eventNotHandledErr ; - - wxMacCarbonEvent cEvent( event ) ; - - Point screenMouseLocation = cEvent.GetParameter(kEventParamMouseLocation) ; - Point windowMouseLocation = screenMouseLocation ; - - WindowRef window = NULL; - short windowPart = ::FindWindow(screenMouseLocation, &window); - - wxWindow* currentMouseWindow = NULL ; - ControlRef control = NULL ; - -#if NEW_CAPTURE_HANDLING - if ( wxApp::s_captureWindow ) - { - window = (WindowRef) wxApp::s_captureWindow->MacGetTopLevelWindowRef() ; - windowPart = inContent ; - } -#endif - - if ( window ) - { - wxMacGlobalToLocal( window, &windowMouseLocation ) ; - - if ( wxApp::s_captureWindow -#if !NEW_CAPTURE_HANDLING - && wxApp::s_captureWindow->MacGetTopLevelWindowRef() == (WXWindow) window && windowPart == inContent -#endif - ) - { - currentMouseWindow = wxApp::s_captureWindow ; - } - else if ( (IsWindowActive(window) && windowPart == inContent) ) - { - ControlPartCode part ; - control = FindControlUnderMouse( windowMouseLocation , window , &part ) ; - // if there is no control below the mouse position, send the event to the toplevel window itself - if ( control == 0 ) - { - currentMouseWindow = (wxWindow*) data ; - } - else - { - currentMouseWindow = (wxWindow*) wxFindControlFromMacControl( control ) ; -#ifndef __WXUNIVERSAL__ - if ( currentMouseWindow == NULL && cEvent.GetKind() == kEventMouseMoved ) - { -#if wxUSE_TOOLBAR - // for wxToolBar to function we have to send certaint events to it - // instead of its children (wxToolBarTools) - ControlRef parent ; - GetSuperControl(control, &parent ); - wxWindow *wxParent = (wxWindow*) wxFindControlFromMacControl( parent ) ; - if ( wxParent && wxParent->IsKindOf( CLASSINFO( wxToolBar ) ) ) - currentMouseWindow = wxParent ; -#endif - } -#endif - } - - // disabled windows must not get any input messages - if ( currentMouseWindow && !currentMouseWindow->MacIsReallyEnabled() ) - currentMouseWindow = NULL; - } - } - - wxMouseEvent wxevent(wxEVT_LEFT_DOWN); - SetupMouseEvent( wxevent , cEvent ) ; - - // handle all enter / leave events - - if ( currentMouseWindow != g_MacLastWindow ) - { - if ( g_MacLastWindow ) - { - wxMouseEvent eventleave(wxevent); - eventleave.SetEventType( wxEVT_LEAVE_WINDOW ); - g_MacLastWindow->ScreenToClient( &eventleave.m_x, &eventleave.m_y ); - eventleave.SetEventObject( g_MacLastWindow ) ; - wxevent.SetId( g_MacLastWindow->GetId() ) ; - -#if wxUSE_TOOLTIPS - wxToolTip::RelayEvent( g_MacLastWindow , eventleave); -#endif - - g_MacLastWindow->GetEventHandler()->ProcessEvent(eventleave); - } - - if ( currentMouseWindow ) - { - wxMouseEvent evententer(wxevent); - evententer.SetEventType( wxEVT_ENTER_WINDOW ); - currentMouseWindow->ScreenToClient( &evententer.m_x, &evententer.m_y ); - evententer.SetEventObject( currentMouseWindow ) ; - wxevent.SetId( currentMouseWindow->GetId() ) ; - -#if wxUSE_TOOLTIPS - wxToolTip::RelayEvent( currentMouseWindow , evententer ); -#endif - - currentMouseWindow->GetEventHandler()->ProcessEvent(evententer); - } - - g_MacLastWindow = currentMouseWindow ; - } - - if ( windowPart == inMenuBar ) - { - // special case menu bar, as we are having a low-level runloop we must do it ourselves - if ( cEvent.GetKind() == kEventMouseDown ) - { - ::MenuSelect( screenMouseLocation ) ; - ::HiliteMenu(0); - result = noErr ; - } - } - else if ( currentMouseWindow ) - { - wxWindow *currentMouseWindowParent = currentMouseWindow->GetParent(); - - currentMouseWindow->ScreenToClient( &wxevent.m_x , &wxevent.m_y ) ; - - wxevent.SetEventObject( currentMouseWindow ) ; - wxevent.SetId( currentMouseWindow->GetId() ) ; - - // make tooltips current - -#if wxUSE_TOOLTIPS - if ( wxevent.GetEventType() == wxEVT_MOTION ) - wxToolTip::RelayEvent( currentMouseWindow , wxevent ); -#endif - - if ( currentMouseWindow->GetEventHandler()->ProcessEvent(wxevent) ) - { - if ((currentMouseWindowParent != NULL) && - (currentMouseWindowParent->GetChildren().Find(currentMouseWindow) == NULL)) - currentMouseWindow = NULL; - - result = noErr; - } - else - { - // if the user code did _not_ handle the event, then perform the - // default processing - if ( wxevent.GetEventType() == wxEVT_LEFT_DOWN ) - { - // ... that is set focus to this window - if (currentMouseWindow->CanAcceptFocus() && wxWindow::FindFocus()!=currentMouseWindow) - currentMouseWindow->SetFocus(); - } - - // if built-in find control is finding the wrong control (ie static box instead of overlaid - // button, we cannot let the standard handler do its job, but must handle manually - - if ( cEvent.GetKind() == kEventMouseDown ) - { - if ( currentMouseWindow->MacIsReallyEnabled() ) - { - EventModifiers modifiers = cEvent.GetParameter(kEventParamKeyModifiers, typeUInt32) ; - Point clickLocation = windowMouseLocation ; - - currentMouseWindow->MacRootWindowToWindow( &clickLocation.h , &clickLocation.v ) ; - - HandleControlClick( (ControlRef) currentMouseWindow->GetHandle() , clickLocation , - modifiers , (ControlActionUPP ) -1 ) ; - - if ((currentMouseWindowParent != NULL) && - (currentMouseWindowParent->GetChildren().Find(currentMouseWindow) == NULL)) - { - currentMouseWindow = NULL; - } - } - - result = noErr ; - } - } - - if ( cEvent.GetKind() == kEventMouseUp && wxApp::s_captureWindow ) - { - wxApp::s_captureWindow = NULL ; - // update cursor ? - } - - // update cursor - - wxWindow* cursorTarget = currentMouseWindow ; - wxPoint cursorPoint( wxevent.m_x , wxevent.m_y ) ; - - while ( cursorTarget && !cursorTarget->MacSetupCursor( cursorPoint ) ) - { - cursorTarget = cursorTarget->GetParent() ; - if ( cursorTarget ) - cursorPoint += cursorTarget->GetPosition(); - } - - } - else // currentMouseWindow == NULL - { - // don't mess with controls we don't know about - // for some reason returning eventNotHandledErr does not lead to the correct behaviour - // so we try sending them the correct control directly - if ( cEvent.GetKind() == kEventMouseDown && toplevelWindow && control ) - { - EventModifiers modifiers = cEvent.GetParameter(kEventParamKeyModifiers, typeUInt32) ; - Point clickLocation = windowMouseLocation ; - - HIPoint hiPoint ; - hiPoint.x = clickLocation.h ; - hiPoint.y = clickLocation.v ; - HIViewConvertPoint( &hiPoint , (ControlRef) toplevelWindow->GetHandle() , control ) ; - clickLocation.h = (int)hiPoint.x ; - clickLocation.v = (int)hiPoint.y ; - - HandleControlClick( control , clickLocation , modifiers , (ControlActionUPP ) -1 ) ; - result = noErr ; - } - } - - return result ; -} - -static pascal OSStatus -wxMacTopLevelWindowEventHandler(EventHandlerCallRef WXUNUSED(handler), - EventRef event, - void *data) -{ - OSStatus result = eventNotHandledErr ; - - wxMacCarbonEvent cEvent( event ) ; - - // WindowRef windowRef = cEvent.GetParameter(kEventParamDirectObject) ; - wxTopLevelWindowMac* toplevelWindow = (wxTopLevelWindowMac*) data ; - - switch ( GetEventKind( event ) ) - { - case kEventWindowActivated : - { - toplevelWindow->MacActivate( cEvent.GetTicks() , true) ; - wxActivateEvent wxevent(wxEVT_ACTIVATE, true , toplevelWindow->GetId()); - wxevent.SetTimestamp( cEvent.GetTicks() ) ; - wxevent.SetEventObject(toplevelWindow); - toplevelWindow->GetEventHandler()->ProcessEvent(wxevent); - // we still sending an eventNotHandledErr in order to allow for default processing - } - break ; - - case kEventWindowDeactivated : - { - toplevelWindow->MacActivate(cEvent.GetTicks() , false) ; - wxActivateEvent wxevent(wxEVT_ACTIVATE, false , toplevelWindow->GetId()); - wxevent.SetTimestamp( cEvent.GetTicks() ) ; - wxevent.SetEventObject(toplevelWindow); - toplevelWindow->GetEventHandler()->ProcessEvent(wxevent); - // we still sending an eventNotHandledErr in order to allow for default processing - } - break ; - - case kEventWindowShown : - toplevelWindow->Refresh() ; - result = noErr ; - break ; - - case kEventWindowClose : - toplevelWindow->Close() ; - result = noErr ; - break ; - - case kEventWindowBoundsChanged : - { - UInt32 attributes = cEvent.GetParameter(kEventParamAttributes, typeUInt32) ; - Rect newRect = cEvent.GetParameter(kEventParamCurrentBounds) ; - wxRect r( newRect.left , newRect.top , newRect.right - newRect.left , newRect.bottom - newRect.top ) ; - if ( attributes & kWindowBoundsChangeSizeChanged ) - { -#ifndef __WXUNIVERSAL__ - // according to the other ports we handle this within the OS level - // resize event, not within a wxSizeEvent - wxFrame *frame = wxDynamicCast( toplevelWindow , wxFrame ) ; - if ( frame ) - { - frame->PositionBars(); - } -#endif - wxSizeEvent event( r.GetSize() , toplevelWindow->GetId() ) ; - event.SetEventObject( toplevelWindow ) ; - - toplevelWindow->GetEventHandler()->ProcessEvent(event) ; - toplevelWindow->wxWindowMac::MacSuperChangedPosition() ; // like this only children will be notified - } - - if ( attributes & kWindowBoundsChangeOriginChanged ) - { - wxMoveEvent event( r.GetLeftTop() , toplevelWindow->GetId() ) ; - event.SetEventObject( toplevelWindow ) ; - toplevelWindow->GetEventHandler()->ProcessEvent(event) ; - } - - result = noErr ; - } - break ; - - case kEventWindowBoundsChanging : - { - UInt32 attributes = cEvent.GetParameter(kEventParamAttributes,typeUInt32) ; - Rect newRect = cEvent.GetParameter(kEventParamCurrentBounds) ; - - if ( (attributes & kWindowBoundsChangeSizeChanged) || (attributes & kWindowBoundsChangeOriginChanged) ) - { - // all (Mac) rects are in content area coordinates, all wxRects in structure coordinates - int left , top , right , bottom ; - toplevelWindow->MacGetContentAreaInset( left , top , right , bottom ) ; - - wxRect r( - newRect.left - left, - newRect.top - top, - newRect.right - newRect.left + left + right, - newRect.bottom - newRect.top + top + bottom ) ; - - // this is a EVT_SIZING not a EVT_SIZE type ! - wxSizeEvent wxevent( r , toplevelWindow->GetId() ) ; - wxevent.SetEventObject( toplevelWindow ) ; - wxRect adjustR = r ; - if ( toplevelWindow->GetEventHandler()->ProcessEvent(wxevent) ) - adjustR = wxevent.GetRect() ; - - if ( toplevelWindow->GetMaxWidth() != -1 && adjustR.GetWidth() > toplevelWindow->GetMaxWidth() ) - adjustR.SetWidth( toplevelWindow->GetMaxWidth() ) ; - if ( toplevelWindow->GetMaxHeight() != -1 && adjustR.GetHeight() > toplevelWindow->GetMaxHeight() ) - adjustR.SetHeight( toplevelWindow->GetMaxHeight() ) ; - if ( toplevelWindow->GetMinWidth() != -1 && adjustR.GetWidth() < toplevelWindow->GetMinWidth() ) - adjustR.SetWidth( toplevelWindow->GetMinWidth() ) ; - if ( toplevelWindow->GetMinHeight() != -1 && adjustR.GetHeight() < toplevelWindow->GetMinHeight() ) - adjustR.SetHeight( toplevelWindow->GetMinHeight() ) ; - const Rect adjustedRect = { adjustR.y + top , adjustR.x + left , adjustR.y + adjustR.height - bottom , adjustR.x + adjustR.width - right } ; - if ( !EqualRect( &newRect , &adjustedRect ) ) - cEvent.SetParameter( kEventParamCurrentBounds , &adjustedRect ) ; - toplevelWindow->wxWindowMac::MacSuperChangedPosition() ; // like this only children will be notified - } - - result = noErr ; - } - break ; - - case kEventWindowGetRegion : - { - if ( toplevelWindow->GetBackgroundStyle() == wxBG_STYLE_TRANSPARENT ) - { - WindowRegionCode windowRegionCode ; - - // Fetch the region code that is being queried - GetEventParameter( event, - kEventParamWindowRegionCode, - typeWindowRegionCode, NULL, - sizeof windowRegionCode, NULL, - &windowRegionCode ) ; - - // If it is the opaque region code then set the - // region to empty and return noErr to stop event - // propagation - if ( windowRegionCode == kWindowOpaqueRgn ) { - RgnHandle region; - GetEventParameter( event, - kEventParamRgnHandle, - typeQDRgnHandle, NULL, - sizeof region, NULL, - ®ion) ; - SetEmptyRgn(region) ; - result = noErr ; - } - } - } - break ; - - default : - break ; - } - - return result ; -} - -// mix this in from window.cpp -pascal OSStatus wxMacUnicodeTextEventHandler( EventHandlerCallRef handler , EventRef event , void *data ) ; - -pascal OSStatus wxMacTopLevelEventHandler( EventHandlerCallRef handler , EventRef event , void *data ) -{ - OSStatus result = eventNotHandledErr ; - - switch ( GetEventClass( event ) ) - { - case kEventClassTextInput : - result = wxMacUnicodeTextEventHandler( handler, event , data ) ; - break ; - - case kEventClassKeyboard : - result = KeyboardEventHandler( handler, event , data ) ; - break ; - - case kEventClassWindow : - result = wxMacTopLevelWindowEventHandler( handler, event , data ) ; - break ; - - case kEventClassMouse : - result = wxMacTopLevelMouseEventHandler( handler, event , data ) ; - break ; - - default : - break ; - } - - return result ; -} - -DEFINE_ONE_SHOT_HANDLER_GETTER( wxMacTopLevelEventHandler ) - -// --------------------------------------------------------------------------- -// wxWindowMac utility functions -// --------------------------------------------------------------------------- - -// Find an item given the Macintosh Window Reference - -WX_DECLARE_HASH_MAP(WindowRef, wxTopLevelWindowMac*, wxPointerHash, wxPointerEqual, MacWindowMap); - -static MacWindowMap wxWinMacWindowList; - -wxTopLevelWindowMac *wxFindWinFromMacWindow(WindowRef inWindowRef) -{ - MacWindowMap::iterator node = wxWinMacWindowList.find(inWindowRef); - - return (node == wxWinMacWindowList.end()) ? NULL : node->second; -} - -void wxAssociateWinWithMacWindow(WindowRef inWindowRef, wxTopLevelWindowMac *win) ; -void wxAssociateWinWithMacWindow(WindowRef inWindowRef, wxTopLevelWindowMac *win) -{ - // adding NULL WindowRef is (first) surely a result of an error and - // nothing else :-) - wxCHECK_RET( inWindowRef != (WindowRef) NULL, wxT("attempt to add a NULL WindowRef to window list") ); - - wxWinMacWindowList[inWindowRef] = win; -} - -void wxRemoveMacWindowAssociation(wxTopLevelWindowMac *win) ; -void wxRemoveMacWindowAssociation(wxTopLevelWindowMac *win) -{ - MacWindowMap::iterator it; - for ( it = wxWinMacWindowList.begin(); it != wxWinMacWindowList.end(); ++it ) - { - if ( it->second == win ) - { - wxWinMacWindowList.erase(it); - break; - } - } -} - -// ---------------------------------------------------------------------------- -// wxTopLevelWindowMac creation -// ---------------------------------------------------------------------------- - -wxTopLevelWindowMac *wxTopLevelWindowMac::s_macDeactivateWindow = NULL; - -typedef struct -{ - wxPoint m_position ; - wxSize m_size ; - bool m_wasResizable ; -} FullScreenData ; - -void wxTopLevelWindowMac::Init() -{ - m_iconized = - m_maximizeOnShow = false; - m_macWindow = NULL ; - - m_macEventHandler = NULL ; - m_macFullScreenData = NULL ; -} - -wxMacDeferredWindowDeleter::wxMacDeferredWindowDeleter( WindowRef windowRef ) -{ - m_macWindow = windowRef ; -} - -wxMacDeferredWindowDeleter::~wxMacDeferredWindowDeleter() -{ - UMADisposeWindow( (WindowRef) m_macWindow ) ; -} - -bool wxTopLevelWindowMac::Create(wxWindow *parent, - wxWindowID id, - const wxString& title, - const wxPoint& pos, - const wxSize& size, - long style, - const wxString& name) -{ - // init our fields - Init(); - - m_windowStyle = style; - - SetName( name ); - - m_windowId = id == -1 ? NewControlId() : id; - wxWindow::SetLabel( title ) ; - - DoMacCreateRealWindow( parent, title, pos , size , style , name ) ; - - SetBackgroundColour(wxColour(wxMacCreateCGColorFromHITheme(kThemeBrushDialogBackgroundActive))); - - if (GetExtraStyle() & wxFRAME_EX_METAL) - MacSetMetalAppearance(true); - - wxTopLevelWindows.Append(this); - - if ( parent ) - parent->AddChild(this); - - return true; -} - -wxTopLevelWindowMac::~wxTopLevelWindowMac() -{ - if ( m_macWindow ) - { -#if wxUSE_TOOLTIPS - wxToolTip::NotifyWindowDelete(m_macWindow) ; -#endif - wxPendingDelete.Append( new wxMacDeferredWindowDeleter( (WindowRef) m_macWindow ) ) ; - } - - if ( m_macEventHandler ) - { - ::RemoveEventHandler((EventHandlerRef) m_macEventHandler); - m_macEventHandler = NULL ; - } - - wxRemoveMacWindowAssociation( this ) ; - - if ( wxModelessWindows.Find(this) ) - wxModelessWindows.DeleteObject(this); - - FullScreenData *data = (FullScreenData *) m_macFullScreenData ; - delete data ; - m_macFullScreenData = NULL ; - - // avoid dangling refs - if ( s_macDeactivateWindow == this ) - s_macDeactivateWindow = NULL; -} - - -// ---------------------------------------------------------------------------- -// wxTopLevelWindowMac maximize/minimize -// ---------------------------------------------------------------------------- - -void wxTopLevelWindowMac::Maximize(bool maximize) -{ - Point idealSize = { 0 , 0 } ; - if ( maximize ) - { -#if MAC_OS_X_VERSION_MIN_REQUIRED >= MAC_OS_X_VERSION_10_5 - HIRect bounds ; - HIWindowGetAvailablePositioningBounds(kCGNullDirectDisplay,kHICoordSpace72DPIGlobal, - &bounds); - idealSize.h = bounds.size.width; - idealSize.v = bounds.size.height; -#else - Rect rect ; - GetAvailableWindowPositioningBounds(GetMainDevice(),&rect) ; - idealSize.h = rect.right - rect.left ; - idealSize.v = rect.bottom - rect.top ; -#endif - } - ZoomWindowIdeal( (WindowRef)m_macWindow , maximize ? inZoomOut : inZoomIn , &idealSize ) ; -} - -bool wxTopLevelWindowMac::IsMaximized() const -{ - return IsWindowInStandardState( (WindowRef)m_macWindow , NULL , NULL ) ; -} - -void wxTopLevelWindowMac::Iconize(bool iconize) -{ - if ( IsWindowCollapsable( (WindowRef)m_macWindow) ) - CollapseWindow( (WindowRef)m_macWindow , iconize ) ; -} - -bool wxTopLevelWindowMac::IsIconized() const -{ - return IsWindowCollapsed((WindowRef)m_macWindow ) ; -} - -void wxTopLevelWindowMac::Restore() -{ - if ( IsMaximized() ) - Maximize(false); - else if ( IsIconized() ) - Iconize(false); -} - -// ---------------------------------------------------------------------------- -// wxTopLevelWindowMac misc -// ---------------------------------------------------------------------------- - -wxPoint wxTopLevelWindowMac::GetClientAreaOrigin() const -{ - return wxPoint(0, 0) ; -} - -bool wxTopLevelWindowMac::SetBackgroundColour(const wxColour& col ) -{ - if ( !wxTopLevelWindowBase::SetBackgroundColour(col) && m_hasBgCol ) - return false ; - - if ( col == wxSystemSettings::GetColour( wxSYS_COLOUR_WINDOW ) ) - SetThemeWindowBackground( (WindowRef) m_macWindow, kThemeBrushDocumentWindowBackground, false ) ; - else if ( col == wxSystemSettings::GetColour( wxSYS_COLOUR_3DFACE ) ) - SetThemeWindowBackground( (WindowRef) m_macWindow, kThemeBrushDialogBackgroundActive, false ) ; - // TODO BETTER THEME SUPPORT - return true; -} - -void wxTopLevelWindowMacInstallTopLevelWindowEventHandler(WindowRef window, EventHandlerRef* handler, void *ref) -{ - InstallWindowEventHandler(window, GetwxMacTopLevelEventHandlerUPP(), - GetEventTypeCount(eventList), eventList, ref, handler ); -} - -void wxTopLevelWindowMac::MacInstallTopLevelWindowEventHandler() -{ - if ( m_macEventHandler != NULL ) - { - verify_noerr( ::RemoveEventHandler( (EventHandlerRef) m_macEventHandler ) ) ; - } - wxTopLevelWindowMacInstallTopLevelWindowEventHandler(MAC_WXHWND(m_macWindow),(EventHandlerRef *)&m_macEventHandler,this); -} - -void wxTopLevelWindowMac::MacCreateRealWindow( - const wxString& title, - const wxPoint& pos, - const wxSize& size, - long style, - const wxString& name ) -{ - DoMacCreateRealWindow( NULL, title, pos, size, style, name ); -} - -void wxTopLevelWindowMac::DoMacCreateRealWindow( - wxWindow* parent, - const wxString& title, - const wxPoint& pos, - const wxSize& size, - long style, - const wxString& name ) -{ - OSStatus err = noErr ; - SetName(name); - m_windowStyle = style; - m_isShown = false; - - // create frame. - int x = (int)pos.x; - int y = (int)pos.y; - - Rect theBoundsRect; - wxRect display = wxGetClientDisplayRect() ; - - if ( x == wxDefaultPosition.x ) - x = display.x ; - - if ( y == wxDefaultPosition.y ) - y = display.y ; - - int w = WidthDefault(size.x); - int h = HeightDefault(size.y); - - ::SetRect(&theBoundsRect, x, y , x + w, y + h); - - // translate the window attributes in the appropriate window class and attributes - WindowClass wclass = 0; - WindowAttributes attr = kWindowNoAttributes ; - WindowGroupRef group = NULL ; - bool activationScopeSet = false; - WindowActivationScope activationScope = kWindowActivationScopeNone; - - if ( HasFlag( wxFRAME_TOOL_WINDOW) ) - { - if ( - HasFlag( wxMINIMIZE_BOX ) || HasFlag( wxMAXIMIZE_BOX ) || - HasFlag( wxSYSTEM_MENU ) || HasFlag( wxCAPTION ) || - HasFlag(wxTINY_CAPTION_HORIZ) || HasFlag(wxTINY_CAPTION_VERT) - ) - { - if ( HasFlag( wxSTAY_ON_TOP ) ) - wclass = kUtilityWindowClass; - else - wclass = kFloatingWindowClass ; - - if ( HasFlag(wxTINY_CAPTION_VERT) ) - attr |= kWindowSideTitlebarAttribute ; - } - else - { - wclass = kPlainWindowClass ; - activationScopeSet = true; - activationScope = kWindowActivationScopeNone; - } - } - else if ( HasFlag( wxPOPUP_WINDOW ) ) - { - // TEMPORARY HACK! - // Until we've got a real wxPopupWindow class on wxMac make it a - // little easier for wxFrame to be used to emulate it and workaround - // the lack of wxPopupWindow. - if ( HasFlag( wxBORDER_NONE ) ) - wclass = kHelpWindowClass ; // has no border - else - wclass = kPlainWindowClass ; // has a single line border, it will have to do for now - //attr |= kWindowNoShadowAttribute; // turn off the shadow Should we?? - group = GetWindowGroupOfClass( // float above other windows - kFloatingWindowClass) ; - } - else if ( HasFlag( wxCAPTION ) ) - { - wclass = kDocumentWindowClass ; - attr |= kWindowInWindowMenuAttribute ; - } - else if ( HasFlag( wxFRAME_DRAWER ) ) - { - wclass = kDrawerWindowClass; - } - else - { - if ( HasFlag( wxMINIMIZE_BOX ) || HasFlag( wxMAXIMIZE_BOX ) || - HasFlag( wxCLOSE_BOX ) || HasFlag( wxSYSTEM_MENU ) ) - { - wclass = kDocumentWindowClass ; - } - else if ( HasFlag( wxNO_BORDER ) ) - { - wclass = kSimpleWindowClass ; - } - else - { - wclass = kPlainWindowClass ; - } - } - - if ( wclass != kPlainWindowClass ) - { - if ( HasFlag( wxMINIMIZE_BOX ) ) - attr |= kWindowCollapseBoxAttribute ; - - if ( HasFlag( wxMAXIMIZE_BOX ) ) - attr |= kWindowFullZoomAttribute ; - - if ( HasFlag( wxRESIZE_BORDER ) ) - attr |= kWindowResizableAttribute ; - - if ( HasFlag( wxCLOSE_BOX) ) - attr |= kWindowCloseBoxAttribute ; - } - attr |= kWindowLiveResizeAttribute; - - if ( HasFlag(wxSTAY_ON_TOP) ) - group = GetWindowGroupOfClass(kUtilityWindowClass) ; - - if ( HasFlag( wxFRAME_FLOAT_ON_PARENT ) ) - group = GetWindowGroupOfClass(kFloatingWindowClass) ; - - if ( group == NULL && parent != NULL ) - { - WindowRef parenttlw = (WindowRef) parent->MacGetTopLevelWindowRef(); - if( parenttlw ) - group = GetWindowGroupParent( GetWindowGroup( parenttlw ) ); - } - - attr |= kWindowCompositingAttribute; -#if 0 // wxMAC_USE_CORE_GRAPHICS ; TODO : decide on overall handling of high dpi screens (pixel vs userscale) - attr |= kWindowFrameworkScaledAttribute; -#endif +// ============================================================================ - if ( HasFlag(wxFRAME_SHAPED) ) - { - WindowDefSpec customWindowDefSpec; - customWindowDefSpec.defType = kWindowDefProcPtr; - customWindowDefSpec.u.defProc = -#ifdef __LP64__ - (WindowDefUPP) wxShapedMacWindowDef; -#else - NewWindowDefUPP(wxShapedMacWindowDef); -#endif - err = ::CreateCustomWindow( &customWindowDefSpec, wclass, - attr, &theBoundsRect, - (WindowRef*) &m_macWindow); - } - else - { - err = ::CreateNewWindow( wclass , attr , &theBoundsRect , (WindowRef*)&m_macWindow ) ; - } +BEGIN_EVENT_TABLE(wxTopLevelWindowMac, wxTopLevelWindowBase) +END_EVENT_TABLE() - if ( err == noErr && m_macWindow != NULL && group != NULL ) - SetWindowGroup( (WindowRef) m_macWindow , group ) ; +// ---------------------------------------------------------------------------- +// wxTopLevelWindowMac creation +// ---------------------------------------------------------------------------- - wxCHECK_RET( err == noErr, wxT("Mac OS error when trying to create new window") ); +typedef struct +{ + wxPoint m_position ; + wxSize m_size ; + bool m_wasResizable ; +} FullScreenData ; - // setup a separate group for each window, so that overlays can be handled easily +void wxTopLevelWindowMac::Init() +{ + m_iconized = + m_maximizeOnShow = false; + m_macFullScreenData = NULL ; +} - WindowGroupRef overlaygroup = NULL; - verify_noerr( CreateWindowGroup( kWindowGroupAttrMoveTogether | kWindowGroupAttrLayerTogether | kWindowGroupAttrHideOnCollapse, &overlaygroup )); - verify_noerr( SetWindowGroupParent( overlaygroup, GetWindowGroup( (WindowRef) m_macWindow ))); - verify_noerr( SetWindowGroup( (WindowRef) m_macWindow , overlaygroup )); +bool wxTopLevelWindowMac::Create(wxWindow *parent, + wxWindowID id, + const wxString& title, + const wxPoint& pos, + const wxSize& size, + long style, + const wxString& name) +{ + if ( !wxNonOwnedWindow::Create(parent, id, pos, size, style, name) ) + return false; - if ( activationScopeSet ) - { - verify_noerr( SetWindowActivationScope( (WindowRef) m_macWindow , activationScope )); - } + wxWindow::SetLabel( title ) ; + SetWindowTitleWithCFString( (WindowRef) m_macWindow , wxCFStringRef( title , GetFont().GetEncoding() ) ); + wxTopLevelWindows.Append(this); - // the create commands are only for content rect, - // so we have to set the size again as structure bounds - SetWindowBounds( (WindowRef) m_macWindow , kWindowStructureRgn , &theBoundsRect ) ; + return true; +} - wxAssociateWinWithMacWindow( (WindowRef) m_macWindow , this ) ; - UMASetWTitle( (WindowRef) m_macWindow , title , m_font.GetEncoding() ) ; - m_peer = new wxMacControl(this , true /*isRootControl*/) ; +wxTopLevelWindowMac::~wxTopLevelWindowMac() +{ + FullScreenData *data = (FullScreenData *) m_macFullScreenData ; + delete data ; + m_macFullScreenData = NULL ; +} - // There is a bug in 10.2.X for ::GetRootControl returning the window view instead of - // the content view, so we have to retrieve it explicitly - HIViewFindByID( HIViewGetRoot( (WindowRef) m_macWindow ) , kHIViewWindowContentID , - m_peer->GetControlRefAddr() ) ; - if ( !m_peer->Ok() ) - { - // compatibility mode fallback - GetRootControl( (WindowRef) m_macWindow , m_peer->GetControlRefAddr() ) ; - } - // the root control level handler - MacInstallEventHandler( (WXWidget) m_peer->GetControlRef() ) ; +// ---------------------------------------------------------------------------- +// wxTopLevelWindowMac maximize/minimize +// ---------------------------------------------------------------------------- - // Causes the inner part of the window not to be metal - // if the style is used before window creation. -#if 0 // TARGET_API_MAC_OSX - if ( m_macUsesCompositing && m_macWindow != NULL ) +void wxTopLevelWindowMac::Maximize(bool maximize) +{ + Point idealSize = { 0 , 0 } ; + if ( maximize ) { - if ( GetExtraStyle() & wxFRAME_EX_METAL ) - MacSetMetalAppearance( true ) ; - } +#if MAC_OS_X_VERSION_MIN_REQUIRED >= MAC_OS_X_VERSION_10_5 + HIRect bounds ; + HIWindowGetAvailablePositioningBounds(kCGNullDirectDisplay,kHICoordSpace72DPIGlobal, + &bounds); + idealSize.h = bounds.size.width; + idealSize.v = bounds.size.height; +#else + Rect rect ; + GetAvailableWindowPositioningBounds(GetMainDevice(),&rect) ; + idealSize.h = rect.right - rect.left ; + idealSize.v = rect.bottom - rect.top ; #endif - - if ( m_macWindow != NULL ) - { - MacSetUnifiedAppearance( true ) ; - } - - HIViewRef growBoxRef = 0 ; - err = HIViewFindByID( HIViewGetRoot( (WindowRef)m_macWindow ), kHIViewWindowGrowBoxID, &growBoxRef ); - if ( err == noErr && growBoxRef != 0 ) - HIGrowBoxViewSetTransparent( growBoxRef, true ) ; - - // the frame window event handler - InstallStandardEventHandler( GetWindowEventTarget(MAC_WXHWND(m_macWindow)) ) ; - MacInstallTopLevelWindowEventHandler() ; - - DoSetWindowVariant( m_windowVariant ) ; - - m_macFocus = NULL ; - - if ( HasFlag(wxFRAME_SHAPED) ) - { - // default shape matches the window size - wxRegion rgn( 0, 0, w, h ); - SetShape( rgn ); } - - wxWindowCreateEvent event(this); - GetEventHandler()->ProcessEvent(event); + ZoomWindowIdeal( (WindowRef)m_macWindow , maximize ? inZoomOut : inZoomIn , &idealSize ) ; } -void wxTopLevelWindowMac::ClearBackground() +bool wxTopLevelWindowMac::IsMaximized() const { - wxWindow::ClearBackground() ; + return IsWindowInStandardState( (WindowRef)m_macWindow , NULL , NULL ) ; } -// Raise the window to the top of the Z order -void wxTopLevelWindowMac::Raise() +void wxTopLevelWindowMac::Iconize(bool iconize) { - ::SelectWindow( (WindowRef)m_macWindow ) ; + if ( IsWindowCollapsable( (WindowRef)m_macWindow) ) + CollapseWindow( (WindowRef)m_macWindow , iconize ) ; } -// Lower the window to the bottom of the Z order -void wxTopLevelWindowMac::Lower() +bool wxTopLevelWindowMac::IsIconized() const { - ::SendBehind( (WindowRef)m_macWindow , NULL ) ; + return IsWindowCollapsed((WindowRef)m_macWindow ) ; } -void wxTopLevelWindowMac::MacDelayedDeactivation(long timestamp) +void wxTopLevelWindowMac::Restore() { - if (s_macDeactivateWindow) - { - wxLogTrace(TRACE_ACTIVATE, - wxT("Doing delayed deactivation of %p"), - s_macDeactivateWindow); - - s_macDeactivateWindow->MacActivate(timestamp, false); - } + if ( IsMaximized() ) + Maximize(false); + else if ( IsIconized() ) + Iconize(false); } -void wxTopLevelWindowMac::MacActivate( long timestamp , bool WXUNUSED(inIsActivating) ) -{ - wxLogTrace(TRACE_ACTIVATE, wxT("TopLevel=%p::MacActivate"), this); - - if (s_macDeactivateWindow == this) - s_macDeactivateWindow = NULL; +// ---------------------------------------------------------------------------- +// wxTopLevelWindowMac misc +// ---------------------------------------------------------------------------- - MacDelayedDeactivation(timestamp); - MacPropagateHiliteChanged() ; +wxPoint wxTopLevelWindowMac::GetClientAreaOrigin() const +{ + return wxPoint(0, 0) ; } void wxTopLevelWindowMac::SetTitle(const wxString& title) { wxWindow::SetLabel( title ) ; - UMASetWTitle( (WindowRef)m_macWindow , title , m_font.GetEncoding() ) ; + SetWindowTitleWithCFString( (WindowRef) m_macWindow , wxCFStringRef( title , GetFont().GetEncoding() ) ) ; } wxString wxTopLevelWindowMac::GetTitle() const @@ -1383,45 +173,6 @@ wxString wxTopLevelWindowMac::GetTitle() const return wxWindow::GetLabel(); } -bool wxTopLevelWindowMac::Show(bool show) -{ - if ( !wxTopLevelWindowBase::Show(show) ) - return false; - - bool plainTransition = true; - -#if wxUSE_SYSTEM_OPTIONS - if ( wxSystemOptions::HasOption(wxMAC_WINDOW_PLAIN_TRANSITION) ) - plainTransition = ( wxSystemOptions::GetOptionInt( wxMAC_WINDOW_PLAIN_TRANSITION ) == 1 ) ; -#endif - - if (show) - { - if ( plainTransition ) - ::ShowWindow( (WindowRef)m_macWindow ); - else - ::TransitionWindow( (WindowRef)m_macWindow, kWindowZoomTransitionEffect, kWindowShowTransitionAction, NULL ); - - ::SelectWindow( (WindowRef)m_macWindow ) ; - - // because apps expect a size event to occur at this moment - wxSizeEvent event(GetSize() , m_windowId); - event.SetEventObject(this); - GetEventHandler()->ProcessEvent(event); - } - else - { - if ( plainTransition ) - ::HideWindow( (WindowRef)m_macWindow ); - else - ::TransitionWindow( (WindowRef)m_macWindow, kWindowZoomTransitionEffect, kWindowHideTransitionAction, NULL ); - } - - MacPropagateVisibilityChanged() ; - - return true ; -} - bool wxTopLevelWindowMac::ShowFullScreen(bool show, long style) { if ( show ) @@ -1477,7 +228,7 @@ bool wxTopLevelWindowMac::ShowFullScreen(bool show, long style) if ( data->m_wasResizable ) MacChangeWindowAttributes( kWindowNoAttributes , kWindowResizableAttribute ) ; } - else + else if ( m_macFullScreenData != NULL ) { ShowMenuBar() ; FullScreenData *data = (FullScreenData *) m_macFullScreenData ; @@ -1498,180 +249,6 @@ bool wxTopLevelWindowMac::IsFullScreen() const return m_macFullScreenData != NULL ; } - -bool wxTopLevelWindowMac::SetTransparent(wxByte alpha) -{ - OSStatus result = SetWindowAlpha((WindowRef)m_macWindow, float(alpha)/255.0); - return result == noErr; -} - - -bool wxTopLevelWindowMac::CanSetTransparent() -{ - return true; -} - - -void wxTopLevelWindowMac::SetExtraStyle(long exStyle) -{ - if ( GetExtraStyle() == exStyle ) - return ; - - wxTopLevelWindowBase::SetExtraStyle( exStyle ) ; - - if ( m_macWindow != NULL ) - { - bool metal = GetExtraStyle() & wxFRAME_EX_METAL ; - - if ( MacGetMetalAppearance() != metal ) - { - if ( MacGetUnifiedAppearance() ) - MacSetUnifiedAppearance( !metal ) ; - - MacSetMetalAppearance( metal ) ; - } - } -} - -bool wxTopLevelWindowMac::SetBackgroundStyle(wxBackgroundStyle style) -{ - if ( !wxTopLevelWindowBase::SetBackgroundStyle(style) ) - return false ; - - WindowRef windowRef = HIViewGetWindow( (HIViewRef)GetHandle() ); - - if ( GetBackgroundStyle() == wxBG_STYLE_TRANSPARENT ) - { - OSStatus err = HIWindowChangeFeatures( windowRef, 0, kWindowIsOpaque ); - verify_noerr( err ); - err = ReshapeCustomWindow( windowRef ); - verify_noerr( err ); - } - - return true ; -} - -// TODO: switch to structure bounds - -// we are still using coordinates of the content view -// -void wxTopLevelWindowMac::MacGetContentAreaInset( int &left , int &top , int &right , int &bottom ) -{ - Rect content, structure ; - - GetWindowBounds( (WindowRef) m_macWindow, kWindowStructureRgn , &structure ) ; - GetWindowBounds( (WindowRef) m_macWindow, kWindowContentRgn , &content ) ; - - left = content.left - structure.left ; - top = content.top - structure.top ; - right = structure.right - content.right ; - bottom = structure.bottom - content.bottom ; -} - -void wxTopLevelWindowMac::DoMoveWindow(int x, int y, int width, int height) -{ - m_cachedClippedRectValid = false ; - Rect bounds = { y , x , y + height , x + width } ; - verify_noerr(SetWindowBounds( (WindowRef) m_macWindow, kWindowStructureRgn , &bounds )) ; - wxWindowMac::MacSuperChangedPosition() ; // like this only children will be notified -} - -void wxTopLevelWindowMac::DoGetPosition( int *x, int *y ) const -{ - Rect bounds ; - - verify_noerr(GetWindowBounds((WindowRef) m_macWindow, kWindowStructureRgn , &bounds )) ; - - if (x) - *x = bounds.left ; - if (y) - *y = bounds.top ; -} - -void wxTopLevelWindowMac::DoGetSize( int *width, int *height ) const -{ - Rect bounds ; - - verify_noerr(GetWindowBounds((WindowRef) m_macWindow, kWindowStructureRgn , &bounds )) ; - - if (width) - *width = bounds.right - bounds.left ; - if (height) - *height = bounds.bottom - bounds.top ; -} - -void wxTopLevelWindowMac::DoGetClientSize( int *width, int *height ) const -{ - Rect bounds ; - - verify_noerr(GetWindowBounds((WindowRef) m_macWindow, kWindowContentRgn , &bounds )) ; - - if (width) - *width = bounds.right - bounds.left ; - if (height) - *height = bounds.bottom - bounds.top ; -} - -void wxTopLevelWindowMac::DoCentre(int dir) -{ - if ( m_macWindow != 0 ) - wxTopLevelWindowBase::DoCentre(dir); -} - -void wxTopLevelWindowMac::MacSetMetalAppearance( bool set ) -{ - if ( MacGetUnifiedAppearance() ) - MacSetUnifiedAppearance( false ) ; - - MacChangeWindowAttributes( set ? kWindowMetalAttribute : kWindowNoAttributes , - set ? kWindowNoAttributes : kWindowMetalAttribute ) ; -} - -bool wxTopLevelWindowMac::MacGetMetalAppearance() const -{ - return MacGetWindowAttributes() & kWindowMetalAttribute ; -} - -void wxTopLevelWindowMac::MacSetUnifiedAppearance( bool set ) -{ - if ( MacGetMetalAppearance() ) - MacSetMetalAppearance( false ) ; - - MacChangeWindowAttributes( set ? kWindowUnifiedTitleAndToolbarAttribute : kWindowNoAttributes , - set ? kWindowNoAttributes : kWindowUnifiedTitleAndToolbarAttribute) ; - - // For some reason, Tiger uses white as the background color for this appearance, - // while most apps using it use the typical striped background. Restore that behavior - // for wx. - // TODO: Determine if we need this on Leopard as well. (should be harmless either way, - // though) - SetBackgroundColour( wxSYS_COLOUR_WINDOW ) ; -} - -bool wxTopLevelWindowMac::MacGetUnifiedAppearance() const -{ - return MacGetWindowAttributes() & kWindowUnifiedTitleAndToolbarAttribute ; -} - -void wxTopLevelWindowMac::MacChangeWindowAttributes( wxUint32 attributesToSet , wxUint32 attributesToClear ) -{ - ChangeWindowAttributes( (WindowRef)m_macWindow, attributesToSet, attributesToClear ) ; -} - -wxUint32 wxTopLevelWindowMac::MacGetWindowAttributes() const -{ - UInt32 attr = 0 ; - GetWindowAttributes( (WindowRef) m_macWindow, &attr ) ; - - return attr ; -} - -void wxTopLevelWindowMac::MacPerformUpdates() -{ - // for composited windows this also triggers a redraw of all - // invalid views in the window - HIWindowFlush((WindowRef) m_macWindow) ; -} - // Attracts the users attention to this window if the application is // inactive (should be called when a background event occurs) @@ -1696,180 +273,3 @@ void wxTopLevelWindowMac::RequestUserAttention(int WXUNUSED(flags)) verify_noerr( NMInstall( notificationRequest ) ) ; } - -// --------------------------------------------------------------------------- -// Shape implementation -// --------------------------------------------------------------------------- - - -bool wxTopLevelWindowMac::SetShape(const wxRegion& region) -{ - wxCHECK_MSG( HasFlag(wxFRAME_SHAPED), false, - _T("Shaped windows must be created with the wxFRAME_SHAPED style.")); - - // The empty region signifies that the shape - // should be removed from the window. - if ( region.IsEmpty() ) - { - wxSize sz = GetClientSize(); - wxRegion rgn(0, 0, sz.x, sz.y); - if ( rgn.IsEmpty() ) - return false ; - else - return SetShape(rgn); - } - - // Make a copy of the region - RgnHandle shapeRegion = NewRgn(); - CopyRgn( (RgnHandle)region.GetWXHRGN(), shapeRegion ); - - // Dispose of any shape region we may already have - RgnHandle oldRgn = (RgnHandle)GetWRefCon( (WindowRef)MacGetWindowRef() ); - if ( oldRgn ) - DisposeRgn(oldRgn); - - // Save the region so we can use it later - SetWRefCon((WindowRef)MacGetWindowRef(), (URefCon)shapeRegion); - - // inform the window manager that the window has changed shape - ReshapeCustomWindow((WindowRef)MacGetWindowRef()); - - return true; -} - -// --------------------------------------------------------------------------- -// Support functions for shaped windows, based on Apple's CustomWindow sample at -// http://developer.apple.com/samplecode/Sample_Code/Human_Interface_Toolbox/Mac_OS_High_Level_Toolbox/CustomWindow.htm -// --------------------------------------------------------------------------- - -static void wxShapedMacWindowGetPos(WindowRef window, Rect* inRect) -{ - GetWindowPortBounds(window, inRect); - Point pt = { inRect->top ,inRect->left }; - wxMacLocalToGlobal( window, &pt ) ; - inRect->bottom += pt.v - inRect->top; - inRect->right += pt.h - inRect->left; - inRect->top = pt.v; - inRect->left = pt.h; -} - -static SInt32 wxShapedMacWindowGetFeatures(WindowRef WXUNUSED(window), SInt32 param) -{ - /*------------------------------------------------------ - Define which options your custom window supports. - --------------------------------------------------------*/ - //just enable everything for our demo - *(OptionBits*)param = - //kWindowCanGrow | - //kWindowCanZoom | - //kWindowCanCollapse | - //kWindowCanGetWindowRegion | - //kWindowHasTitleBar | - //kWindowSupportsDragHilite | - kWindowCanDrawInCurrentPort | - //kWindowCanMeasureTitle | - kWindowWantsDisposeAtProcessDeath | - kWindowSupportsGetGrowImageRegion | - kWindowDefSupportsColorGrafPort; - - return 1; -} - -// The content region is left as a rectangle matching the window size, this is -// so the origin in the paint event, and etc. still matches what the -// programmer expects. -static void wxShapedMacWindowContentRegion(WindowRef window, RgnHandle rgn) -{ - SetEmptyRgn(rgn); - wxTopLevelWindowMac* win = wxFindWinFromMacWindow(window); - if (win) - { - Rect r ; - wxShapedMacWindowGetPos( window, &r ) ; - RectRgn( rgn , &r ) ; - } -} - -// The structure region is set to the shape given to the SetShape method. -static void wxShapedMacWindowStructureRegion(WindowRef window, RgnHandle rgn) -{ - RgnHandle cachedRegion = (RgnHandle) GetWRefCon(window); - - SetEmptyRgn(rgn); - if (cachedRegion) - { - Rect windowRect; - wxShapedMacWindowGetPos(window, &windowRect); // how big is the window - CopyRgn(cachedRegion, rgn); // make a copy of our cached region - OffsetRgn(rgn, windowRect.left, windowRect.top); // position it over window - //MapRgn(rgn, &mMaskSize, &windowRect); //scale it to our actual window size - } -} - -static SInt32 wxShapedMacWindowGetRegion(WindowRef window, SInt32 param) -{ - GetWindowRegionPtr rgnRec = (GetWindowRegionPtr)param; - - if (rgnRec == NULL) - return paramErr; - - switch (rgnRec->regionCode) - { - case kWindowStructureRgn: - wxShapedMacWindowStructureRegion(window, rgnRec->winRgn); - break; - - case kWindowContentRgn: - wxShapedMacWindowContentRegion(window, rgnRec->winRgn); - break; - - default: - SetEmptyRgn(rgnRec->winRgn); - break; - } - - return noErr; -} - -// Determine the region of the window which was hit -// -static SInt32 wxShapedMacWindowHitTest(WindowRef window, SInt32 param) -{ - Point hitPoint; - static RgnHandle tempRgn = NULL; - - if (tempRgn == NULL) - tempRgn = NewRgn(); - - // get the point clicked - SetPt( &hitPoint, LoWord(param), HiWord(param) ); - - // Mac OS 8.5 or later - wxShapedMacWindowStructureRegion(window, tempRgn); - if (PtInRgn( hitPoint, tempRgn )) //in window content region? - return wInContent; - - // no significant area was hit - return wNoHit; -} - -static pascal long wxShapedMacWindowDef(short WXUNUSED(varCode), WindowRef window, SInt16 message, SInt32 param) -{ - switch (message) - { - case kWindowMsgHitTest: - return wxShapedMacWindowHitTest(window, param); - - case kWindowMsgGetFeatures: - return wxShapedMacWindowGetFeatures(window, param); - - // kWindowMsgGetRegion is sent during CreateCustomWindow and ReshapeCustomWindow - case kWindowMsgGetRegion: - return wxShapedMacWindowGetRegion(window, param); - - default: - break; - } - - return 0; -}