]> git.saurik.com Git - wxWidgets.git/blame_incremental - src/mac/carbon/toplevel.cpp
projects / wxWidgets.git / blame_incremental
? search:
summary | shortlog | log | commit | commitdiff | tree
blob | blame (non-incremental) | history | HEAD
define WM_CONTEXTMENU if the standard headers don't
[wxWidgets.git] / src / mac / carbon / toplevel.cpp
... / ...
CommitLineData
1///////////////////////////////////////////////////////////////////////////////
2// Name: mac/toplevel.cpp
3// Purpose: implements wxTopLevelWindow for Mac
4// Author: Stefan Csomor
5// Modified by:
6// Created: 24.09.01
7// RCS-ID: $Id$
8// Copyright: (c) 2001-2004 Stefan Csomor
9// License: wxWindows licence
10///////////////////////////////////////////////////////////////////////////////
11
12// ============================================================================
13// declarations
14// ============================================================================
15
16// ----------------------------------------------------------------------------
17// headers
18// ----------------------------------------------------------------------------
19
20#if defined(__GNUG__) && !defined(NO_GCC_PRAGMA)
21 #pragma implementation "toplevel.h"
22#endif
23
24// For compilers that support precompilation, includes "wx.h".
25#include "wx/wxprec.h"
26
27#ifdef __BORLANDC__
28 #pragma hdrstop
29#endif
30
31#ifndef WX_PRECOMP
32 #include "wx/app.h"
33 #include "wx/toplevel.h"
34 #include "wx/frame.h"
35 #include "wx/string.h"
36 #include "wx/log.h"
37 #include "wx/intl.h"
38 #include "wx/settings.h"
39 #include "wx/strconv.h"
40 #include "wx/control.h"
41#endif //WX_PRECOMP
42
43#include "wx/mac/uma.h"
44#include "wx/mac/aga.h"
45#include "wx/app.h"
46#include "wx/tooltip.h"
47#include "wx/dnd.h"
48#if wxUSE_SYSTEM_OPTIONS
49 #include "wx/sysopt.h"
50#endif
51
52#include <ToolUtils.h>
53
54//For targeting OSX
55#include "wx/mac/private.h"
56
57// ----------------------------------------------------------------------------
58// globals
59// ----------------------------------------------------------------------------
60
61// list of all frames and modeless dialogs
62wxWindowList wxModelessWindows;
63
64static pascal long wxShapedMacWindowDef(short varCode, WindowRef window, SInt16 message, SInt32 param);
65
66// ============================================================================
67// wxTopLevelWindowMac implementation
68// ============================================================================
69
70BEGIN_EVENT_TABLE(wxTopLevelWindowMac, wxTopLevelWindowBase)
71END_EVENT_TABLE()
72
73
74// ---------------------------------------------------------------------------
75// Carbon Events
76// ---------------------------------------------------------------------------
77
78extern long wxMacTranslateKey(unsigned char key, unsigned char code) ;
79
80static const EventTypeSpec eventList[] =
81{
82 // TODO remove control related event like key and mouse (except for WindowLeave events)
83#if 1
84 { kEventClassTextInput, kEventTextInputUnicodeForKeyEvent } ,
85
86 { kEventClassKeyboard, kEventRawKeyDown } ,
87 { kEventClassKeyboard, kEventRawKeyRepeat } ,
88 { kEventClassKeyboard, kEventRawKeyUp } ,
89 { kEventClassKeyboard, kEventRawKeyModifiersChanged } ,
90#endif
91
92 { kEventClassWindow , kEventWindowShown } ,
93 { kEventClassWindow , kEventWindowActivated } ,
94 { kEventClassWindow , kEventWindowDeactivated } ,
95 { kEventClassWindow , kEventWindowBoundsChanging } ,
96 { kEventClassWindow , kEventWindowBoundsChanged } ,
97 { kEventClassWindow , kEventWindowClose } ,
98
99 // we have to catch these events on the toplevel window level, as controls don't get the
100 // raw mouse events anymore
101
102 { kEventClassMouse , kEventMouseDown } ,
103 { kEventClassMouse , kEventMouseUp } ,
104 { kEventClassMouse , kEventMouseWheelMoved } ,
105 { kEventClassMouse , kEventMouseMoved } ,
106 { kEventClassMouse , kEventMouseDragged } ,
107} ;
108
109static pascal OSStatus TextInputEventHandler( EventHandlerCallRef handler , EventRef event , void *data )
110{
111 OSStatus result = eventNotHandledErr ;
112
113 wxWindow* focus = wxWindow::FindFocus() ;
114 char charCode ;
115 UInt32 keyCode ;
116 UInt32 modifiers ;
117 Point point ;
118
119 EventRef rawEvent ;
120
121 GetEventParameter( event , kEventParamTextInputSendKeyboardEvent ,typeEventRef,NULL,sizeof(rawEvent),NULL,&rawEvent ) ;
122
123 GetEventParameter( rawEvent, kEventParamKeyMacCharCodes, typeChar, NULL,sizeof(char), NULL,&charCode );
124 GetEventParameter( rawEvent, kEventParamKeyCode, typeUInt32, NULL, sizeof(UInt32), NULL, &keyCode );
125 GetEventParameter( rawEvent, kEventParamKeyModifiers, typeUInt32, NULL, sizeof(UInt32), NULL, &modifiers);
126 GetEventParameter( rawEvent, kEventParamMouseLocation, typeQDPoint, NULL,
127 sizeof( Point ), NULL, &point );
128
129 switch ( GetEventKind( event ) )
130 {
131 case kEventTextInputUnicodeForKeyEvent :
132 // this is only called when no default handler has jumped in, eg a wxControl on a floater window does not
133 // get its own kEventTextInputUnicodeForKeyEvent, so we route back the
134 wxControl* control = wxDynamicCast( focus , wxControl ) ;
135 if ( control )
136 {
137 ControlRef macControl = (ControlRef) control->GetHandle() ;
138 if ( macControl )
139 {
140 ::HandleControlKey( macControl , keyCode , charCode , modifiers ) ;
141 result = noErr ;
142 }
143 }
144 /*
145 // this may lead to double events sent to a window in case all handlers have skipped the key down event
146 UInt32 when = EventTimeToTicks( GetEventTime( event ) ) ;
147 UInt32 message = (keyCode << 8) + charCode;
148
149 if ( (focus != NULL) && wxTheApp->MacSendKeyDownEvent(
150 focus , message , modifiers , when , point.h , point.v ) )
151 {
152 result = noErr ;
153 }
154 */
155 break ;
156 }
157
158 return result ;
159}
160
161static pascal OSStatus KeyboardEventHandler( EventHandlerCallRef handler , EventRef event , void *data )
162{
163 OSStatus result = eventNotHandledErr ;
164 // call DoFindFocus instead of FindFocus, because for Composite Windows(like WxGenericListCtrl)
165 // FindFocus does not return the actual focus window,but the enclosing window
166 wxWindow* focus = wxWindow::DoFindFocus();
167 if ( focus == NULL )
168 return result ;
169
170 char charCode ;
171 wxChar uniChar = 0 ;
172 UInt32 keyCode ;
173 UInt32 modifiers ;
174 Point point ;
175 UInt32 when = EventTimeToTicks( GetEventTime( event ) ) ;
176
177#if wxUSE_UNICODE
178 UInt32 dataSize = 0 ;
179 if ( GetEventParameter( event, kEventParamKeyUnicodes, typeUnicodeText, NULL, 0 , &dataSize , NULL ) == noErr )
180 {
181 UniChar buf[2] ;
182
183 UniChar* charBuf = buf ;
184
185 if ( dataSize > 4 )
186 charBuf = new UniChar[ dataSize / sizeof( UniChar) ] ;
187 GetEventParameter( event, kEventParamKeyUnicodes, typeUnicodeText, NULL, dataSize , NULL , charBuf ) ;
188#if SIZEOF_WCHAR_T == 2
189 uniChar = charBuf[0] ;
190#else
191 wxMBConvUTF16BE converter ;
192 converter.MB2WC( &uniChar , (const char*)charBuf , 1 ) ;
193#endif
194 if ( dataSize > 4 )
195 delete[] charBuf ;
196 }
197#endif
198
199 GetEventParameter( event, kEventParamKeyMacCharCodes, typeChar, NULL,sizeof(char), NULL,&charCode );
200 GetEventParameter( event, kEventParamKeyCode, typeUInt32, NULL, sizeof(UInt32), NULL, &keyCode );
201 GetEventParameter(event, kEventParamKeyModifiers, typeUInt32, NULL, sizeof(UInt32), NULL, &modifiers);
202 GetEventParameter( event, kEventParamMouseLocation, typeQDPoint, NULL,
203 sizeof( Point ), NULL, &point );
204
205 UInt32 message = (keyCode << 8) + charCode;
206 switch( GetEventKind( event ) )
207 {
208 case kEventRawKeyRepeat :
209 case kEventRawKeyDown :
210 {
211 WXEVENTREF formerEvent = wxTheApp->MacGetCurrentEvent() ;
212 WXEVENTHANDLERCALLREF formerHandler = wxTheApp->MacGetCurrentEventHandlerCallRef() ;
213 wxTheApp->MacSetCurrentEvent( event , handler ) ;
214 if ( (focus != NULL) && wxTheApp->MacSendKeyDownEvent(
215 focus , message , modifiers , when , point.h , point.v , uniChar ) )
216 {
217 result = noErr ;
218 }
219 wxTheApp->MacSetCurrentEvent( formerEvent , formerHandler ) ;
220 }
221 break ;
222 case kEventRawKeyUp :
223 if ( (focus != NULL) && wxTheApp->MacSendKeyUpEvent(
224 focus , message , modifiers , when , point.h , point.v , uniChar ) )
225 {
226 result = noErr ;
227 }
228 break ;
229 case kEventRawKeyModifiersChanged :
230 {
231 wxKeyEvent event(wxEVT_KEY_DOWN);
232
233 event.m_shiftDown = modifiers & shiftKey;
234 event.m_controlDown = modifiers & controlKey;
235 event.m_altDown = modifiers & optionKey;
236 event.m_metaDown = modifiers & cmdKey;
237#if wxUSE_UNICODE
238 event.m_uniChar = uniChar ;
239#endif
240 event.m_x = point.h;
241 event.m_y = point.v;
242 event.SetTimestamp(when);
243 event.SetEventObject(focus);
244
245 if ( focus && (modifiers ^ wxApp::s_lastModifiers ) & controlKey )
246 {
247 event.m_keyCode = WXK_CONTROL ;
248 event.SetEventType( ( modifiers & controlKey ) ? wxEVT_KEY_DOWN : wxEVT_KEY_UP ) ;
249 focus->GetEventHandler()->ProcessEvent( event ) ;
250 }
251 if ( focus && (modifiers ^ wxApp::s_lastModifiers ) & shiftKey )
252 {
253 event.m_keyCode = WXK_SHIFT ;
254 event.SetEventType( ( modifiers & shiftKey ) ? wxEVT_KEY_DOWN : wxEVT_KEY_UP ) ;
255 focus->GetEventHandler()->ProcessEvent( event ) ;
256 }
257 if ( focus && (modifiers ^ wxApp::s_lastModifiers ) & optionKey )
258 {
259 event.m_keyCode = WXK_ALT ;
260 event.SetEventType( ( modifiers & optionKey ) ? wxEVT_KEY_DOWN : wxEVT_KEY_UP ) ;
261 focus->GetEventHandler()->ProcessEvent( event ) ;
262 }
263 if ( focus && (modifiers ^ wxApp::s_lastModifiers ) & cmdKey )
264 {
265 event.m_keyCode = WXK_COMMAND ;
266 event.SetEventType( ( modifiers & cmdKey ) ? wxEVT_KEY_DOWN : wxEVT_KEY_UP ) ;
267 focus->GetEventHandler()->ProcessEvent( event ) ;
268 }
269 wxApp::s_lastModifiers = modifiers ;
270 }
271 break ;
272 }
273
274 return result ;
275}
276
277// we don't interfere with foreign controls on our toplevel windows, therefore we always give back eventNotHandledErr
278// for windows that we didn't create (like eg Scrollbars in a databrowser) , or for controls where we did not handle the
279// mouse down at all
280
281// This handler can also be called from app level where data (ie target window) may be null or a non wx window
282
283wxWindow* g_MacLastWindow = NULL ;
284
285static EventMouseButton lastButton = 0 ;
286
287static void SetupMouseEvent( wxMouseEvent &wxevent , wxMacCarbonEvent &cEvent )
288{
289 UInt32 modifiers = cEvent.GetParameter<UInt32>(kEventParamKeyModifiers, typeUInt32) ;
290 Point screenMouseLocation = cEvent.GetParameter<Point>(kEventParamMouseLocation) ;
291
292 // this parameter are not given for all events
293 EventMouseButton button = 0 ;
294 UInt32 clickCount = 0 ;
295 cEvent.GetParameter<EventMouseButton>(kEventParamMouseButton, typeMouseButton , &button) ;
296 cEvent.GetParameter<UInt32>(kEventParamClickCount, typeUInt32 , &clickCount ) ;
297
298 wxevent.m_x = screenMouseLocation.h;
299 wxevent.m_y = screenMouseLocation.v;
300 wxevent.m_shiftDown = modifiers & shiftKey;
301 wxevent.m_controlDown = modifiers & controlKey;
302 wxevent.m_altDown = modifiers & optionKey;
303 wxevent.m_metaDown = modifiers & cmdKey;
304 wxevent.SetTimestamp( cEvent.GetTicks() ) ;
305 // a control click is interpreted as a right click
306 if ( button == kEventMouseButtonPrimary && (modifiers & controlKey) )
307 {
308 button = kEventMouseButtonSecondary ;
309 }
310
311 // otherwise we report double clicks by connecting a left click with a ctrl-left click
312 if ( clickCount > 1 && button != lastButton )
313 clickCount = 1 ;
314
315 // we must make sure that our synthetic 'right' button corresponds in
316 // mouse down, moved and mouse up, and does not deliver a right down and left up
317
318 if ( cEvent.GetKind() == kEventMouseDown )
319 lastButton = button ;
320
321 if ( button == 0 )
322 lastButton = 0 ;
323 else if ( lastButton )
324 button = lastButton ;
325
326 // determinate the correct down state, wx does not want a 'down' for a mouseUp event, while mac delivers
327 // this button
328 if ( button != 0 && cEvent.GetKind() != kEventMouseUp )
329 {
330 switch( button )
331 {
332 case kEventMouseButtonPrimary :
333 wxevent.m_leftDown = true ;
334 break ;
335 case kEventMouseButtonSecondary :
336 wxevent.m_rightDown = true ;
337 break ;
338 case kEventMouseButtonTertiary :
339 wxevent.m_middleDown = true ;
340 break ;
341 }
342 }
343 // translate into wx types
344 switch ( cEvent.GetKind() )
345 {
346 case kEventMouseDown :
347 switch( button )
348 {
349 case kEventMouseButtonPrimary :
350 wxevent.SetEventType(clickCount > 1 ? wxEVT_LEFT_DCLICK : wxEVT_LEFT_DOWN ) ;
351 break ;
352 case kEventMouseButtonSecondary :
353 wxevent.SetEventType( clickCount > 1 ? wxEVT_RIGHT_DCLICK : wxEVT_RIGHT_DOWN ) ;
354 break ;
355 case kEventMouseButtonTertiary :
356 wxevent.SetEventType(clickCount > 1 ? wxEVT_MIDDLE_DCLICK : wxEVT_MIDDLE_DOWN ) ;
357 break ;
358 }
359 break ;
360 case kEventMouseUp :
361 switch( button )
362 {
363 case kEventMouseButtonPrimary :
364 wxevent.SetEventType( wxEVT_LEFT_UP ) ;
365 break ;
366 case kEventMouseButtonSecondary :
367 wxevent.SetEventType( wxEVT_RIGHT_UP ) ;
368 break ;
369 case kEventMouseButtonTertiary :
370 wxevent.SetEventType( wxEVT_MIDDLE_UP ) ;
371 break ;
372 }
373 break ;
374 case kEventMouseWheelMoved :
375 {
376 wxevent.SetEventType(wxEVT_MOUSEWHEEL ) ;
377
378 // EventMouseWheelAxis axis = cEvent.GetParameter<EventMouseWheelAxis>(kEventParamMouseWheelAxis, typeMouseWheelAxis) ;
379 SInt32 delta = cEvent.GetParameter<SInt32>(kEventParamMouseWheelDelta, typeLongInteger) ;
380
381 wxevent.m_wheelRotation = delta;
382 wxevent.m_wheelDelta = 1;
383 wxevent.m_linesPerAction = 1;
384 break ;
385 }
386 default :
387 wxevent.SetEventType(wxEVT_MOTION ) ;
388 break ;
389 }
390}
391
392ControlRef wxMacFindSubControl( wxTopLevelWindowMac* toplevelWindow, Point location , ControlRef superControl , ControlPartCode *outPart )
393{
394 if ( superControl )
395 {
396 UInt16 childrenCount = 0 ;
397 OSStatus err = CountSubControls( superControl , &childrenCount ) ;
398 if ( err == errControlIsNotEmbedder )
399 return NULL ;
400 wxASSERT_MSG( err == noErr , wxT("Unexpected error when accessing subcontrols") ) ;
401
402 for ( UInt16 i = childrenCount ; i >=1 ; --i )
403 {
404 ControlHandle sibling ;
405 err = GetIndexedSubControl( superControl , i , & sibling ) ;
406 if ( err == errControlIsNotEmbedder )
407 return NULL ;
408
409 wxASSERT_MSG( err == noErr , wxT("Unexpected error when accessing subcontrols") ) ;
410 if ( IsControlVisible( sibling ) )
411 {
412 Rect r ;
413 UMAGetControlBoundsInWindowCoords( sibling , &r ) ;
414 if ( MacPtInRect( location , &r ) )
415 {
416 ControlHandle child = wxMacFindSubControl( toplevelWindow , location , sibling , outPart ) ;
417 if ( child )
418 return child ;
419 else
420 {
421 Point testLocation = location ;
422
423 if ( toplevelWindow && toplevelWindow->MacUsesCompositing() )
424 {
425 testLocation.h -= r.left ;
426 testLocation.v -= r.top ;
427 }
428
429 *outPart = TestControl( sibling , testLocation ) ;
430 return sibling ;
431 }
432 }
433 }
434 }
435 }
436 return NULL ;
437}
438
439ControlRef wxMacFindControlUnderMouse( wxTopLevelWindowMac* toplevelWindow , Point location , WindowRef window , ControlPartCode *outPart )
440{
441#if TARGET_API_MAC_OSX
442 if ( UMAGetSystemVersion() >= 0x1030 && ( toplevelWindow == 0 || toplevelWindow->MacUsesCompositing() ) )
443 return FindControlUnderMouse( location , window , outPart ) ;
444#endif
445 ControlRef rootControl = NULL ;
446 verify_noerr( GetRootControl( window , &rootControl ) ) ;
447 return wxMacFindSubControl( toplevelWindow , location , rootControl , outPart ) ;
448
449}
450pascal OSStatus wxMacTopLevelMouseEventHandler( EventHandlerCallRef handler , EventRef event , void *data )
451{
452 wxTopLevelWindowMac* toplevelWindow = (wxTopLevelWindowMac*) data ;
453
454 OSStatus result = eventNotHandledErr ;
455
456 wxMacCarbonEvent cEvent( event ) ;
457
458 Point screenMouseLocation = cEvent.GetParameter<Point>(kEventParamMouseLocation) ;
459 Point windowMouseLocation = screenMouseLocation ;
460
461 WindowRef window ;
462 short windowPart = ::FindWindow(screenMouseLocation, &window);
463
464 wxWindow* currentMouseWindow = NULL ;
465 ControlRef control = NULL ;
466
467 if ( window )
468 {
469 QDGlobalToLocalPoint( UMAGetWindowPort(window ) , &windowMouseLocation ) ;
470
471 if ( wxApp::s_captureWindow && wxApp::s_captureWindow->MacGetTopLevelWindowRef() == (WXWindow) window && windowPart == inContent )
472 {
473 currentMouseWindow = wxApp::s_captureWindow ;
474 }
475 else if ( (IsWindowActive(window) && windowPart == inContent) )
476 {
477 ControlPartCode part ;
478 control = wxMacFindControlUnderMouse( toplevelWindow , windowMouseLocation , window , &part ) ;
479 // if there is no control below the mouse position, send the event to the toplevel window itself
480 if ( control == 0 )
481 currentMouseWindow = (wxWindow*) data ;
482 else
483 {
484 currentMouseWindow = wxFindControlFromMacControl( control ) ;
485 if ( currentMouseWindow == NULL && cEvent.GetKind() == kEventMouseMoved )
486 {
487#if wxUSE_TOOLBAR
488 // for wxToolBar to function we have to send certaint events to it
489 // instead of its children (wxToolBarTools)
490 ControlRef parent ;
491 GetSuperControl(control, &parent );
492 wxWindow *wxParent = wxFindControlFromMacControl( parent ) ;
493 if ( wxParent && wxParent->IsKindOf( CLASSINFO( wxToolBar ) ) )
494 currentMouseWindow = wxParent ;
495#endif
496 }
497 }
498 }
499 }
500
501 wxMouseEvent wxevent(wxEVT_LEFT_DOWN);
502 SetupMouseEvent( wxevent , cEvent ) ;
503
504 // handle all enter / leave events
505
506 if ( currentMouseWindow != g_MacLastWindow )
507 {
508 if ( g_MacLastWindow )
509 {
510 wxMouseEvent eventleave(wxevent);
511 eventleave.SetEventType( wxEVT_LEAVE_WINDOW );
512 g_MacLastWindow->ScreenToClient( &eventleave.m_x, &eventleave.m_y );
513 eventleave.SetEventObject( g_MacLastWindow ) ;
514
515#if wxUSE_TOOLTIPS
516 wxToolTip::RelayEvent( g_MacLastWindow , eventleave);
517#endif // wxUSE_TOOLTIPS
518 g_MacLastWindow->GetEventHandler()->ProcessEvent(eventleave);
519 }
520 if ( currentMouseWindow )
521 {
522 wxMouseEvent evententer(wxevent);
523 evententer.SetEventType( wxEVT_ENTER_WINDOW );
524 currentMouseWindow->ScreenToClient( &evententer.m_x, &evententer.m_y );
525 evententer.SetEventObject( currentMouseWindow ) ;
526#if wxUSE_TOOLTIPS
527 wxToolTip::RelayEvent( currentMouseWindow , evententer);
528#endif // wxUSE_TOOLTIPS
529 currentMouseWindow->GetEventHandler()->ProcessEvent(evententer);
530 }
531 g_MacLastWindow = currentMouseWindow ;
532 }
533
534 if ( windowPart == inMenuBar )
535 {
536 // special case menu bar, as we are having a low-level runloop we must do it ourselves
537 if ( cEvent.GetKind() == kEventMouseDown )
538 {
539 ::MenuSelect( screenMouseLocation ) ;
540 result = noErr ;
541 }
542 } // if ( windowPart == inMenuBar )
543 else if ( currentMouseWindow )
544 {
545 wxWindow *currentMouseWindowParent = currentMouseWindow->GetParent();
546
547 currentMouseWindow->ScreenToClient( &wxevent.m_x , &wxevent.m_y ) ;
548
549 wxevent.SetEventObject( currentMouseWindow ) ;
550
551 // make tooltips current
552
553 #if wxUSE_TOOLTIPS
554 if ( wxevent.GetEventType() == wxEVT_MOTION
555 || wxevent.GetEventType() == wxEVT_ENTER_WINDOW
556 || wxevent.GetEventType() == wxEVT_LEAVE_WINDOW )
557 wxToolTip::RelayEvent( currentMouseWindow , wxevent);
558 #endif // wxUSE_TOOLTIPS
559 if ( currentMouseWindow->GetEventHandler()->ProcessEvent(wxevent) )
560 {
561 if ((currentMouseWindowParent != NULL) &&
562 (currentMouseWindowParent->GetChildren().Find(currentMouseWindow) == NULL))
563 currentMouseWindow = NULL;
564
565 result = noErr;
566 }
567 else
568 {
569 // if the user code did _not_ handle the event, then perform the
570 // default processing
571 if ( wxevent.GetEventType() == wxEVT_LEFT_DOWN )
572 {
573 // ... that is set focus to this window
574 if (currentMouseWindow->AcceptsFocus() && wxWindow::FindFocus()!=currentMouseWindow)
575 currentMouseWindow->SetFocus();
576 }
577
578 ControlPartCode dummyPart ;
579 // if built-in find control is finding the wrong control (ie static box instead of overlaid
580 // button, we cannot let the standard handler do its job, but must handle manually
581
582 if ( ( cEvent.GetKind() == kEventMouseDown )
583#ifdef __WXMAC_OSX__
584 &&
585 (FindControlUnderMouse(windowMouseLocation , window , &dummyPart) !=
586 wxMacFindControlUnderMouse( toplevelWindow , windowMouseLocation , window , &dummyPart ) )
587#endif
588 )
589 {
590 if ( currentMouseWindow->MacIsReallyEnabled() )
591 {
592 EventModifiers modifiers = cEvent.GetParameter<EventModifiers>(kEventParamKeyModifiers, typeUInt32) ;
593 Point clickLocation = windowMouseLocation ;
594
595 if ( toplevelWindow->MacUsesCompositing() )
596 currentMouseWindow->MacRootWindowToWindow( &clickLocation.h , &clickLocation.v ) ;
597
598 HandleControlClick( (ControlRef) currentMouseWindow->GetHandle() , clickLocation ,
599 modifiers , (ControlActionUPP ) -1 ) ;
600
601 if ((currentMouseWindowParent != NULL) &&
602 (currentMouseWindowParent->GetChildren().Find(currentMouseWindow) == NULL))
603 currentMouseWindow = NULL;
604 }
605 result = noErr ;
606 }
607 }
608 if ( cEvent.GetKind() == kEventMouseUp && wxApp::s_captureWindow )
609 {
610 wxApp::s_captureWindow = NULL ;
611 // update cursor ?
612 }
613
614 // update cursor
615
616 wxWindow* cursorTarget = currentMouseWindow ;
617 wxPoint cursorPoint( wxevent.m_x , wxevent.m_y ) ;
618
619 while( cursorTarget && !cursorTarget->MacSetupCursor( cursorPoint ) )
620 {
621 cursorTarget = cursorTarget->GetParent() ;
622 if ( cursorTarget )
623 cursorPoint += cursorTarget->GetPosition();
624 }
625
626 } // else if ( currentMouseWindow )
627 else
628 {
629 // don't mess with controls we don't know about
630 // for some reason returning eventNotHandledErr does not lead to the correct behaviour
631 // so we try sending them the correct control directly
632 if ( cEvent.GetKind() == kEventMouseDown && toplevelWindow && control )
633 {
634 EventModifiers modifiers = cEvent.GetParameter<EventModifiers>(kEventParamKeyModifiers, typeUInt32) ;
635 Point clickLocation = windowMouseLocation ;
636 if ( toplevelWindow->MacUsesCompositing() )
637 {
638#ifdef __WXMAC_OSX__
639 HIPoint hiPoint ;
640 hiPoint.x = clickLocation.h ;
641 hiPoint.y = clickLocation.v ;
642 HIViewConvertPoint( &hiPoint , (ControlRef) toplevelWindow->GetHandle() , control ) ;
643 clickLocation.h = (int)hiPoint.x ;
644 clickLocation.v = (int)hiPoint.y ;
645#endif
646 }
647 HandleControlClick( control , clickLocation ,
648 modifiers , (ControlActionUPP ) -1 ) ;
649 result = noErr ;
650 }
651 }
652 return result ;
653}
654
655static pascal OSStatus wxMacTopLevelWindowEventHandler( EventHandlerCallRef handler , EventRef event , void *data )
656{
657 OSStatus result = eventNotHandledErr ;
658
659 wxMacCarbonEvent cEvent( event ) ;
660
661 // WindowRef windowRef = cEvent.GetParameter<WindowRef>(kEventParamDirectObject) ;
662 wxTopLevelWindowMac* toplevelWindow = (wxTopLevelWindowMac*) data ;
663
664 switch( GetEventKind( event ) )
665 {
666 case kEventWindowActivated :
667 {
668 toplevelWindow->MacActivate( cEvent.GetTicks() , true) ;
669 wxActivateEvent wxevent(wxEVT_ACTIVATE, true , toplevelWindow->GetId());
670 wxevent.SetTimestamp( cEvent.GetTicks() ) ;
671 wxevent.SetEventObject(toplevelWindow);
672 toplevelWindow->GetEventHandler()->ProcessEvent(wxevent);
673 // we still sending an eventNotHandledErr in order to allow for default processing
674 break ;
675 }
676 case kEventWindowDeactivated :
677 {
678 toplevelWindow->MacActivate(cEvent.GetTicks() , false) ;
679 wxActivateEvent wxevent(wxEVT_ACTIVATE, false , toplevelWindow->GetId());
680 wxevent.SetTimestamp( cEvent.GetTicks() ) ;
681 wxevent.SetEventObject(toplevelWindow);
682 toplevelWindow->GetEventHandler()->ProcessEvent(wxevent);
683 // we still sending an eventNotHandledErr in order to allow for default processing
684 break ;
685 }
686 case kEventWindowShown :
687 toplevelWindow->Refresh() ;
688 result = noErr ;
689 break ;
690 case kEventWindowClose :
691 toplevelWindow->Close() ;
692 result = noErr ;
693 break ;
694 case kEventWindowBoundsChanged :
695 {
696 UInt32 attributes = cEvent.GetParameter<UInt32>(kEventParamAttributes,typeUInt32) ;
697 Rect newRect = cEvent.GetParameter<Rect>(kEventParamCurrentBounds) ;
698 wxRect r( newRect.left , newRect.top , newRect.right - newRect.left , newRect.bottom - newRect.top ) ;
699 if ( attributes & kWindowBoundsChangeSizeChanged )
700 {
701 // according to the other ports we handle this within the OS level
702 // resize event, not within a wxSizeEvent
703 wxFrame *frame = wxDynamicCast( toplevelWindow , wxFrame ) ;
704 if ( frame )
705 {
706 #if wxUSE_STATUSBAR
707 frame->PositionStatusBar();
708 #endif
709 #if wxUSE_TOOLBAR
710 frame->PositionToolBar();
711 #endif
712 }
713
714 wxSizeEvent event( r.GetSize() , toplevelWindow->GetId() ) ;
715 event.SetEventObject( toplevelWindow ) ;
716
717 toplevelWindow->GetEventHandler()->ProcessEvent(event) ;
718 }
719 if ( attributes & kWindowBoundsChangeOriginChanged )
720 {
721 wxMoveEvent event( r.GetLeftTop() , toplevelWindow->GetId() ) ;
722 event.SetEventObject( toplevelWindow ) ;
723 toplevelWindow->GetEventHandler()->ProcessEvent(event) ;
724 }
725 result = noErr ;
726 break ;
727 }
728 case kEventWindowBoundsChanging :
729 {
730 UInt32 attributes = cEvent.GetParameter<UInt32>(kEventParamAttributes,typeUInt32) ;
731 Rect newRect = cEvent.GetParameter<Rect>(kEventParamCurrentBounds) ;
732
733 if ( (attributes & kWindowBoundsChangeSizeChanged) || (attributes & kWindowBoundsChangeOriginChanged) )
734 {
735 // all (Mac) rects are in content area coordinates, all wxRects in structure coordinates
736 int left , top , right , bottom ;
737 toplevelWindow->MacGetContentAreaInset( left , top , right , bottom ) ;
738 wxRect r( newRect.left - left , newRect.top - top ,
739 newRect.right - newRect.left + left + right , newRect.bottom - newRect.top + top + bottom ) ;
740 // this is a EVT_SIZING not a EVT_SIZE type !
741 wxSizeEvent wxevent( r , toplevelWindow->GetId() ) ;
742 wxevent.SetEventObject( toplevelWindow ) ;
743 wxRect adjustR = r ;
744 if ( toplevelWindow->GetEventHandler()->ProcessEvent(wxevent) )
745 adjustR = wxevent.GetRect() ;
746
747 if ( toplevelWindow->GetMaxWidth() != -1 && adjustR.GetWidth() > toplevelWindow->GetMaxWidth() )
748 adjustR.SetWidth( toplevelWindow->GetMaxWidth() ) ;
749 if ( toplevelWindow->GetMaxHeight() != -1 && adjustR.GetHeight() > toplevelWindow->GetMaxHeight() )
750 adjustR.SetHeight( toplevelWindow->GetMaxHeight() ) ;
751 if ( toplevelWindow->GetMinWidth() != -1 && adjustR.GetWidth() < toplevelWindow->GetMinWidth() )
752 adjustR.SetWidth( toplevelWindow->GetMinWidth() ) ;
753 if ( toplevelWindow->GetMinHeight() != -1 && adjustR.GetHeight() < toplevelWindow->GetMinHeight() )
754 adjustR.SetHeight( toplevelWindow->GetMinHeight() ) ;
755 const Rect adjustedRect = { adjustR.y + top , adjustR.x + left , adjustR.y + adjustR.height - bottom , adjustR.x + adjustR.width - right } ;
756 if ( !EqualRect( &newRect , &adjustedRect ) )
757 cEvent.SetParameter<Rect>( kEventParamCurrentBounds , &adjustedRect ) ;
758 }
759
760 result = noErr ;
761 break ;
762 }
763 default :
764 break ;
765 }
766 return result ;
767}
768
769pascal OSStatus wxMacTopLevelEventHandler( EventHandlerCallRef handler , EventRef event , void *data )
770{
771 OSStatus result = eventNotHandledErr ;
772
773 switch ( GetEventClass( event ) )
774 {
775 case kEventClassKeyboard :
776 result = KeyboardEventHandler( handler, event , data ) ;
777 break ;
778 case kEventClassTextInput :
779 result = TextInputEventHandler( handler, event , data ) ;
780 break ;
781 case kEventClassWindow :
782 result = wxMacTopLevelWindowEventHandler( handler, event , data ) ;
783 break ;
784 case kEventClassMouse :
785 result = wxMacTopLevelMouseEventHandler( handler, event , data ) ;
786 break ;
787 default :
788 break ;
789 }
790 return result ;
791}
792
793DEFINE_ONE_SHOT_HANDLER_GETTER( wxMacTopLevelEventHandler )
794
795// ---------------------------------------------------------------------------
796// wxWindowMac utility functions
797// ---------------------------------------------------------------------------
798
799// Find an item given the Macintosh Window Reference
800
801#if KEY_wxList_DEPRECATED
802wxList wxWinMacWindowList(wxKEY_INTEGER);
803wxTopLevelWindowMac *wxFindWinFromMacWindow(WindowRef inWindowRef)
804{
805 wxNode *node = wxWinMacWindowList.Find((long)inWindowRef);
806 if (!node)
807 return NULL;
808 return (wxTopLevelWindowMac *)node->GetData();
809}
810
811void wxAssociateWinWithMacWindow(WindowRef inWindowRef, wxTopLevelWindowMac *win) ;
812void wxAssociateWinWithMacWindow(WindowRef inWindowRef, wxTopLevelWindowMac *win)
813{
814 // adding NULL WindowRef is (first) surely a result of an error and
815 // (secondly) breaks menu command processing
816 wxCHECK_RET( inWindowRef != (WindowRef) NULL, wxT("attempt to add a NULL WindowRef to window list") );
817
818 if ( !wxWinMacWindowList.Find((long)inWindowRef) )
819 wxWinMacWindowList.Append((long)inWindowRef, win);
820}
821
822void wxRemoveMacWindowAssociation(wxTopLevelWindowMac *win) ;
823void wxRemoveMacWindowAssociation(wxTopLevelWindowMac *win)
824{
825 wxWinMacWindowList.DeleteObject(win);
826}
827#else
828
829WX_DECLARE_HASH_MAP(WindowRef, wxTopLevelWindowMac*, wxPointerHash, wxPointerEqual, MacWindowMap);
830
831static MacWindowMap wxWinMacWindowList;
832
833wxTopLevelWindowMac *wxFindWinFromMacWindow(WindowRef inWindowRef)
834{
835 MacWindowMap::iterator node = wxWinMacWindowList.find(inWindowRef);
836
837 return (node == wxWinMacWindowList.end()) ? NULL : node->second;
838}
839
840void wxAssociateWinWithMacWindow(WindowRef inWindowRef, wxTopLevelWindowMac *win) ;
841void wxAssociateWinWithMacWindow(WindowRef inWindowRef, wxTopLevelWindowMac *win)
842{
843 // adding NULL WindowRef is (first) surely a result of an error and
844 // nothing else :-)
845 wxCHECK_RET( inWindowRef != (WindowRef) NULL, wxT("attempt to add a NULL WindowRef to window list") );
846
847 wxWinMacWindowList[inWindowRef] = win;
848}
849
850void wxRemoveMacWindowAssociation(wxTopLevelWindowMac *win) ;
851void wxRemoveMacWindowAssociation(wxTopLevelWindowMac *win)
852{
853 MacWindowMap::iterator it;
854 for ( it = wxWinMacWindowList.begin(); it != wxWinMacWindowList.end(); ++it )
855 {
856 if ( it->second == win )
857 {
858 wxWinMacWindowList.erase(it);
859 break;
860 }
861 }
862}
863#endif // deprecated wxList
864
865// ----------------------------------------------------------------------------
866// wxTopLevelWindowMac creation
867// ----------------------------------------------------------------------------
868
869wxTopLevelWindowMac *wxTopLevelWindowMac::s_macDeactivateWindow = NULL;
870
871typedef struct
872{
873 wxPoint m_position ;
874 wxSize m_size ;
875} FullScreenData ;
876
877void wxTopLevelWindowMac::Init()
878{
879 m_iconized =
880 m_maximizeOnShow = FALSE;
881 m_macWindow = NULL ;
882#if TARGET_API_MAC_OSX
883 if ( UMAGetSystemVersion() >= 0x1030 )
884 {
885 m_macUsesCompositing = TRUE;
886 }
887 else
888#endif
889 {
890 m_macUsesCompositing = FALSE;
891 }
892 m_macEventHandler = NULL ;
893 m_macFullScreenData = NULL ;
894}
895
896class wxMacDeferredWindowDeleter : public wxObject
897{
898public :
899 wxMacDeferredWindowDeleter( WindowRef windowRef )
900 {
901 m_macWindow = windowRef ;
902 }
903 virtual ~wxMacDeferredWindowDeleter()
904 {
905 UMADisposeWindow( (WindowRef) m_macWindow ) ;
906 }
907 protected :
908 WindowRef m_macWindow ;
909} ;
910
911bool wxTopLevelWindowMac::Create(wxWindow *parent,
912 wxWindowID id,
913 const wxString& title,
914 const wxPoint& pos,
915 const wxSize& size,
916 long style,
917 const wxString& name)
918{
919 // init our fields
920 Init();
921
922 m_windowStyle = style;
923
924 SetName(name);
925
926 m_windowId = id == -1 ? NewControlId() : id;
927 wxWindow::SetTitle( title ) ;
928
929 MacCreateRealWindow( title, pos , size , MacRemoveBordersFromStyle(style) , name ) ;
930
931 SetBackgroundColour(wxSystemSettings::GetColour(wxSYS_COLOUR_3DFACE));
932
933 if (GetExtraStyle() & wxFRAME_EX_METAL)
934 MacSetMetalAppearance(true);
935
936 wxTopLevelWindows.Append(this);
937
938 if ( parent )
939 parent->AddChild(this);
940
941 return TRUE;
942}
943
944wxTopLevelWindowMac::~wxTopLevelWindowMac()
945{
946 if ( m_macWindow )
947 {
948#if wxUSE_TOOLTIPS
949 wxToolTip::NotifyWindowDelete(m_macWindow) ;
950#endif
951 wxPendingDelete.Append( new wxMacDeferredWindowDeleter( (WindowRef) m_macWindow ) ) ;
952 }
953
954 if ( m_macEventHandler )
955 {
956 ::RemoveEventHandler((EventHandlerRef) m_macEventHandler);
957 m_macEventHandler = NULL ;
958 }
959
960 wxRemoveMacWindowAssociation( this ) ;
961
962 if ( wxModelessWindows.Find(this) )
963 wxModelessWindows.DeleteObject(this);
964
965 FullScreenData *data = (FullScreenData *) m_macFullScreenData ;
966 delete data ;
967 m_macFullScreenData = NULL ;
968}
969
970
971// ----------------------------------------------------------------------------
972// wxTopLevelWindowMac maximize/minimize
973// ----------------------------------------------------------------------------
974
975void wxTopLevelWindowMac::Maximize(bool maximize)
976{
977 wxMacPortStateHelper help( (GrafPtr) GetWindowPort( (WindowRef) m_macWindow) ) ;
978 wxMacWindowClipper clip (this);
979 ZoomWindow( (WindowRef)m_macWindow , maximize ? inZoomOut : inZoomIn , false ) ;
980}
981
982bool wxTopLevelWindowMac::IsMaximized() const
983{
984 return IsWindowInStandardState( (WindowRef)m_macWindow , NULL , NULL ) ;
985}
986
987void wxTopLevelWindowMac::Iconize(bool iconize)
988{
989 if ( IsWindowCollapsable((WindowRef)m_macWindow) )
990 CollapseWindow((WindowRef)m_macWindow , iconize ) ;
991}
992
993bool wxTopLevelWindowMac::IsIconized() const
994{
995 return IsWindowCollapsed((WindowRef)m_macWindow ) ;
996}
997
998void wxTopLevelWindowMac::Restore()
999{
1000 // not available on mac
1001}
1002
1003// ----------------------------------------------------------------------------
1004// wxTopLevelWindowMac misc
1005// ----------------------------------------------------------------------------
1006
1007wxPoint wxTopLevelWindowMac::GetClientAreaOrigin() const
1008{
1009 return wxPoint(0,0) ;
1010}
1011
1012void wxTopLevelWindowMac::SetIcon(const wxIcon& icon)
1013{
1014 // this sets m_icon
1015 wxTopLevelWindowBase::SetIcon(icon);
1016}
1017
1018void wxTopLevelWindowMac::MacSetBackgroundBrush( const wxBrush &brush )
1019{
1020 wxTopLevelWindowBase::MacSetBackgroundBrush( brush ) ;
1021
1022 if ( m_macBackgroundBrush.Ok() && m_macBackgroundBrush.GetStyle() != wxTRANSPARENT && m_macBackgroundBrush.MacGetBrushKind() == kwxMacBrushTheme )
1023 {
1024 SetThemeWindowBackground( (WindowRef) m_macWindow , m_macBackgroundBrush.MacGetTheme() , false ) ;
1025 }
1026}
1027
1028void wxTopLevelWindowMac::MacInstallTopLevelWindowEventHandler()
1029{
1030 if ( m_macEventHandler != NULL )
1031 {
1032 verify_noerr( ::RemoveEventHandler( (EventHandlerRef) m_macEventHandler ) ) ;
1033 }
1034 InstallWindowEventHandler(MAC_WXHWND(m_macWindow), GetwxMacTopLevelEventHandlerUPP(),
1035 GetEventTypeCount(eventList), eventList, this, (EventHandlerRef *)&m_macEventHandler);
1036}
1037
1038void wxTopLevelWindowMac::MacCreateRealWindow( const wxString& title,
1039 const wxPoint& pos,
1040 const wxSize& size,
1041 long style,
1042 const wxString& name )
1043{
1044 OSStatus err = noErr ;
1045 SetName(name);
1046 m_windowStyle = style;
1047 m_isShown = FALSE;
1048
1049 // create frame.
1050
1051 Rect theBoundsRect;
1052
1053 int x = (int)pos.x;
1054 int y = (int)pos.y;
1055
1056 wxRect display = wxGetClientDisplayRect() ;
1057
1058 if ( x == wxDefaultPosition.x )
1059 x = display.x ;
1060
1061 if ( y == wxDefaultPosition.y )
1062 y = display.y ;
1063
1064 int w = WidthDefault(size.x);
1065 int h = HeightDefault(size.y);
1066
1067 ::SetRect(&theBoundsRect, x, y , x + w, y + h);
1068
1069 // translate the window attributes in the appropriate window class and attributes
1070
1071 WindowClass wclass = 0;
1072 WindowAttributes attr = kWindowNoAttributes ;
1073 WindowGroupRef group = NULL ;
1074
1075 if ( HasFlag( wxFRAME_TOOL_WINDOW) )
1076 {
1077 if (
1078 HasFlag( wxMINIMIZE_BOX ) || HasFlag( wxMAXIMIZE_BOX ) ||
1079 HasFlag( wxSYSTEM_MENU ) || HasFlag( wxCAPTION ) ||
1080 HasFlag(wxTINY_CAPTION_HORIZ) || HasFlag(wxTINY_CAPTION_VERT)
1081 )
1082 {
1083 wclass = kFloatingWindowClass ;
1084 if ( HasFlag(wxTINY_CAPTION_VERT) )
1085 {
1086 attr |= kWindowSideTitlebarAttribute ;
1087 }
1088 }
1089 else
1090 {
1091 wclass = kPlainWindowClass ;
1092 }
1093 }
1094 else if ( HasFlag( wxCAPTION ) )
1095 {
1096 wclass = kDocumentWindowClass ;
1097 }
1098#if defined( __WXMAC__ ) && TARGET_API_MAC_OSX && ( MAC_OS_X_VERSION_MAX_ALLOWED >= MAC_OS_X_VERSION_10_2 )
1099 else if ( HasFlag( wxFRAME_DRAWER ) )
1100 {
1101 wclass = kDrawerWindowClass;
1102 // we must force compositing on a drawer
1103 m_macUsesCompositing = TRUE ;
1104 }
1105#endif //10.2 and up
1106 else
1107 {
1108 if ( HasFlag( wxMINIMIZE_BOX ) || HasFlag( wxMAXIMIZE_BOX ) ||
1109 HasFlag( wxCLOSE_BOX ) || HasFlag( wxSYSTEM_MENU ) )
1110 {
1111 wclass = kDocumentWindowClass ;
1112 }
1113 else
1114 {
1115 wclass = kPlainWindowClass ;
1116 }
1117 }
1118
1119 if ( HasFlag( wxMINIMIZE_BOX ) && wclass != kPlainWindowClass )
1120 {
1121 attr |= kWindowCollapseBoxAttribute ;
1122 }
1123 if ( HasFlag( wxMAXIMIZE_BOX ) && wclass != kPlainWindowClass )
1124 {
1125 attr |= kWindowFullZoomAttribute ;
1126 }
1127 if ( HasFlag( wxRESIZE_BORDER ) && wclass != kPlainWindowClass )
1128 {
1129 attr |= kWindowResizableAttribute ;
1130 }
1131 if ( HasFlag( wxCLOSE_BOX) && wclass != kPlainWindowClass )
1132 {
1133 attr |= kWindowCloseBoxAttribute ;
1134 }
1135
1136 if (UMAGetSystemVersion() >= 0x1000)
1137 {
1138 // turn on live resizing (OS X only)
1139 attr |= kWindowLiveResizeAttribute;
1140 }
1141
1142 if ( HasFlag(wxSTAY_ON_TOP) )
1143 {
1144 group = GetWindowGroupOfClass(kUtilityWindowClass) ;
1145 }
1146
1147#if TARGET_API_MAC_OSX
1148 if ( m_macUsesCompositing )
1149 attr |= kWindowCompositingAttribute;
1150#endif
1151
1152 if ( HasFlag(wxFRAME_SHAPED) )
1153 {
1154 WindowDefSpec customWindowDefSpec;
1155 customWindowDefSpec.defType = kWindowDefProcPtr;
1156 customWindowDefSpec.u.defProc = NewWindowDefUPP(wxShapedMacWindowDef);
1157
1158 err = ::CreateCustomWindow( &customWindowDefSpec, wclass,
1159 attr, &theBoundsRect,
1160 (WindowRef*) &m_macWindow);
1161 }
1162 else
1163 {
1164 err = ::CreateNewWindow( wclass , attr , &theBoundsRect , (WindowRef*)&m_macWindow ) ;
1165 }
1166
1167 if ( err == noErr && m_macWindow != NULL && group != NULL )
1168 SetWindowGroup( (WindowRef) m_macWindow , group ) ;
1169
1170 wxCHECK_RET( err == noErr, wxT("Mac OS error when trying to create new window") );
1171
1172 // the create commands are only for content rect, so we have to set the size again as
1173 // structure bounds
1174 SetWindowBounds( (WindowRef) m_macWindow , kWindowStructureRgn , &theBoundsRect ) ;
1175
1176 wxAssociateWinWithMacWindow( (WindowRef) m_macWindow , this ) ;
1177 UMASetWTitle( (WindowRef) m_macWindow , title , m_font.GetEncoding() ) ;
1178 m_peer = new wxMacControl(this , true /*isRootControl*/) ;
1179#if TARGET_API_MAC_OSX
1180
1181 if ( m_macUsesCompositing )
1182 {
1183 // There is a bug in 10.2.X for ::GetRootControl returning the window view instead of
1184 // the content view, so we have to retrieve it explicitely
1185 HIViewFindByID( HIViewGetRoot( (WindowRef) m_macWindow ) , kHIViewWindowContentID ,
1186 m_peer->GetControlRefAddr() ) ;
1187 if ( !m_peer->Ok() )
1188 {
1189 // compatibility mode fallback
1190 GetRootControl( (WindowRef) m_macWindow , m_peer->GetControlRefAddr() ) ;
1191 }
1192 }
1193#endif
1194 {
1195 ::CreateRootControl( (WindowRef)m_macWindow , m_peer->GetControlRefAddr() ) ;
1196 }
1197 // the root control level handleer
1198 MacInstallEventHandler( (WXWidget) m_peer->GetControlRef() ) ;
1199
1200 // the frame window event handler
1201 InstallStandardEventHandler( GetWindowEventTarget(MAC_WXHWND(m_macWindow)) ) ;
1202 MacInstallTopLevelWindowEventHandler() ;
1203
1204 m_macFocus = NULL ;
1205
1206 if ( HasFlag(wxFRAME_SHAPED) )
1207 {
1208 // default shape matches the window size
1209 wxRegion rgn(0, 0, w, h);
1210 SetShape(rgn);
1211 }
1212
1213 wxWindowCreateEvent event(this);
1214 GetEventHandler()->ProcessEvent(event);
1215}
1216
1217void wxTopLevelWindowMac::ClearBackground()
1218{
1219 wxWindow::ClearBackground() ;
1220}
1221
1222// Raise the window to the top of the Z order
1223void wxTopLevelWindowMac::Raise()
1224{
1225 ::SelectWindow( (WindowRef)m_macWindow ) ;
1226}
1227
1228// Lower the window to the bottom of the Z order
1229void wxTopLevelWindowMac::Lower()
1230{
1231 ::SendBehind( (WindowRef)m_macWindow , NULL ) ;
1232}
1233
1234
1235void wxTopLevelWindowMac::MacDelayedDeactivation(long timestamp)
1236{
1237 if(s_macDeactivateWindow)
1238 {
1239 wxLogDebug(wxT("Doing delayed deactivation of %p"),s_macDeactivateWindow);
1240 s_macDeactivateWindow->MacActivate(timestamp, false);
1241 }
1242}
1243
1244void wxTopLevelWindowMac::MacActivate( long timestamp , bool inIsActivating )
1245{
1246 // wxLogDebug(wxT("TopLevel=%p::MacActivate"),this);
1247
1248 if(s_macDeactivateWindow==this)
1249 s_macDeactivateWindow=NULL;
1250 MacDelayedDeactivation(timestamp);
1251 MacPropagateHiliteChanged() ;
1252}
1253
1254void wxTopLevelWindowMac::SetTitle(const wxString& title)
1255{
1256 wxWindow::SetTitle( title ) ;
1257 UMASetWTitle( (WindowRef)m_macWindow , title , m_font.GetEncoding() ) ;
1258}
1259
1260bool wxTopLevelWindowMac::Show(bool show)
1261{
1262 if ( !wxTopLevelWindowBase::Show(show) )
1263 return FALSE;
1264
1265 if (show)
1266 {
1267 #if wxUSE_SYSTEM_OPTIONS //code contributed by Ryan Wilcox December 18, 2003
1268 if ( (wxSystemOptions::HasOption(wxMAC_WINDOW_PLAIN_TRANSITION) ) && ( wxSystemOptions::GetOptionInt( wxMAC_WINDOW_PLAIN_TRANSITION ) == 1) )
1269 {
1270 ::ShowWindow( (WindowRef)m_macWindow );
1271 }
1272 else
1273 #endif
1274 {
1275 ::TransitionWindow((WindowRef)m_macWindow,kWindowZoomTransitionEffect,kWindowShowTransitionAction,nil);
1276 }
1277 ::SelectWindow( (WindowRef)m_macWindow ) ;
1278 // as apps expect a size event to occur at this moment
1279 wxSizeEvent event( GetSize() , m_windowId);
1280 event.SetEventObject(this);
1281 GetEventHandler()->ProcessEvent(event);
1282 }
1283 else
1284 {
1285 #if wxUSE_SYSTEM_OPTIONS
1286 if ( (wxSystemOptions::HasOption(wxMAC_WINDOW_PLAIN_TRANSITION) ) && ( wxSystemOptions::GetOptionInt( wxMAC_WINDOW_PLAIN_TRANSITION ) == 1) )
1287 {
1288 ::HideWindow((WindowRef) m_macWindow );
1289 }
1290 else
1291 #endif
1292 {
1293 ::TransitionWindow((WindowRef)m_macWindow,kWindowZoomTransitionEffect,kWindowHideTransitionAction,nil);
1294 }
1295 }
1296
1297 MacPropagateVisibilityChanged() ;
1298
1299 return TRUE ;
1300}
1301
1302bool wxTopLevelWindowMac::ShowFullScreen(bool show, long style)
1303{
1304 if ( show )
1305 {
1306 FullScreenData *data = (FullScreenData *)m_macFullScreenData ;
1307 delete data ;
1308 data = new FullScreenData() ;
1309
1310 m_macFullScreenData = data ;
1311 data->m_position = GetPosition() ;
1312 data->m_size = GetSize() ;
1313
1314 if ( style & wxFULLSCREEN_NOMENUBAR )
1315 {
1316 HideMenuBar() ;
1317 }
1318 int left , top , right , bottom ;
1319 wxRect client = wxGetClientDisplayRect() ;
1320
1321 int x, y, w, h ;
1322
1323 x = client.x ;
1324 y = client.y ;
1325 w = client.width ;
1326 h = client.height ;
1327
1328 MacGetContentAreaInset( left , top , right , bottom ) ;
1329
1330 if ( style & wxFULLSCREEN_NOCAPTION )
1331 {
1332 y -= top ;
1333 h += top ;
1334 }
1335 if ( style & wxFULLSCREEN_NOBORDER )
1336 {
1337 x -= left ;
1338 w += left + right ;
1339 h += bottom ;
1340 }
1341 if ( style & wxFULLSCREEN_NOTOOLBAR )
1342 {
1343 // TODO
1344 }
1345 if ( style & wxFULLSCREEN_NOSTATUSBAR )
1346 {
1347 // TODO
1348 }
1349 SetSize( x , y , w, h ) ;
1350 }
1351 else
1352 {
1353 ShowMenuBar() ;
1354 FullScreenData *data = (FullScreenData *) m_macFullScreenData ;
1355 SetPosition( data->m_position ) ;
1356 SetSize( data->m_size ) ;
1357 delete data ;
1358 m_macFullScreenData = NULL ;
1359 }
1360 return FALSE;
1361}
1362
1363bool wxTopLevelWindowMac::IsFullScreen() const
1364{
1365 return m_macFullScreenData != NULL ;
1366}
1367
1368// we are still using coordinates of the content view, todo switch to structure bounds
1369
1370void wxTopLevelWindowMac::MacGetContentAreaInset( int &left , int &top , int &right , int &bottom )
1371{
1372 Rect content ;
1373 Rect structure ;
1374 GetWindowBounds( (WindowRef) m_macWindow, kWindowStructureRgn , &structure ) ;
1375 GetWindowBounds( (WindowRef) m_macWindow, kWindowContentRgn , &content ) ;
1376
1377 left = content.left - structure.left ;
1378 top = content.top - structure.top ;
1379 right = structure.right - content.right ;
1380 bottom = structure.bottom - content.bottom ;
1381}
1382
1383void wxTopLevelWindowMac::DoMoveWindow(int x, int y, int width, int height)
1384{
1385 m_cachedClippedRectValid = false ;
1386 Rect bounds = { y , x , y + height , x + width } ;
1387 verify_noerr(SetWindowBounds( (WindowRef) m_macWindow, kWindowStructureRgn , &bounds )) ;
1388}
1389
1390void wxTopLevelWindowMac::DoGetPosition( int *x, int *y ) const
1391{
1392 Rect bounds ;
1393 verify_noerr(GetWindowBounds((WindowRef) m_macWindow, kWindowStructureRgn , &bounds )) ;
1394 if(x) *x = bounds.left ;
1395 if(y) *y = bounds.top ;
1396}
1397void wxTopLevelWindowMac::DoGetSize( int *width, int *height ) const
1398{
1399 Rect bounds ;
1400 verify_noerr(GetWindowBounds((WindowRef) m_macWindow, kWindowStructureRgn , &bounds )) ;
1401 if(width) *width = bounds.right - bounds.left ;
1402 if(height) *height = bounds.bottom - bounds.top ;
1403}
1404
1405void wxTopLevelWindowMac::DoGetClientSize( int *width, int *height ) const
1406{
1407 Rect bounds ;
1408 verify_noerr(GetWindowBounds((WindowRef) m_macWindow, kWindowContentRgn , &bounds )) ;
1409 if(width) *width = bounds.right - bounds.left ;
1410 if(height) *height = bounds.bottom - bounds.top ;
1411}
1412
1413void wxTopLevelWindowMac::MacSetMetalAppearance( bool set )
1414{
1415#if TARGET_API_MAC_OSX
1416 wxASSERT_MSG( m_macUsesCompositing ,
1417 wxT("Cannot set metal appearance on a non-compositing window") ) ;
1418
1419 MacChangeWindowAttributes( set ? kWindowMetalAttribute : kWindowNoAttributes ,
1420 set ? kWindowNoAttributes : kWindowMetalAttribute ) ;
1421#endif
1422}
1423
1424bool wxTopLevelWindowMac::MacGetMetalAppearance() const
1425{
1426#if TARGET_API_MAC_OSX
1427 return MacGetWindowAttributes() & kWindowMetalAttribute ;
1428#else
1429 return false ;
1430#endif
1431}
1432
1433void wxTopLevelWindowMac::MacChangeWindowAttributes( wxUint32 attributesToSet , wxUint32 attributesToClear )
1434{
1435 ChangeWindowAttributes ( (WindowRef) m_macWindow , attributesToSet, attributesToClear ) ;
1436}
1437
1438wxUint32 wxTopLevelWindowMac::MacGetWindowAttributes() const
1439{
1440 UInt32 attr = 0 ;
1441 GetWindowAttributes((WindowRef) m_macWindow , &attr ) ;
1442 return attr ;
1443}
1444
1445void wxTopLevelWindowMac::MacPerformUpdates()
1446{
1447#if TARGET_API_MAC_OSX
1448 if ( m_macUsesCompositing )
1449 {
1450#if MAC_OS_X_VERSION_MAX_ALLOWED >= MAC_OS_X_VERSION_10_3
1451 // for composited windows this also triggers a redraw of all
1452 // invalid views in the window
1453 if( UMAGetSystemVersion() >= 0x1030 )
1454 HIWindowFlush((WindowRef) m_macWindow) ;
1455 else
1456#endif
1457 {
1458 // the only way to trigger the redrawing on earlier systems is to call
1459 // ReceiveNextEvent
1460
1461 EventRef currentEvent = (EventRef) wxTheApp->MacGetCurrentEvent() ;
1462 UInt32 currentEventClass = 0 ;
1463 UInt32 currentEventKind = 0 ;
1464 if ( currentEvent != NULL )
1465 {
1466 currentEventClass = ::GetEventClass( currentEvent ) ;
1467 currentEventKind = ::GetEventKind( currentEvent ) ;
1468 }
1469 if ( currentEventClass != kEventClassMenu )
1470 {
1471 // when tracking a menu, strange redraw errors occur if we flush now, so leave..
1472 EventRef theEvent;
1473 OSStatus status = noErr ;
1474 status = ReceiveNextEvent( 0 , NULL , kEventDurationNoWait , false , &theEvent ) ;
1475 }
1476 }
1477 }
1478 else
1479#endif
1480 {
1481 BeginUpdate( (WindowRef) m_macWindow ) ;
1482
1483 RgnHandle updateRgn = NewRgn();
1484 if ( updateRgn )
1485 {
1486 GetPortVisibleRegion( GetWindowPort( (WindowRef)m_macWindow ), updateRgn );
1487 UpdateControls( (WindowRef)m_macWindow , updateRgn ) ;
1488 // if ( !EmptyRgn( updateRgn ) )
1489 // MacDoRedraw( updateRgn , 0 , true) ;
1490 DisposeRgn( updateRgn );
1491 }
1492 EndUpdate( (WindowRef)m_macWindow ) ;
1493 QDFlushPortBuffer( GetWindowPort( (WindowRef)m_macWindow ) , NULL ) ;
1494 }
1495}
1496
1497// Attracts the users attention to this window if the application is
1498// inactive (should be called when a background event occurs)
1499
1500static pascal void wxMacNMResponse( NMRecPtr ptr )
1501{
1502 NMRemove( ptr ) ;
1503 DisposePtr( (Ptr) ptr ) ;
1504}
1505
1506
1507void wxTopLevelWindowMac::RequestUserAttention(int flags )
1508{
1509 NMRecPtr notificationRequest = (NMRecPtr) NewPtr( sizeof( NMRec) ) ;
1510 static wxMacNMUPP nmupp( wxMacNMResponse )
1511 ;
1512 memset( notificationRequest , 0 , sizeof(*notificationRequest) ) ;
1513 notificationRequest->qType = nmType ;
1514 notificationRequest->nmMark = 1 ;
1515 notificationRequest->nmIcon = 0 ;
1516 notificationRequest->nmSound = 0 ;
1517 notificationRequest->nmStr = NULL ;
1518 notificationRequest->nmResp = nmupp ;
1519 verify_noerr( NMInstall( notificationRequest ) ) ;
1520}
1521
1522// ---------------------------------------------------------------------------
1523// Shape implementation
1524// ---------------------------------------------------------------------------
1525
1526
1527bool wxTopLevelWindowMac::SetShape(const wxRegion& region)
1528{
1529 wxCHECK_MSG( HasFlag(wxFRAME_SHAPED), FALSE,
1530 _T("Shaped windows must be created with the wxFRAME_SHAPED style."));
1531
1532 // The empty region signifies that the shape should be removed from the
1533 // window.
1534 if ( region.IsEmpty() )
1535 {
1536 wxSize sz = GetClientSize();
1537 wxRegion rgn(0, 0, sz.x, sz.y);
1538 return SetShape(rgn);
1539 }
1540
1541 // Make a copy of the region
1542 RgnHandle shapeRegion = NewRgn();
1543 CopyRgn( (RgnHandle)region.GetWXHRGN(), shapeRegion );
1544
1545 // Dispose of any shape region we may already have
1546 RgnHandle oldRgn = (RgnHandle)GetWRefCon( (WindowRef)MacGetWindowRef() );
1547 if ( oldRgn )
1548 DisposeRgn(oldRgn);
1549
1550 // Save the region so we can use it later
1551 SetWRefCon((WindowRef)MacGetWindowRef(), (SInt32)shapeRegion);
1552
1553 // Tell the window manager that the window has changed shape
1554 ReshapeCustomWindow((WindowRef)MacGetWindowRef());
1555 return TRUE;
1556}
1557
1558// ---------------------------------------------------------------------------
1559// Support functions for shaped windows, based on Apple's CustomWindow sample at
1560// http://developer.apple.com/samplecode/Sample_Code/Human_Interface_Toolbox/Mac_OS_High_Level_Toolbox/CustomWindow.htm
1561// ---------------------------------------------------------------------------
1562
1563static void wxShapedMacWindowGetPos(WindowRef window, Rect* inRect)
1564{
1565 GetWindowPortBounds(window, inRect);
1566 Point pt = {inRect->left, inRect->top};
1567 QDLocalToGlobalPoint( GetWindowPort(window) , &pt ) ;
1568 inRect->top = pt.v;
1569 inRect->left = pt.h;
1570 inRect->bottom += pt.v;
1571 inRect->right += pt.h;
1572}
1573
1574
1575static SInt32 wxShapedMacWindowGetFeatures(WindowRef window, SInt32 param)
1576{
1577 /*------------------------------------------------------
1578 Define which options your custom window supports.
1579 --------------------------------------------------------*/
1580 //just enable everything for our demo
1581 *(OptionBits*)param=//kWindowCanGrow|
1582 //kWindowCanZoom|
1583 //kWindowCanCollapse|
1584 //kWindowCanGetWindowRegion|
1585 //kWindowHasTitleBar|
1586 //kWindowSupportsDragHilite|
1587 kWindowCanDrawInCurrentPort|
1588 //kWindowCanMeasureTitle|
1589 kWindowWantsDisposeAtProcessDeath|
1590 kWindowSupportsGetGrowImageRegion|
1591 kWindowDefSupportsColorGrafPort;
1592 return 1;
1593}
1594
1595// The content region is left as a rectangle matching the window size, this is
1596// so the origin in the paint event, and etc. still matches what the
1597// programmer expects.
1598static void wxShapedMacWindowContentRegion(WindowRef window, RgnHandle rgn)
1599{
1600 SetEmptyRgn(rgn);
1601 wxTopLevelWindowMac* win = wxFindWinFromMacWindow(window);
1602 if (win)
1603 {
1604 Rect r ;
1605 wxShapedMacWindowGetPos(window, &r ) ;
1606 RectRgn( rgn , &r ) ;
1607 }
1608}
1609
1610// The structure region is set to the shape given to the SetShape method.
1611static void wxShapedMacWindowStructureRegion(WindowRef window, RgnHandle rgn)
1612{
1613 RgnHandle cachedRegion = (RgnHandle) GetWRefCon(window);
1614
1615 SetEmptyRgn(rgn);
1616 if (cachedRegion)
1617 {
1618 Rect windowRect;
1619 wxShapedMacWindowGetPos(window, &windowRect); //how big is the window
1620 CopyRgn(cachedRegion, rgn); //make a copy of our cached region
1621 OffsetRgn(rgn, windowRect.left, windowRect.top); // position it over window
1622 //MapRgn(rgn, &mMaskSize, &windowRect); //scale it to our actual window size
1623 }
1624}
1625
1626
1627
1628static SInt32 wxShapedMacWindowGetRegion(WindowRef window, SInt32 param)
1629{
1630 GetWindowRegionPtr rgnRec=(GetWindowRegionPtr)param;
1631
1632 switch(rgnRec->regionCode)
1633 {
1634 case kWindowStructureRgn:
1635 wxShapedMacWindowStructureRegion(window, rgnRec->winRgn);
1636 break;
1637 case kWindowContentRgn:
1638 wxShapedMacWindowContentRegion(window, rgnRec->winRgn);
1639 break;
1640 default:
1641 SetEmptyRgn(rgnRec->winRgn);
1642 } //switch
1643
1644 return noErr;
1645}
1646
1647
1648static SInt32 wxShapedMacWindowHitTest(WindowRef window,SInt32 param)
1649{
1650 /*------------------------------------------------------
1651 Determine the region of the window which was hit
1652 --------------------------------------------------------*/
1653 Point hitPoint;
1654 static RgnHandle tempRgn=nil;
1655
1656 if(!tempRgn)
1657 tempRgn=NewRgn();
1658
1659 SetPt(&hitPoint,LoWord(param),HiWord(param));//get the point clicked
1660
1661 //Mac OS 8.5 or later
1662 wxShapedMacWindowStructureRegion(window, tempRgn);
1663 if (PtInRgn(hitPoint, tempRgn)) //in window content region?
1664 return wInContent;
1665
1666 return wNoHit;//no significant area was hit.
1667}
1668
1669
1670static pascal long wxShapedMacWindowDef(short varCode, WindowRef window, SInt16 message, SInt32 param)
1671{
1672 switch(message)
1673 {
1674 case kWindowMsgHitTest:
1675 return wxShapedMacWindowHitTest(window,param);
1676
1677 case kWindowMsgGetFeatures:
1678 return wxShapedMacWindowGetFeatures(window,param);
1679
1680 // kWindowMsgGetRegion is sent during CreateCustomWindow and ReshapeCustomWindow
1681 case kWindowMsgGetRegion:
1682 return wxShapedMacWindowGetRegion(window,param);
1683 }
1684
1685 return 0;
1686}
1687
1688// ---------------------------------------------------------------------------
1689
wxWidgets (Impactor)