1 ///////////////////////////////////////////////////////////////////////////////
2 // Name: mac/toplevel.cpp
3 // Purpose: implements wxTopLevelWindow for MSW
4 // Author: Vadim Zeitlin
8 // Copyright: (c) 2001 SciTech Software, Inc. (www.scitechsoft.com)
9 // License: wxWindows licence
10 ///////////////////////////////////////////////////////////////////////////////
12 // ============================================================================
14 // ============================================================================
16 // ----------------------------------------------------------------------------
18 // ----------------------------------------------------------------------------
21 #pragma implementation "toplevel.h"
24 // For compilers that support precompilation, includes "wx.h".
25 #include "wx/wxprec.h"
33 #include "wx/toplevel.h"
35 #include "wx/string.h"
40 #include "wx/mac/uma.h"
41 #include "wx/mac/aga.h"
43 #include "wx/tooltip.h"
46 #include "ToolUtils.h"
49 #define wxMAC_DEBUG_REDRAW 0
50 #ifndef wxMAC_DEBUG_REDRAW
51 #define wxMAC_DEBUG_REDRAW 0
54 // ----------------------------------------------------------------------------
56 // ----------------------------------------------------------------------------
58 // list of all frames and modeless dialogs
59 wxWindowList wxModelessWindows
;
61 // double click testing
62 static Point gs_lastWhere
;
63 static long gs_lastWhen
= 0;
67 static pascal long wxShapedMacWindowDef(short varCode
, WindowRef window
, SInt16 message
, SInt32 param
);
70 // ============================================================================
71 // wxTopLevelWindowMac implementation
72 // ============================================================================
74 // ---------------------------------------------------------------------------
76 // ---------------------------------------------------------------------------
80 extern long wxMacTranslateKey(unsigned char key
, unsigned char code
) ;
82 static const EventTypeSpec eventList
[] =
84 { kEventClassTextInput
, kEventTextInputUnicodeForKeyEvent
} ,
86 { kEventClassKeyboard
, kEventRawKeyDown
} ,
87 { kEventClassKeyboard
, kEventRawKeyRepeat
} ,
88 { kEventClassKeyboard
, kEventRawKeyUp
} ,
89 { kEventClassKeyboard
, kEventRawKeyModifiersChanged
} ,
91 { kEventClassWindow
, kEventWindowUpdate
} ,
92 { kEventClassWindow
, kEventWindowActivated
} ,
93 { kEventClassWindow
, kEventWindowDeactivated
} ,
94 { kEventClassWindow
, kEventWindowBoundsChanging
} ,
95 { kEventClassWindow
, kEventWindowBoundsChanged
} ,
96 { kEventClassWindow
, kEventWindowClose
} ,
98 { kEventClassMouse
, kEventMouseDown
} ,
99 { kEventClassMouse
, kEventMouseUp
} ,
100 { kEventClassMouse
, kEventMouseMoved
} ,
101 { kEventClassMouse
, kEventMouseDragged
} ,
105 static pascal OSStatus
TextInputEventHandler( EventHandlerCallRef handler
, EventRef event
, void *data
)
107 OSStatus result
= eventNotHandledErr
;
109 wxWindow
* focus
= wxWindow::FindFocus() ;
114 UInt32 when
= EventTimeToTicks( GetEventTime( event
) ) ;
118 GetEventParameter( event
, kEventParamTextInputSendKeyboardEvent
,typeEventRef
,NULL
,sizeof(rawEvent
),NULL
,&rawEvent
) ;
120 GetEventParameter( rawEvent
, kEventParamKeyMacCharCodes
, typeChar
, NULL
,sizeof(char), NULL
,&charCode
);
121 GetEventParameter( rawEvent
, kEventParamKeyCode
, typeUInt32
, NULL
, sizeof(UInt32
), NULL
, &keyCode
);
122 GetEventParameter( rawEvent
, kEventParamKeyModifiers
, typeUInt32
, NULL
, sizeof(UInt32
), NULL
, &modifiers
);
123 GetEventParameter( rawEvent
, kEventParamMouseLocation
, typeQDPoint
, NULL
,
124 sizeof( Point
), NULL
, &point
);
126 UInt32 message
= (keyCode
<< 8) + charCode
;
128 switch ( GetEventKind( event
) )
130 case kEventTextInputUnicodeForKeyEvent
:
131 if ( (focus
!= NULL
) && wxTheApp
->MacSendKeyDownEvent(
132 focus
, message
, modifiers
, when
, point
.h
, point
.v
) )
142 static pascal OSStatus
KeyboardEventHandler( EventHandlerCallRef handler
, EventRef event
, void *data
)
144 OSStatus result
= eventNotHandledErr
;
146 wxWindow
* focus
= wxWindow::FindFocus() ;
151 UInt32 when
= EventTimeToTicks( GetEventTime( event
) ) ;
153 GetEventParameter( event
, kEventParamKeyMacCharCodes
, typeChar
, NULL
,sizeof(char), NULL
,&charCode
);
154 GetEventParameter( event
, kEventParamKeyCode
, typeUInt32
, NULL
, sizeof(UInt32
), NULL
, &keyCode
);
155 GetEventParameter(event
, kEventParamKeyModifiers
, typeUInt32
, NULL
, sizeof(UInt32
), NULL
, &modifiers
);
156 GetEventParameter( event
, kEventParamMouseLocation
, typeQDPoint
, NULL
,
157 sizeof( Point
), NULL
, &point
);
159 UInt32 message
= (keyCode
<< 8) + charCode
;
160 switch( GetEventKind( event
) )
162 case kEventRawKeyRepeat
:
163 case kEventRawKeyDown
:
164 if ( (focus
!= NULL
) && wxTheApp
->MacSendKeyDownEvent(
165 focus
, message
, modifiers
, when
, point
.h
, point
.v
) )
170 case kEventRawKeyUp
:
171 if ( (focus
!= NULL
) && wxTheApp
->MacSendKeyUpEvent(
172 focus
, message
, modifiers
, when
, point
.h
, point
.v
) )
177 case kEventRawKeyModifiersChanged
:
179 wxKeyEvent
event(wxEVT_KEY_DOWN
);
181 event
.m_shiftDown
= modifiers
& shiftKey
;
182 event
.m_controlDown
= modifiers
& controlKey
;
183 event
.m_altDown
= modifiers
& optionKey
;
184 event
.m_metaDown
= modifiers
& cmdKey
;
188 event
.m_timeStamp
= when
;
189 wxWindow
* focus
= wxWindow::FindFocus() ;
190 event
.SetEventObject(focus
);
192 if ( focus
&& (modifiers
^ wxTheApp
->s_lastModifiers
) & controlKey
)
194 event
.m_keyCode
= WXK_CONTROL
;
195 event
.SetEventType( ( modifiers
& controlKey
) ? wxEVT_KEY_DOWN
: wxEVT_KEY_UP
) ;
196 focus
->GetEventHandler()->ProcessEvent( event
) ;
198 if ( focus
&& (modifiers
^ wxTheApp
->s_lastModifiers
) & shiftKey
)
200 event
.m_keyCode
= WXK_SHIFT
;
201 event
.SetEventType( ( modifiers
& shiftKey
) ? wxEVT_KEY_DOWN
: wxEVT_KEY_UP
) ;
202 focus
->GetEventHandler()->ProcessEvent( event
) ;
204 if ( focus
&& (modifiers
^ wxTheApp
->s_lastModifiers
) & optionKey
)
206 event
.m_keyCode
= WXK_ALT
;
207 event
.SetEventType( ( modifiers
& optionKey
) ? wxEVT_KEY_DOWN
: wxEVT_KEY_UP
) ;
208 focus
->GetEventHandler()->ProcessEvent( event
) ;
210 wxTheApp
->s_lastModifiers
= modifiers
;
218 static pascal OSStatus
MouseEventHandler( EventHandlerCallRef handler
, EventRef event
, void *data
)
220 OSStatus result
= eventNotHandledErr
;
222 wxTopLevelWindowMac
* toplevelWindow
= (wxTopLevelWindowMac
*) data
;
224 UInt32 modifiers
= 0;
225 EventMouseButton button
= 0 ;
228 GetEventParameter( event
, kEventParamMouseLocation
, typeQDPoint
, NULL
,
229 sizeof( Point
), NULL
, &point
);
230 GetEventParameter( event
, kEventParamKeyModifiers
, typeUInt32
, NULL
,
231 sizeof( UInt32
), NULL
, &modifiers
);
232 GetEventParameter( event
, kEventParamMouseButton
, typeMouseButton
, NULL
,
233 sizeof( EventMouseButton
), NULL
, &button
);
234 GetEventParameter( event
, kEventParamClickCount
, typeUInt32
, NULL
,
235 sizeof( UInt32
), NULL
, &click
);
237 if ( button
== 0 || GetEventKind( event
) == kEventMouseUp
)
238 modifiers
+= btnState
;
241 short windowPart
= ::FindWindow(point
, &window
);
243 if ( IsWindowActive(window
) && windowPart
== inContent
)
245 switch ( GetEventKind( event
) )
247 case kEventMouseDown
:
248 toplevelWindow
->MacFireMouseEvent( mouseDown
, point
.h
, point
.v
, modifiers
, EventTimeToTicks( GetEventTime( event
) ) ) ;
252 toplevelWindow
->MacFireMouseEvent( mouseUp
, point
.h
, point
.v
, modifiers
, EventTimeToTicks( GetEventTime( event
) ) ) ;
255 case kEventMouseMoved
:
256 toplevelWindow
->MacFireMouseEvent( nullEvent
, point
.h
, point
.v
, modifiers
, EventTimeToTicks( GetEventTime( event
) ) ) ;
259 case kEventMouseDragged
:
260 toplevelWindow
->MacFireMouseEvent( nullEvent
, point
.h
, point
.v
, modifiers
, EventTimeToTicks( GetEventTime( event
) ) ) ;
272 static pascal OSStatus
WindowEventHandler( EventHandlerCallRef handler
, EventRef event
, void *data
)
274 OSStatus result
= eventNotHandledErr
;
275 OSStatus err
= noErr
;
278 WindowRef windowRef
;
279 wxTopLevelWindowMac
* toplevelWindow
= (wxTopLevelWindowMac
*) data
;
281 GetEventParameter( event
, kEventParamDirectObject
, typeWindowRef
, NULL
,
282 sizeof( WindowRef
), NULL
, &windowRef
);
284 switch( GetEventKind( event
) )
286 case kEventWindowUpdate
:
287 if ( !wxPendingDelete
.Member(toplevelWindow
) )
288 toplevelWindow
->MacUpdate( EventTimeToTicks( GetEventTime( event
) ) ) ;
291 case kEventWindowActivated
:
292 toplevelWindow
->MacActivate( EventTimeToTicks( GetEventTime( event
) ) , true) ;
295 case kEventWindowDeactivated
:
296 toplevelWindow
->MacActivate( EventTimeToTicks( GetEventTime( event
) ) , false) ;
299 case kEventWindowClose
:
300 toplevelWindow
->Close() ;
303 case kEventWindowBoundsChanged
:
304 err
= GetEventParameter( event
, kEventParamAttributes
, typeUInt32
,
305 NULL
, sizeof( UInt32
), NULL
, &attributes
);
308 Rect newContentRect
;
310 GetEventParameter( event
, kEventParamCurrentBounds
, typeQDRectangle
, NULL
,
311 sizeof( newContentRect
), NULL
, &newContentRect
);
313 toplevelWindow
->SetSize( newContentRect
.left
, newContentRect
.top
,
314 newContentRect
.right
- newContentRect
.left
,
315 newContentRect
.bottom
- newContentRect
.top
, wxSIZE_USE_EXISTING
);
326 pascal OSStatus
wxMacWindowEventHandler( EventHandlerCallRef handler
, EventRef event
, void *data
)
328 OSStatus result
= eventNotHandledErr
;
330 switch ( GetEventClass( event
) )
332 case kEventClassKeyboard
:
333 result
= KeyboardEventHandler( handler
, event
, data
) ;
335 case kEventClassTextInput
:
336 result
= TextInputEventHandler( handler
, event
, data
) ;
338 case kEventClassWindow
:
339 result
= WindowEventHandler( handler
, event
, data
) ;
341 case kEventClassMouse
:
342 result
= MouseEventHandler( handler
, event
, data
) ;
350 DEFINE_ONE_SHOT_HANDLER_GETTER( wxMacWindowEventHandler
)
354 // ---------------------------------------------------------------------------
355 // wxWindowMac utility functions
356 // ---------------------------------------------------------------------------
358 // Find an item given the Macintosh Window Reference
360 wxList
*wxWinMacWindowList
= NULL
;
361 wxTopLevelWindowMac
*wxFindWinFromMacWindow(WXWindow inWindowRef
)
363 wxNode
*node
= wxWinMacWindowList
->Find((long)inWindowRef
);
366 return (wxTopLevelWindowMac
*)node
->GetData();
369 void wxAssociateWinWithMacWindow(WXWindow inWindowRef
, wxTopLevelWindowMac
*win
)
371 // adding NULL WindowRef is (first) surely a result of an error and
372 // (secondly) breaks menu command processing
373 wxCHECK_RET( inWindowRef
!= (WindowRef
) NULL
, wxT("attempt to add a NULL WindowRef to window list") );
375 if ( !wxWinMacWindowList
->Find((long)inWindowRef
) )
376 wxWinMacWindowList
->Append((long)inWindowRef
, win
);
379 void wxRemoveMacWindowAssociation(wxTopLevelWindowMac
*win
)
381 wxWinMacWindowList
->DeleteObject(win
);
385 // ----------------------------------------------------------------------------
386 // wxTopLevelWindowMac creation
387 // ----------------------------------------------------------------------------
389 WXHWND
wxTopLevelWindowMac::s_macWindowInUpdate
= NULL
;
391 void wxTopLevelWindowMac::Init()
394 m_maximizeOnShow
= FALSE
;
395 m_macNoEraseUpdateRgn
= NewRgn() ;
396 m_macNeedsErasing
= false ;
399 m_macEventHandler
= NULL
;
403 class wxMacDeferredWindowDeleter
: public wxObject
406 wxMacDeferredWindowDeleter( WindowRef windowRef
)
408 m_macWindow
= windowRef
;
410 virtual ~wxMacDeferredWindowDeleter()
412 UMADisposeWindow( (WindowRef
) m_macWindow
) ;
415 WindowRef m_macWindow
;
418 bool wxTopLevelWindowMac::Create(wxWindow
*parent
,
420 const wxString
& title
,
424 const wxString
& name
)
429 m_windowStyle
= style
;
433 m_windowId
= id
== -1 ? NewControlId() : id
;
435 wxTopLevelWindows
.Append(this);
438 parent
->AddChild(this);
443 wxTopLevelWindowMac::~wxTopLevelWindowMac()
447 wxToolTip::NotifyWindowDelete(m_macWindow
) ;
448 wxPendingDelete
.Append( new wxMacDeferredWindowDeleter( (WindowRef
) m_macWindow
) ) ;
452 if ( m_macEventHandler
)
454 ::RemoveEventHandler((EventHandlerRef
) m_macEventHandler
);
455 m_macEventHandler
= NULL
;
459 wxRemoveMacWindowAssociation( this ) ;
461 if ( wxModelessWindows
.Find(this) )
462 wxModelessWindows
.DeleteObject(this);
464 DisposeRgn( (RgnHandle
) m_macNoEraseUpdateRgn
) ;
468 // ----------------------------------------------------------------------------
469 // wxTopLevelWindowMac maximize/minimize
470 // ----------------------------------------------------------------------------
472 void wxTopLevelWindowMac::Maximize(bool maximize
)
474 // not available on mac
477 bool wxTopLevelWindowMac::IsMaximized() const
482 void wxTopLevelWindowMac::Iconize(bool iconize
)
484 // not available on mac
487 bool wxTopLevelWindowMac::IsIconized() const
489 // mac dialogs cannot be iconized
493 void wxTopLevelWindowMac::Restore()
495 // not available on mac
498 // ----------------------------------------------------------------------------
499 // wxTopLevelWindowMac misc
500 // ----------------------------------------------------------------------------
502 void wxTopLevelWindowMac::SetIcon(const wxIcon
& icon
)
505 wxTopLevelWindowBase::SetIcon(icon
);
508 void wxTopLevelWindowMac::MacCreateRealWindow( const wxString
& title
,
512 const wxString
& name
)
515 m_windowStyle
= style
;
536 ::SetRect(&theBoundsRect
, m_x
, m_y
, m_x
+ m_width
, m_y
+ m_height
);
538 // translate the window attributes in the appropriate window class and attributes
540 WindowClass wclass
= 0;
541 WindowAttributes attr
= kWindowNoAttributes
;
543 if ( HasFlag( wxFRAME_TOOL_WINDOW
) )
546 HasFlag( wxMINIMIZE_BOX
) || HasFlag( wxMAXIMIZE_BOX
) ||
547 HasFlag( wxSYSTEM_MENU
) || HasFlag( wxCAPTION
) ||
548 HasFlag(wxTINY_CAPTION_HORIZ
) || HasFlag(wxTINY_CAPTION_VERT
)
551 wclass
= kFloatingWindowClass
;
552 if ( HasFlag(wxTINY_CAPTION_VERT
) )
554 attr
|= kWindowSideTitlebarAttribute
;
560 wclass
= kPlainWindowClass
;
562 wclass
= kFloatingWindowClass
;
566 else if ( HasFlag( wxCAPTION
) )
568 wclass
= kDocumentWindowClass
;
572 if ( HasFlag( wxMINIMIZE_BOX
) || HasFlag( wxMAXIMIZE_BOX
) ||
573 HasFlag( wxSYSTEM_MENU
) )
575 wclass
= kDocumentWindowClass
;
580 wclass
= kPlainWindowClass
;
582 wclass
= kModalWindowClass
;
587 if ( HasFlag( wxMINIMIZE_BOX
) || HasFlag( wxMAXIMIZE_BOX
) )
589 attr
|= kWindowFullZoomAttribute
;
590 attr
|= kWindowCollapseBoxAttribute
;
592 if ( HasFlag( wxRESIZE_BORDER
) )
594 attr
|= kWindowResizableAttribute
;
596 if ( HasFlag( wxSYSTEM_MENU
) )
598 attr
|= kWindowCloseBoxAttribute
;
601 if (HasFlag(wxSTAY_ON_TOP
))
602 wclass
= kUtilityWindowClass
;
605 if ( HasFlag(wxFRAME_SHAPED
) )
607 WindowDefSpec customWindowDefSpec
;
608 customWindowDefSpec
.defType
= kWindowDefProcPtr
;
609 customWindowDefSpec
.u
.defProc
= NewWindowDefUPP(wxShapedMacWindowDef
);
611 ::CreateCustomWindow( &customWindowDefSpec
, wclass
,
612 attr
, &theBoundsRect
,
613 (WindowRef
*) &m_macWindow
);
618 ::CreateNewWindow( wclass
, attr
, &theBoundsRect
, (WindowRef
*)&m_macWindow
) ;
621 wxAssociateWinWithMacWindow( m_macWindow
, this ) ;
622 UMASetWTitle( (WindowRef
)m_macWindow
, title
) ;
623 ::CreateRootControl( (WindowRef
)m_macWindow
, (ControlHandle
*)&m_macRootControl
) ;
625 InstallStandardEventHandler( GetWindowEventTarget(MAC_WXHWND(m_macWindow
)) ) ;
626 InstallWindowEventHandler(MAC_WXHWND(m_macWindow
), GetwxMacWindowEventHandlerUPP(),
627 GetEventTypeCount(eventList
), eventList
, this, &((EventHandlerRef
)m_macEventHandler
));
633 if ( HasFlag(wxFRAME_SHAPED
) )
635 // default shape matches the window size
636 wxRegion
rgn(0, 0, m_width
, m_height
);
642 void wxTopLevelWindowMac::MacGetPortParams(WXPOINTPTR localOrigin
, WXRECTPTR clipRect
, WXHWND
*window
, wxWindowMac
** rootwin
)
644 ((Point
*)localOrigin
)->h
= 0;
645 ((Point
*)localOrigin
)->v
= 0;
646 ((Rect
*)clipRect
)->left
= 0;
647 ((Rect
*)clipRect
)->top
= 0;
648 ((Rect
*)clipRect
)->right
= m_width
;
649 ((Rect
*)clipRect
)->bottom
= m_height
;
650 *window
= m_macWindow
;
654 void wxTopLevelWindowMac::Clear()
659 WXWidget
wxTopLevelWindowMac::MacGetContainerForEmbedding()
661 return m_macRootControl
;
665 void wxTopLevelWindowMac::MacUpdate( long timestamp
)
667 wxMacPortStateHelper
help( (GrafPtr
) GetWindowPort( (WindowRef
) m_macWindow
) ) ;
669 BeginUpdate( (WindowRef
)m_macWindow
) ;
671 RgnHandle updateRgn
= NewRgn();
672 RgnHandle diffRgn
= NewRgn() ;
673 if ( updateRgn
&& diffRgn
)
676 // macos internal control redraws clean up areas we'd like to redraw ourselves
677 // therefore we pick the boundary rect and make sure we can redraw it
678 RgnHandle trueUpdateRgn
= NewRgn() ;
679 Rect trueUpdateRgnBoundary
;
680 GetPortVisibleRegion( GetWindowPort( (WindowRef
)m_macWindow
), trueUpdateRgn
);
681 GetRegionBounds( trueUpdateRgn
, &trueUpdateRgnBoundary
) ;
682 RectRgn( (RgnHandle
) updateRgn
, &trueUpdateRgnBoundary
) ;
684 DisposeRgn( trueUpdateRgn
) ;
685 SetPortVisibleRegion( GetWindowPort( (WindowRef
)m_macWindow
), updateRgn
) ;
687 GetPortVisibleRegion( GetWindowPort( (WindowRef
)m_macWindow
), updateRgn
);
689 DiffRgn( updateRgn
, (RgnHandle
) m_macNoEraseUpdateRgn
, diffRgn
) ;
690 if ( !EmptyRgn( updateRgn
) )
692 MacRedraw( updateRgn
, timestamp
, m_macNeedsErasing
|| !EmptyRgn( diffRgn
) ) ;
696 DisposeRgn( updateRgn
);
698 DisposeRgn( diffRgn
);
699 EndUpdate( (WindowRef
)m_macWindow
) ;
700 SetEmptyRgn( (RgnHandle
) m_macNoEraseUpdateRgn
) ;
701 m_macNeedsErasing
= false ;
705 // Raise the window to the top of the Z order
706 void wxTopLevelWindowMac::Raise()
708 ::SelectWindow( (WindowRef
)m_macWindow
) ;
711 // Lower the window to the bottom of the Z order
712 void wxTopLevelWindowMac::Lower()
714 ::SendBehind( (WindowRef
)m_macWindow
, NULL
) ;
717 void wxTopLevelWindowMac::MacFireMouseEvent(
718 wxUint16 kind
, wxInt32 x
, wxInt32 y
,wxUint32 modifiers
, long timestamp
)
720 wxMouseEvent
event(wxEVT_LEFT_DOWN
);
721 bool isDown
= !(modifiers
& btnState
) ; // 1 is for up
722 bool controlDown
= modifiers
& controlKey
; // for simulating right mouse
724 event
.m_leftDown
= isDown
&& !controlDown
;
726 event
.m_middleDown
= FALSE
;
727 event
.m_rightDown
= isDown
&& controlDown
;
729 if ( kind
== mouseDown
)
732 event
.SetEventType(wxEVT_RIGHT_DOWN
) ;
734 event
.SetEventType(wxEVT_LEFT_DOWN
) ;
736 else if ( kind
== mouseUp
)
739 event
.SetEventType(wxEVT_RIGHT_UP
) ;
741 event
.SetEventType(wxEVT_LEFT_UP
) ;
745 event
.SetEventType(wxEVT_MOTION
) ;
748 event
.m_shiftDown
= modifiers
& shiftKey
;
749 event
.m_controlDown
= modifiers
& controlKey
;
750 event
.m_altDown
= modifiers
& optionKey
;
751 event
.m_metaDown
= modifiers
& cmdKey
;
759 ::SetPort( UMAGetWindowPort( (WindowRef
)m_macWindow
) ) ;
760 ::GlobalToLocal( &localwhere
) ;
763 if ( kind
== mouseDown
)
765 if ( timestamp
- gs_lastWhen
<= GetDblTime() )
767 if ( abs( localwhere
.h
- gs_lastWhere
.h
) < 3 && abs( localwhere
.v
- gs_lastWhere
.v
) < 3 )
769 // This is not right if the second mouse down
770 // event occured in a differen window. We
771 // correct this in MacDispatchMouseEvent.
773 event
.SetEventType(wxEVT_RIGHT_DCLICK
) ;
775 event
.SetEventType(wxEVT_LEFT_DCLICK
) ;
781 gs_lastWhen
= timestamp
;
783 gs_lastWhere
= localwhere
;
786 event
.m_x
= localwhere
.h
;
787 event
.m_y
= localwhere
.v
;
791 event
.m_timeStamp
= timestamp
;
792 event
.SetEventObject(this);
793 if ( wxTheApp
->s_captureWindow
)
797 wxTheApp
->s_captureWindow
->ScreenToClient( &x
, &y
) ;
800 event
.SetEventObject( wxTheApp
->s_captureWindow
) ;
801 wxTheApp
->s_captureWindow
->GetEventHandler()->ProcessEvent( event
) ;
803 if ( kind
== mouseUp
)
805 wxTheApp
->s_captureWindow
= NULL
;
808 m_cursor
.MacInstall() ;
814 MacDispatchMouseEvent( event
) ;
820 void wxTopLevelWindowMac::MacMouseDown( WXEVENTREF ev
, short part
)
822 MacFireMouseEvent( mouseDown
, ((EventRecord
*)ev
)->where
.h
, ((EventRecord
*)ev
)->where
.v
,
823 ((EventRecord
*)ev
)->modifiers
, ((EventRecord
*)ev
)->when
) ;
826 void wxTopLevelWindowMac::MacMouseUp( WXEVENTREF ev
, short part
)
832 MacFireMouseEvent( mouseUp
, ((EventRecord
*)ev
)->where
.h
, ((EventRecord
*)ev
)->where
.v
,
833 ((EventRecord
*)ev
)->modifiers
, ((EventRecord
*)ev
)->when
) ;
839 void wxTopLevelWindowMac::MacMouseMoved( WXEVENTREF ev
, short part
)
845 MacFireMouseEvent( nullEvent
/*moved*/ , ((EventRecord
*)ev
)->where
.h
, ((EventRecord
*)ev
)->where
.v
,
846 ((EventRecord
*)ev
)->modifiers
, ((EventRecord
*)ev
)->when
) ;
854 void wxTopLevelWindowMac::MacActivate( long timestamp
, bool inIsActivating
)
856 wxActivateEvent
event(wxEVT_ACTIVATE
, inIsActivating
, m_windowId
);
857 event
.m_timeStamp
= timestamp
;
858 event
.SetEventObject(this);
860 GetEventHandler()->ProcessEvent(event
);
862 UMAHighlightAndActivateWindow( (WindowRef
)m_macWindow
, inIsActivating
) ;
864 // Early versions of MacOS X don't refresh backgrounds properly,
865 // so refresh the whole window on activation and deactivation.
866 long osVersion
= UMAGetSystemVersion();
867 if (osVersion
>= 0x1000 && osVersion
< 0x1020)
873 // for the moment we have to resolve some redrawing issues like this
874 // the OS is stealing some redrawing areas as soon as it draws a control
881 void wxTopLevelWindowMac::MacKeyDown( WXEVENTREF ev
)
887 void wxTopLevelWindowMac::SetTitle(const wxString
& title
)
889 wxWindow::SetTitle( title
) ;
890 UMASetWTitle( (WindowRef
)m_macWindow
, title
) ;
893 bool wxTopLevelWindowMac::Show(bool show
)
895 if ( !wxWindow::Show(show
) )
900 // this is leading to incorrect window layering in some situations
901 // ::TransitionWindow((WindowRef)m_macWindow,kWindowZoomTransitionEffect,kWindowShowTransitionAction,nil);
902 ::ShowWindow( (WindowRef
)m_macWindow
) ;
903 ::SelectWindow( (WindowRef
)m_macWindow
) ;
904 // no need to generate events here, they will get them triggered by macos
905 // actually they should be , but apparently they are not
906 wxSize
size(m_width
, m_height
);
907 wxSizeEvent
event(size
, m_windowId
);
908 event
.SetEventObject(this);
909 GetEventHandler()->ProcessEvent(event
);
913 // this is leading to incorrect window layering in some situations
914 // ::TransitionWindow((WindowRef)m_macWindow,kWindowZoomTransitionEffect,kWindowHideTransitionAction,nil);
915 ::HideWindow( (WindowRef
)m_macWindow
) ;
929 void wxTopLevelWindowMac::DoMoveWindow(int x
, int y
, int width
, int height
)
933 int former_w
= m_width
;
934 int former_h
= m_height
;
936 int actualWidth
= width
;
937 int actualHeight
= height
;
941 if ((m_minWidth
!= -1) && (actualWidth
< m_minWidth
))
942 actualWidth
= m_minWidth
;
943 if ((m_minHeight
!= -1) && (actualHeight
< m_minHeight
))
944 actualHeight
= m_minHeight
;
945 if ((m_maxWidth
!= -1) && (actualWidth
> m_maxWidth
))
946 actualWidth
= m_maxWidth
;
947 if ((m_maxHeight
!= -1) && (actualHeight
> m_maxHeight
))
948 actualHeight
= m_maxHeight
;
950 bool doMove
= false ;
951 bool doResize
= false ;
953 if ( actualX
!= former_x
|| actualY
!= former_y
)
957 if ( actualWidth
!= former_w
|| actualHeight
!= former_h
)
962 if ( doMove
|| doResize
)
966 m_width
= actualWidth
;
967 m_height
= actualHeight
;
970 ::MoveWindow((WindowRef
)m_macWindow
, m_x
, m_y
, false); // don't make frontmost
973 ::SizeWindow((WindowRef
)m_macWindow
, m_width
, m_height
, true);
975 // the OS takes care of invalidating and erasing the new area so we only have to
976 // take care of refreshing for full repaints
978 if ( doResize
&& !HasFlag(wxNO_FULL_REPAINT_ON_RESIZE
) )
982 if ( IsKindOf( CLASSINFO( wxFrame
) ) )
984 wxFrame
* frame
= (wxFrame
*) this ;
985 frame
->PositionStatusBar();
986 frame
->PositionToolBar();
989 wxWindowMac::MacTopLevelWindowChangedPosition() ; // like this only children will be notified
991 MacRepositionScrollBars() ;
994 wxPoint
point(m_x
, m_y
);
995 wxMoveEvent
event(point
, m_windowId
);
996 event
.SetEventObject(this);
997 GetEventHandler()->ProcessEvent(event
) ;
1001 MacRepositionScrollBars() ;
1002 wxSize
size(m_width
, m_height
);
1003 wxSizeEvent
event(size
, m_windowId
);
1004 event
.SetEventObject(this);
1005 GetEventHandler()->ProcessEvent(event
);
1012 * Invalidation Mechanism
1014 * The update mechanism reflects exactely the windows mechanism
1015 * the rect gets added to the window invalidate region, if the eraseBackground flag
1016 * has been true for any part of the update rgn the background is erased in the entire region
1017 * not just in the specified rect.
1019 * In order to achive this, we also have an internal m_macNoEraseUpdateRgn, all rects that have
1020 * the eraseBackground flag set to false are also added to this rgn. upon receiving an update event
1021 * the update rgn is compared to the m_macNoEraseUpdateRgn and in case they differ, every window
1022 * will get the eraseBackground event first
1025 void wxTopLevelWindowMac::MacInvalidate( const WXRECTPTR rect
, bool eraseBackground
)
1027 GrafPtr formerPort
;
1028 GetPort( &formerPort
) ;
1029 SetPortWindowPort( (WindowRef
)m_macWindow
) ;
1031 m_macNeedsErasing
|= eraseBackground
;
1033 // if we already know that we will have to erase, there's no need to track the rest
1034 if ( !m_macNeedsErasing
)
1036 // we end only here if eraseBackground is false
1037 // if we already have a difference between m_macNoEraseUpdateRgn and UpdateRgn
1038 // we will have to erase anyway
1040 RgnHandle updateRgn
= NewRgn();
1041 RgnHandle diffRgn
= NewRgn() ;
1042 if ( updateRgn
&& diffRgn
)
1044 GetWindowUpdateRgn( (WindowRef
)m_macWindow
, updateRgn
);
1046 LocalToGlobal( &pt
) ;
1047 OffsetRgn( updateRgn
, -pt
.h
, -pt
.v
) ;
1048 DiffRgn( updateRgn
, (RgnHandle
) m_macNoEraseUpdateRgn
, diffRgn
) ;
1049 if ( !EmptyRgn( diffRgn
) )
1051 m_macNeedsErasing
= true ;
1055 DisposeRgn( updateRgn
);
1057 DisposeRgn( diffRgn
);
1059 if ( !m_macNeedsErasing
)
1061 RgnHandle rectRgn
= NewRgn() ;
1062 SetRectRgn( rectRgn
, ((Rect
*)rect
)->left
, ((Rect
*)rect
)->top
, ((Rect
*)rect
)->right
, ((Rect
*)rect
)->bottom
) ;
1063 UnionRgn( (RgnHandle
) m_macNoEraseUpdateRgn
, rectRgn
, (RgnHandle
) m_macNoEraseUpdateRgn
) ;
1064 DisposeRgn( rectRgn
) ;
1067 InvalWindowRect( (WindowRef
)m_macWindow
, (Rect
*)rect
) ;
1068 // turn this on to debug the refreshing cycle
1069 #if wxMAC_DEBUG_REDRAW
1072 SetPort( formerPort
) ;
1076 bool wxTopLevelWindowMac::SetShape(const wxRegion
& region
)
1078 wxCHECK_MSG( HasFlag(wxFRAME_SHAPED
), FALSE
,
1079 _T("Shaped windows must be created with the wxFRAME_SHAPED style."));
1082 // The empty region signifies that the shape should be removed from the
1084 if ( region
.IsEmpty() )
1086 wxSize sz
= GetClientSize();
1087 wxRegion
rgn(0, 0, sz
.x
, sz
.y
);
1088 return SetShape(rgn
);
1091 // Make a copy of the region
1092 RgnHandle shapeRegion
= NewRgn();
1093 CopyRgn( (RgnHandle
)region
.GetWXHRGN(), shapeRegion
);
1095 // Dispose of any shape region we may already have
1096 RgnHandle oldRgn
= (RgnHandle
)GetWRefCon( (WindowRef
)MacGetWindowRef() );
1100 // Save the region so we can use it later
1101 SetWRefCon((WindowRef
)MacGetWindowRef(), (SInt32
)shapeRegion
);
1103 // Tell the window manager that the window has changed shape
1104 ReshapeCustomWindow((WindowRef
)MacGetWindowRef());
1113 // ---------------------------------------------------------------------------
1114 // Support functions for shaped windows, based on Apple's CustomWindow sample at
1115 // http://developer.apple.com/samplecode/Sample_Code/Human_Interface_Toolbox/Mac_OS_High_Level_Toolbox/CustomWindow.htm
1116 // ---------------------------------------------------------------------------
1119 static void wxShapedMacWindowGetPos(WindowRef window
, Rect
* inRect
)
1121 GetWindowPortBounds(window
, inRect
);
1122 Point pt
= {inRect
->left
, inRect
->top
};
1123 SetPort((GrafPtr
) GetWindowPort(window
));
1126 inRect
->left
= pt
.h
;
1127 inRect
->bottom
+= pt
.v
;
1128 inRect
->right
+= pt
.h
;
1132 static SInt32
wxShapedMacWindowGetFeatures(WindowRef window
, SInt32 param
)
1134 /*------------------------------------------------------
1135 Define which options your custom window supports.
1136 --------------------------------------------------------*/
1137 //just enable everything for our demo
1138 *(OptionBits
*)param
=//kWindowCanGrow|
1140 //kWindowCanCollapse|
1141 //kWindowCanGetWindowRegion|
1142 //kWindowHasTitleBar|
1143 //kWindowSupportsDragHilite|
1144 kWindowCanDrawInCurrentPort
|
1145 //kWindowCanMeasureTitle|
1146 kWindowWantsDisposeAtProcessDeath
|
1147 kWindowSupportsSetGrowImageRegion
|
1148 kWindowDefSupportsColorGrafPort
;
1152 // The content region is left as a rectangle matching the window size, this is
1153 // so the origin in the paint event, and etc. still matches what the
1154 // programmer expects.
1155 static void wxShapedMacWindowContentRegion(WindowRef window
, RgnHandle rgn
)
1158 wxTopLevelWindowMac
* win
= wxFindWinFromMacWindow(window
);
1161 wxRect r
= win
->GetRect();
1162 SetRectRgn(rgn
, r
.GetLeft(), r
.GetTop(), r
.GetRight(), r
.GetBottom());
1166 // The structure region is set to the shape given to the SetShape method.
1167 static void wxShapedMacWindowStructureRegion(WindowRef window
, RgnHandle rgn
)
1169 RgnHandle cachedRegion
= (RgnHandle
) GetWRefCon(window
);
1175 wxShapedMacWindowGetPos(window
, &windowRect
); //how big is the window
1176 CopyRgn(cachedRegion
, rgn
); //make a copy of our cached region
1177 OffsetRgn(rgn
, windowRect
.left
, windowRect
.top
); // position it over window
1178 //MapRgn(rgn, &mMaskSize, &windowRect); //scale it to our actual window size
1184 static SInt32
wxShapedMacWindowGetRegion(WindowRef window
, SInt32 param
)
1186 GetWindowRegionPtr rgnRec
=(GetWindowRegionPtr
)param
;
1188 switch(rgnRec
->regionCode
)
1190 case kWindowStructureRgn
:
1191 wxShapedMacWindowStructureRegion(window
, rgnRec
->winRgn
);
1193 case kWindowContentRgn
:
1194 wxShapedMacWindowContentRegion(window
, rgnRec
->winRgn
);
1197 SetEmptyRgn(rgnRec
->winRgn
);
1204 static SInt32
wxShapedMacWindowHitTest(WindowRef window
,SInt32 param
)
1206 /*------------------------------------------------------
1207 Determine the region of the window which was hit
1208 --------------------------------------------------------*/
1210 static RgnHandle tempRgn
=nil
;
1215 SetPt(&hitPoint
,LoWord(param
),HiWord(param
));//get the point clicked
1217 //Mac OS 8.5 or later
1218 wxShapedMacWindowStructureRegion(window
, tempRgn
);
1219 if (PtInRgn(hitPoint
, tempRgn
)) //in window content region?
1222 return wNoHit
;//no significant area was hit.
1226 static pascal long wxShapedMacWindowDef(short varCode
, WindowRef window
, SInt16 message
, SInt32 param
)
1230 case kWindowMsgHitTest
:
1231 return wxShapedMacWindowHitTest(window
,param
);
1233 case kWindowMsgGetFeatures
:
1234 return wxShapedMacWindowGetFeatures(window
,param
);
1236 // kWindowMsgGetRegion is sent during CreateCustomWindow and ReshapeCustomWindow
1237 case kWindowMsgGetRegion
:
1238 return wxShapedMacWindowGetRegion(window
,param
);
1244 // ---------------------------------------------------------------------------