]> git.saurik.com Git - wxWidgets.git/blame - src/mac/carbon/window.cpp
allowing shaped windows again
[wxWidgets.git] / src / mac / carbon / window.cpp
CommitLineData
e9576ca5
SC
1/////////////////////////////////////////////////////////////////////////////
2// Name: windows.cpp
e766c8a9 3// Purpose: wxWindowMac
a31a5f85 4// Author: Stefan Csomor
e9576ca5 5// Modified by:
a31a5f85 6// Created: 1998-01-01
e9576ca5 7// RCS-ID: $Id$
a31a5f85 8// Copyright: (c) Stefan Csomor
6264b550 9// Licence: wxWindows licence
e9576ca5
SC
10/////////////////////////////////////////////////////////////////////////////
11
12#ifdef __GNUG__
13#pragma implementation "window.h"
14#endif
15
16#include "wx/setup.h"
17#include "wx/menu.h"
5fde6fcc 18#include "wx/window.h"
e9576ca5
SC
19#include "wx/dc.h"
20#include "wx/dcclient.h"
14c9cbdb 21#include "wx/utils.h"
e9576ca5
SC
22#include "wx/app.h"
23#include "wx/panel.h"
24#include "wx/layout.h"
25#include "wx/dialog.h"
03e11df5
GD
26#include "wx/scrolbar.h"
27#include "wx/statbox.h"
e9576ca5
SC
28#include "wx/button.h"
29#include "wx/settings.h"
30#include "wx/msgdlg.h"
31#include "wx/frame.h"
2f1ae414 32#include "wx/tooltip.h"
c809f3be 33#include "wx/statusbr.h"
e9576ca5 34#include "wx/menuitem.h"
4ac219f6 35#include "wx/spinctrl.h"
e9576ca5 36#include "wx/log.h"
467e3168 37#include "wx/geometry.h"
e9576ca5 38
facd6764
SC
39#include "wx/toolbar.h"
40#include "wx/dc.h"
41
7c551d95
SC
42#if wxUSE_CARET
43 #include "wx/caret.h"
44#endif // wxUSE_CARET
45
519cb848
SC
46#define wxWINDOW_HSCROLL 5998
47#define wxWINDOW_VSCROLL 5997
48#define MAC_SCROLLBAR_SIZE 16
49
d497dca4 50#include "wx/mac/uma.h"
66a09d47
SC
51#ifndef __DARWIN__
52#include <Windows.h>
53#include <ToolUtils.h>
54#endif
519cb848 55
41218df1 56#if TARGET_API_MAC_OSX
facd6764
SC
57#ifndef __HIVIEW__
58 #include <HIToolbox/HIView.h>
59#endif
41218df1 60#endif
facd6764 61
e9576ca5
SC
62#if wxUSE_DRAG_AND_DROP
63#include "wx/dnd.h"
64#endif
65
66#include <string.h>
67
68extern wxList wxPendingDelete;
69
fc0daf84
SC
70#ifdef __WXUNIVERSAL__
71 IMPLEMENT_ABSTRACT_CLASS(wxWindowMac, wxWindowBase)
72#else // __WXMAC__
73 IMPLEMENT_DYNAMIC_CLASS(wxWindow, wxWindowBase)
74#endif // __WXUNIVERSAL__/__WXMAC__
75
2f1ae414 76#if !USE_SHARED_LIBRARY
fc0daf84
SC
77
78BEGIN_EVENT_TABLE(wxWindowMac, wxWindowBase)
facd6764
SC
79 EVT_NC_PAINT(wxWindowMac::OnNcPaint)
80 EVT_ERASE_BACKGROUND(wxWindowMac::OnEraseBackground)
81// TODO EVT_PAINT(wxWindowMac::OnPaint)
82 EVT_SYS_COLOUR_CHANGED(wxWindowMac::OnSysColourChanged)
83 EVT_INIT_DIALOG(wxWindowMac::OnInitDialog)
f1d527c1 84// EVT_SET_FOCUS(wxWindowMac::OnSetFocus)
facd6764 85 EVT_MOUSE_EVENTS(wxWindowMac::OnMouseEvent)
e9576ca5
SC
86END_EVENT_TABLE()
87
2f1ae414 88#endif
e9576ca5 89
94abc21f
SC
90#define wxMAC_DEBUG_REDRAW 0
91#ifndef wxMAC_DEBUG_REDRAW
92#define wxMAC_DEBUG_REDRAW 0
93#endif
94
1c310985 95#define wxMAC_USE_THEME_BORDER 0
e9576ca5 96
facd6764
SC
97// ---------------------------------------------------------------------------
98// Carbon Events
99// ---------------------------------------------------------------------------
100
101extern long wxMacTranslateKey(unsigned char key, unsigned char code) ;
102pascal OSStatus wxMacSetupControlBackground( ControlRef iControl , SInt16 iMessage , SInt16 iDepth , Boolean iIsColor ) ;
103
f1d527c1
SC
104#if TARGET_API_MAC_OSX
105
106#if MAC_OS_X_VERSION_MAX_ALLOWED < MAC_OS_X_VERSION_10_3
c2697b87
SC
107enum {
108 kEventControlVisibilityChanged = 157
109};
110#endif
111
f1d527c1
SC
112#endif
113
facd6764
SC
114static const EventTypeSpec eventList[] =
115{
f1d527c1 116 { kEventClassControl , kEventControlHit } ,
facd6764 117#if TARGET_API_MAC_OSX
73fe67bd
SC
118 { kEventClassControl , kEventControlDraw } ,
119 { kEventClassControl , kEventControlVisibilityChanged } ,
120 { kEventClassControl , kEventControlEnabledStateChanged } ,
121 { kEventClassControl , kEventControlHiliteChanged } ,
f1d527c1 122 { kEventClassControl , kEventControlSetFocusPart } ,
facd6764
SC
123// { kEventClassControl , kEventControlInvalidateForSizeChange } , // 10.3 only
124// { kEventClassControl , kEventControlBoundsChanged } ,
facd6764
SC
125#endif
126} ;
127
128static pascal OSStatus wxMacWindowControlEventHandler( EventHandlerCallRef handler , EventRef event , void *data )
129{
130 OSStatus result = eventNotHandledErr ;
131
132 wxMacCarbonEvent cEvent( event ) ;
133
134 ControlRef controlRef ;
135 wxWindowMac* thisWindow = (wxWindowMac*) data ;
136
137 cEvent.GetParameter( kEventParamDirectObject , &controlRef ) ;
138
139 switch( GetEventKind( event ) )
140 {
f1d527c1 141#if TARGET_API_MAC_OSX
facd6764
SC
142 case kEventControlDraw :
143 {
1e8cde71
SC
144 RgnHandle updateRgn = NULL ;
145
146 wxRegion visRegion = thisWindow->MacGetVisibleRegion() ;
147 if ( cEvent.GetParameter<RgnHandle>(kEventParamRgnHandle, &updateRgn) != noErr )
148 {
149 updateRgn = (RgnHandle) visRegion.GetWXHRGN() ;
150 }
facd6764
SC
151 // GrafPtr myport = cEvent.GetParameter<GrafPtr>(kEventParamGrafPort,typeGrafPtr) ;
152
bcbd6987 153#if 0
125c7984 154 // in case we would need a coregraphics compliant background erase first
bcbd6987 155 // now usable to track redraws
facd6764
SC
156 CGContextRef cgContext = cEvent.GetParameter<CGContextRef>(kEventParamCGContextRef) ;
157 if ( thisWindow->MacIsUserPane() )
158 {
bcbd6987
SC
159 static float color = 0.5 ;
160 static channel = 0 ;
facd6764 161 HIRect bounds;
bcbd6987
SC
162 HIViewGetBounds( controlRef, &bounds );
163 CGContextSetRGBFillColor( cgContext, channel == 0 ? color : 0.5 ,
164 channel == 1 ? color : 0.5 , channel == 2 ? color : 0.5 , 1 );
facd6764 165 CGContextFillRect( cgContext, bounds );
bcbd6987
SC
166 color += 0.1 ;
167 if ( color > 0.9 )
168 {
169 color = 0.5 ;
170 channel++ ;
171 if ( channel == 3 )
172 channel = 0 ;
173 }
facd6764
SC
174 }
175#endif
bcbd6987 176 if ( thisWindow->MacDoRedraw( updateRgn , cEvent.GetTicks() ) )
facd6764 177 result = noErr ;
facd6764
SC
178 }
179 break ;
73fe67bd
SC
180 case kEventControlVisibilityChanged :
181 thisWindow->MacVisibilityChanged() ;
182 break ;
183 case kEventControlEnabledStateChanged :
184 thisWindow->MacEnabledStateChanged() ;
185 break ;
186 case kEventControlHiliteChanged :
187 thisWindow->MacHiliteChanged() ;
188 break ;
f1d527c1
SC
189 case kEventControlSetFocusPart :
190 {
191 Boolean focusEverything = false ;
192 ControlPartCode controlPart = cEvent.GetParameter<ControlPartCode>(kEventParamControlPart , typeControlPartCode );
193 if ( cEvent.GetParameter<Boolean>(kEventParamControlFocusEverything , &focusEverything ) == noErr )
194 {
195 }
196 if ( controlPart == kControlFocusNoPart )
197 {
198 #if wxUSE_CARET
199 if ( thisWindow->GetCaret() )
200 {
201 thisWindow->GetCaret()->OnKillFocus();
202 }
203 #endif // wxUSE_CARET
204 wxFocusEvent event(wxEVT_KILL_FOCUS, thisWindow->GetId());
205 event.SetEventObject(thisWindow);
206 thisWindow->GetEventHandler()->ProcessEvent(event) ;
207 }
208 else
209 {
210 // panel wants to track the window which was the last to have focus in it
211 wxChildFocusEvent eventFocus(thisWindow);
212 thisWindow->GetEventHandler()->ProcessEvent(eventFocus);
213
214 #if wxUSE_CARET
215 if ( thisWindow->GetCaret() )
216 {
217 thisWindow->GetCaret()->OnSetFocus();
218 }
219 #endif // wxUSE_CARET
220
221 wxFocusEvent event(wxEVT_SET_FOCUS, thisWindow->GetId());
222 event.SetEventObject(thisWindow);
223 thisWindow->GetEventHandler()->ProcessEvent(event) ;
224 }
225 }
226 break ;
227#endif
228 case kEventControlHit :
229 {
230 result = thisWindow->MacControlHit( handler , event ) ;
231 }
232 break ;
facd6764
SC
233 default :
234 break ;
235 }
236 return result ;
237}
238
239pascal OSStatus wxMacWindowEventHandler( EventHandlerCallRef handler , EventRef event , void *data )
240{
241 OSStatus result = eventNotHandledErr ;
242
243 switch ( GetEventClass( event ) )
244 {
245 case kEventClassControl :
246 result = wxMacWindowControlEventHandler( handler, event, data ) ;
247 break ;
248 default :
249 break ;
250 }
251 return result ;
252}
253
254DEFINE_ONE_SHOT_HANDLER_GETTER( wxMacWindowEventHandler )
255
256// ---------------------------------------------------------------------------
257// UserPane events for non OSX builds
258// ---------------------------------------------------------------------------
259
260static pascal void wxMacControlUserPaneDrawProc(ControlRef control, SInt16 part)
261{
262 wxWindow * win = wxFindControlFromMacControl(control) ;
263 wxCHECK_RET( win , wxT("Callback from unkown control") ) ;
264 win->MacControlUserPaneDrawProc(part) ;
265}
266
267static pascal ControlPartCode wxMacControlUserPaneHitTestProc(ControlRef control, Point where)
268{
269 wxWindow * win = wxFindControlFromMacControl(control) ;
270 wxCHECK_MSG( win , kControlNoPart , wxT("Callback from unkown control") ) ;
271 return win->MacControlUserPaneHitTestProc(where.h , where.v) ;
272}
273
274static pascal ControlPartCode wxMacControlUserPaneTrackingProc(ControlRef control, Point startPt, ControlActionUPP actionProc)
275{
276 wxWindow * win = wxFindControlFromMacControl(control) ;
277 wxCHECK_MSG( win , kControlNoPart , wxT("Callback from unkown control") ) ;
278 return win->MacControlUserPaneTrackingProc( startPt.h , startPt.v , (void*) actionProc) ;
279}
280
281static pascal void wxMacControlUserPaneIdleProc(ControlRef control)
282{
283 wxWindow * win = wxFindControlFromMacControl(control) ;
284 wxCHECK_RET( win , wxT("Callback from unkown control") ) ;
285 win->MacControlUserPaneIdleProc() ;
286}
287
288static pascal ControlPartCode wxMacControlUserPaneKeyDownProc(ControlRef control, SInt16 keyCode, SInt16 charCode, SInt16 modifiers)
289{
290 wxWindow * win = wxFindControlFromMacControl(control) ;
291 wxCHECK_MSG( win , kControlNoPart , wxT("Callback from unkown control") ) ;
292 return win->MacControlUserPaneKeyDownProc(keyCode,charCode,modifiers) ;
293}
294
295static pascal void wxMacControlUserPaneActivateProc(ControlRef control, Boolean activating)
296{
297 wxWindow * win = wxFindControlFromMacControl(control) ;
298 wxCHECK_RET( win , wxT("Callback from unkown control") ) ;
299 win->MacControlUserPaneActivateProc(activating) ;
300}
301
302static pascal ControlPartCode wxMacControlUserPaneFocusProc(ControlRef control, ControlFocusPart action)
303{
304 wxWindow * win = wxFindControlFromMacControl(control) ;
305 wxCHECK_MSG( win , kControlNoPart , wxT("Callback from unkown control") ) ;
306 return win->MacControlUserPaneFocusProc(action) ;
307}
308
309static pascal void wxMacControlUserPaneBackgroundProc(ControlRef control, ControlBackgroundPtr info)
310{
311 wxWindow * win = wxFindControlFromMacControl(control) ;
312 wxCHECK_RET( win , wxT("Callback from unkown control") ) ;
313 win->MacControlUserPaneBackgroundProc(info) ;
314}
315
316void wxWindowMac::MacControlUserPaneDrawProc(wxInt16 part)
317{
bcbd6987
SC
318 RgnHandle rgn = NewRgn() ;
319 GetClip( rgn ) ;
320 wxMacWindowStateSaver sv( this ) ;
321 SectRgn( rgn , (RgnHandle) MacGetVisibleRegion().GetWXHRGN() , rgn ) ;
322 MacDoRedraw( rgn , 0 ) ;
323 DisposeRgn( rgn ) ;
facd6764
SC
324}
325
326wxInt16 wxWindowMac::MacControlUserPaneHitTestProc(wxInt16 x, wxInt16 y)
327{
328 return kControlNoPart ;
329}
330
331wxInt16 wxWindowMac::MacControlUserPaneTrackingProc(wxInt16 x, wxInt16 y, void* actionProc)
332{
333 return kControlNoPart ;
334}
335
336void wxWindowMac::MacControlUserPaneIdleProc()
337{
338}
339
340wxInt16 wxWindowMac::MacControlUserPaneKeyDownProc(wxInt16 keyCode, wxInt16 charCode, wxInt16 modifiers)
341{
342 return kControlNoPart ;
343}
344
345void wxWindowMac::MacControlUserPaneActivateProc(bool activating)
346{
347}
348
349wxInt16 wxWindowMac::MacControlUserPaneFocusProc(wxInt16 action)
350{
351 return kControlNoPart ;
352}
353
354void wxWindowMac::MacControlUserPaneBackgroundProc(void* info)
355{
356}
357
358ControlUserPaneDrawUPP gControlUserPaneDrawUPP = NULL ;
359ControlUserPaneHitTestUPP gControlUserPaneHitTestUPP = NULL ;
360ControlUserPaneTrackingUPP gControlUserPaneTrackingUPP = NULL ;
361ControlUserPaneIdleUPP gControlUserPaneIdleUPP = NULL ;
362ControlUserPaneKeyDownUPP gControlUserPaneKeyDownUPP = NULL ;
363ControlUserPaneActivateUPP gControlUserPaneActivateUPP = NULL ;
364ControlUserPaneFocusUPP gControlUserPaneFocusUPP = NULL ;
365ControlUserPaneBackgroundUPP gControlUserPaneBackgroundUPP = NULL ;
e7549107
SC
366
367// ===========================================================================
368// implementation
369// ===========================================================================
370
facd6764
SC
371wxList wxWinMacControlList(wxKEY_INTEGER);
372
373wxWindow *wxFindControlFromMacControl(ControlRef inControl )
374{
375 wxNode *node = wxWinMacControlList.Find((long)inControl);
376 if (!node)
377 return NULL;
378 return (wxControl *)node->GetData();
379}
380
381void wxAssociateControlWithMacControl(ControlRef inControl, wxWindow *control)
382{
383 // adding NULL ControlRef is (first) surely a result of an error and
384 // (secondly) breaks native event processing
385 wxCHECK_RET( inControl != (ControlRef) NULL, wxT("attempt to add a NULL WindowRef to window list") );
386
387 if ( !wxWinMacControlList.Find((long)inControl) )
388 wxWinMacControlList.Append((long)inControl, control);
389}
390
391void wxRemoveMacControlAssociation(wxWindow *control)
392{
393 wxWinMacControlList.DeleteObject(control);
394}
395
396// UPP functions
397ControlActionUPP wxMacLiveScrollbarActionUPP = NULL ;
398
399ControlColorUPP wxMacSetupControlBackgroundUPP = NULL ;
400
401// we have to setup the brush in the current port and return noErr
402// or return an error code so that the control manager walks further up the
403// hierarchy to find a correct background
404
405pascal OSStatus wxMacSetupControlBackground( ControlRef iControl , SInt16 iMessage , SInt16 iDepth , Boolean iIsColor )
406{
407 OSStatus status = paramErr ;
408 switch( iMessage )
409 {
410 case kControlMsgApplyTextColor :
411 break ;
412 case kControlMsgSetUpBackground :
413 {
414 wxWindow* wx = (wxWindow*) wxFindControlFromMacControl( iControl ) ;
415 if ( wx != NULL )
416 {
417 /*
418 const wxBrush &brush = wx->MacGetBackgroundBrush() ;
419 if ( brush.Ok() )
420 {
421
422 wxDC::MacSetupBackgroundForCurrentPort( brush ) ;
423 */
424 // this clipping is only needed for non HIView
425
426 RgnHandle clip = NewRgn() ;
427 int x = 0 , y = 0;
428
429 wx->MacWindowToRootWindow( &x,&y ) ;
430 CopyRgn( (RgnHandle) wx->MacGetVisibleRegion().GetWXHRGN() , clip ) ;
431 OffsetRgn( clip , x , y ) ;
432 SetClip( clip ) ;
433 DisposeRgn( clip ) ;
434
435 status = noErr ;
436 /*
437 }
438 else if ( wx->MacIsUserPane() )
439 {
440 // if we don't have a valid brush for such a control, we have to call the
441 // setup of our parent ourselves
442 status = SetUpControlBackground( (ControlRef) wx->GetParent()->GetHandle() , iDepth , iIsColor ) ;
443 }
444 */
445 }
446 }
447 break ;
448 default :
449 break ;
450 }
451 return status ;
452}
453
454
455pascal void wxMacLiveScrollbarActionProc( ControlRef control , ControlPartCode partCode ) ;
456pascal void wxMacLiveScrollbarActionProc( ControlRef control , ControlPartCode partCode )
457{
458 if ( partCode != 0)
459 {
460 wxWindow* wx = wxFindControlFromMacControl( control ) ;
461 if ( wx )
462 {
463 wx->MacHandleControlClick( (WXWidget) control , partCode , true /* stillDown */ ) ;
464 }
465 }
466}
e7549107
SC
467
468// ----------------------------------------------------------------------------
facd6764 469 // constructors and such
e7549107
SC
470// ----------------------------------------------------------------------------
471
e766c8a9 472void wxWindowMac::Init()
519cb848 473{
79392158 474 m_frozenness = 0 ;
557d6f32 475#if WXWIN_COMPATIBILITY_2_4
e7549107 476 m_backgroundTransparent = FALSE;
557d6f32 477#endif
e7549107
SC
478
479 // as all windows are created with WS_VISIBLE style...
480 m_isShown = TRUE;
481
6264b550
RR
482 m_hScrollBar = NULL ;
483 m_vScrollBar = NULL ;
facd6764
SC
484 m_macBackgroundBrush = wxNullBrush ;
485
486 m_macControl = NULL ;
487
488 m_macIsUserPane = TRUE;
489
490 // make sure all proc ptrs are available
491
492 if ( gControlUserPaneDrawUPP == NULL )
493 {
494 gControlUserPaneDrawUPP = NewControlUserPaneDrawUPP( wxMacControlUserPaneDrawProc ) ;
495 gControlUserPaneHitTestUPP = NewControlUserPaneHitTestUPP( wxMacControlUserPaneHitTestProc ) ;
496 gControlUserPaneTrackingUPP = NewControlUserPaneTrackingUPP( wxMacControlUserPaneTrackingProc ) ;
497 gControlUserPaneIdleUPP = NewControlUserPaneIdleUPP( wxMacControlUserPaneIdleProc ) ;
498 gControlUserPaneKeyDownUPP = NewControlUserPaneKeyDownUPP( wxMacControlUserPaneKeyDownProc ) ;
499 gControlUserPaneActivateUPP = NewControlUserPaneActivateUPP( wxMacControlUserPaneActivateProc ) ;
500 gControlUserPaneFocusUPP = NewControlUserPaneFocusUPP( wxMacControlUserPaneFocusProc ) ;
501 gControlUserPaneBackgroundUPP = NewControlUserPaneBackgroundUPP( wxMacControlUserPaneBackgroundProc ) ;
502 }
503 if ( wxMacLiveScrollbarActionUPP == NULL )
504 {
505 wxMacLiveScrollbarActionUPP = NewControlActionUPP( wxMacLiveScrollbarActionProc );
506 }
507
508 if ( wxMacSetupControlBackgroundUPP == NULL )
509 {
510 wxMacSetupControlBackgroundUPP = NewControlColorUPP( wxMacSetupControlBackground ) ;
511 }
512
c6f9fb05
SC
513 // we need a valid font for the encodings
514 wxWindowBase::SetFont(wxSystemSettings::GetFont(wxSYS_DEFAULT_GUI_FONT));
e9576ca5
SC
515}
516
517// Destructor
e766c8a9 518wxWindowMac::~wxWindowMac()
e9576ca5 519{
7de59551
RD
520 SendDestroyEvent();
521
140f2012 522 m_isBeingDeleted = TRUE;
6ed71b4f 523
d4380aaf
SC
524#ifndef __WXUNIVERSAL__
525 // VS: make sure there's no wxFrame with last focus set to us:
526 for ( wxWindow *win = GetParent(); win; win = win->GetParent() )
527 {
528 wxFrame *frame = wxDynamicCast(win, wxFrame);
529 if ( frame )
530 {
531 if ( frame->GetLastFocus() == this )
532 {
533 frame->SetLastFocus((wxWindow*)NULL);
534 }
535 break;
536 }
537 }
538#endif // __WXUNIVERSAL__
facd6764
SC
539
540 // wxRemoveMacControlAssociation( this ) ;
541 // If we delete an item, we should initialize the parent panel,
542 // because it could now be invalid.
543 wxWindow *parent = GetParent() ;
544 if ( parent )
545 {
546 if (parent->GetDefaultItem() == (wxButton*) this)
547 parent->SetDefaultItem(NULL);
548 }
549 if ( (ControlRef) m_macControl )
550 {
551 // in case the callback might be called during destruction
552 wxRemoveMacControlAssociation( this) ;
553 ::SetControlColorProc( (ControlRef) m_macControl , NULL ) ;
554 ::DisposeControl( (ControlRef) m_macControl ) ;
555 m_macControl = NULL ;
556 }
d4380aaf 557
facd6764 558 if ( g_MacLastWindow == this )
6264b550 559 {
facd6764 560 g_MacLastWindow = NULL ;
6264b550 561 }
7de59551 562
fd76aa8d
SC
563 wxFrame* frame = wxDynamicCast( wxGetTopLevelParent( this ) , wxFrame ) ;
564 if ( frame )
565 {
e40298d5
JS
566 if ( frame->GetLastFocus() == this )
567 frame->SetLastFocus( NULL ) ;
fd76aa8d 568 }
e7549107 569
42683dfb
SC
570 DestroyChildren();
571
42683dfb
SC
572 // delete our drop target if we've got one
573#if wxUSE_DRAG_AND_DROP
574 if ( m_dropTarget != NULL )
575 {
576 delete m_dropTarget;
577 m_dropTarget = NULL;
578 }
579#endif // wxUSE_DRAG_AND_DROP
e9576ca5
SC
580}
581
facd6764
SC
582//
583
584void wxWindowMac::MacInstallEventHandler()
585{
125c7984 586 wxAssociateControlWithMacControl( (ControlRef) m_macControl , this ) ;
facd6764
SC
587 InstallControlEventHandler( (ControlRef) m_macControl, GetwxMacWindowEventHandlerUPP(),
588 GetEventTypeCount(eventList), eventList, this,
589 (EventHandlerRef *)&m_macControlEventHandler);
590
591}
592
e9576ca5 593// Constructor
e766c8a9 594bool wxWindowMac::Create(wxWindowMac *parent, wxWindowID id,
e9576ca5
SC
595 const wxPoint& pos,
596 const wxSize& size,
597 long style,
598 const wxString& name)
599{
e766c8a9 600 wxCHECK_MSG( parent, FALSE, wxT("can't create wxWindowMac without parent") );
e9576ca5 601
e7549107 602 if ( !CreateBase(parent, id, pos, size, style, wxDefaultValidator, name) )
e9576ca5
SC
603 return FALSE;
604
e7549107 605 parent->AddChild(this);
e9576ca5 606
facd6764
SC
607 m_windowVariant = parent->GetWindowVariant() ;
608
609 if ( m_macIsUserPane )
610 {
611 Rect bounds = wxMacGetBoundsForControl( this , pos , size ) ;
612
ebe86b1e
SC
613 UInt32 features = 0
614 | kControlSupportsEmbedding
615// | kControlSupportsLiveFeedback
616// | kControlHasSpecialBackground
617// | kControlSupportsCalcBestRect
618// | kControlHandlesTracking
619 | kControlSupportsFocus
620// | kControlWantsActivate
621// | kControlWantsIdle
622 ;
623
624 ::CreateUserPaneControl( MAC_WXHWND(GetParent()->MacGetTopLevelWindowRef()) , &bounds, features , (ControlRef*) &m_macControl);
facd6764
SC
625
626 MacPostControlCreate(pos,size) ;
bcbd6987 627#if !TARGET_API_MAC_OSX
facd6764
SC
628 SetControlData((ControlRef) m_macControl,kControlEntireControl,kControlUserPaneDrawProcTag,
629 sizeof(gControlUserPaneDrawUPP),(Ptr) &gControlUserPaneDrawUPP);
630 SetControlData((ControlRef) m_macControl,kControlEntireControl,kControlUserPaneHitTestProcTag,
631 sizeof(gControlUserPaneHitTestUPP),(Ptr) &gControlUserPaneHitTestUPP);
632 SetControlData((ControlRef) m_macControl,kControlEntireControl,kControlUserPaneTrackingProcTag,
633 sizeof(gControlUserPaneTrackingUPP),(Ptr) &gControlUserPaneTrackingUPP);
634 SetControlData((ControlRef) m_macControl,kControlEntireControl,kControlUserPaneIdleProcTag,
635 sizeof(gControlUserPaneIdleUPP),(Ptr) &gControlUserPaneIdleUPP);
636 SetControlData((ControlRef) m_macControl,kControlEntireControl,kControlUserPaneKeyDownProcTag,
637 sizeof(gControlUserPaneKeyDownUPP),(Ptr) &gControlUserPaneKeyDownUPP);
638 SetControlData((ControlRef) m_macControl,kControlEntireControl,kControlUserPaneActivateProcTag,
639 sizeof(gControlUserPaneActivateUPP),(Ptr) &gControlUserPaneActivateUPP);
640 SetControlData((ControlRef) m_macControl,kControlEntireControl,kControlUserPaneFocusProcTag,
641 sizeof(gControlUserPaneFocusUPP),(Ptr) &gControlUserPaneFocusUPP);
642 SetControlData((ControlRef) m_macControl,kControlEntireControl,kControlUserPaneBackgroundProcTag,
643 sizeof(gControlUserPaneBackgroundUPP),(Ptr) &gControlUserPaneBackgroundUPP);
644#endif
645 }
e766c8a9 646#ifndef __WXUNIVERSAL__
14c9cbdb
RD
647 // Don't give scrollbars to wxControls unless they ask for them
648 if ( (! IsKindOf(CLASSINFO(wxControl)) && ! IsKindOf(CLASSINFO(wxStatusBar))) ||
649 (IsKindOf(CLASSINFO(wxControl)) && ( style & wxHSCROLL || style & wxVSCROLL)))
6264b550
RR
650 {
651 MacCreateScrollBars( style ) ;
652 }
e766c8a9 653#endif
3dfafdb9
RD
654
655 wxWindowCreateEvent event(this);
7e4a196e 656 GetEventHandler()->AddPendingEvent(event);
3dfafdb9 657
e9576ca5
SC
658 return TRUE;
659}
660
facd6764
SC
661void wxWindowMac::MacPostControlCreate(const wxPoint& pos, const wxSize& size)
662{
663 wxASSERT_MSG( (ControlRef) m_macControl != NULL , wxT("No valid mac control") ) ;
664
facd6764
SC
665 ::SetControlReference( (ControlRef) m_macControl , (long) this ) ;
666
667 MacInstallEventHandler();
668
669 ControlRef container = (ControlRef) GetParent()->GetHandle() ;
670 wxASSERT_MSG( container != NULL , wxT("No valid mac container control") ) ;
671 ::EmbedControl( (ControlRef) m_macControl , container ) ;
672
673 // adjust font, controlsize etc
674 DoSetWindowVariant( m_windowVariant ) ;
675
676#if !TARGET_API_MAC_OSX
677 // eventually we can fix some clipping issues be reactivating this hook
678 //if ( m_macIsUserPane )
679 // SetControlColorProc( (ControlRef) m_macControl , wxMacSetupControlBackgroundUPP ) ;
680#endif
681
682 UMASetControlTitle( (ControlRef) m_macControl , wxStripMenuCodes(m_label) , m_font.GetEncoding() ) ;
683
684 wxSize new_size = size ;
685 if (!m_macIsUserPane)
686 {
687 wxSize best_size( DoGetBestSize() );
688
689 if (size.x == -1) {
690 new_size.x = best_size.x;
691 }
692 if (size.y == -1) {
693 new_size.y = best_size.y;
694 }
695 SetSize( pos.x, pos.y , new_size.x, new_size.y,wxSIZE_USE_EXISTING );
696 }
697
698 SetCursor( *wxSTANDARD_CURSOR ) ;
699
700}
701
702void wxWindowMac::DoSetWindowVariant( wxWindowVariant variant )
703{
23176131
JS
704 // Don't assert, in case we set the window variant before
705 // the window is created
706 // wxASSERT( m_macControl != NULL ) ;
facd6764 707
23176131
JS
708 m_windowVariant = variant ;
709
710 if (!m_macControl)
711 return;
facd6764
SC
712
713 ControlSize size ;
714 ThemeFontID themeFont = kThemeSystemFont ;
715
716 // we will get that from the settings later
717 // and make this NORMAL later, but first
718 // we have a few calculations that we must fix
719
720 switch ( variant )
721 {
722 case wxWINDOW_VARIANT_NORMAL :
723 size = kControlSizeNormal;
724 themeFont = kThemeSystemFont ;
725 break ;
726 case wxWINDOW_VARIANT_SMALL :
727 size = kControlSizeSmall;
728 themeFont = kThemeSmallSystemFont ;
729 break ;
730 case wxWINDOW_VARIANT_MINI :
731 if (UMAGetSystemVersion() >= 0x1030 )
732 {
733 // not always defined in the headers
734 size = 3 ;
735 themeFont = 109 ;
736 }
737 else
738 {
739 size = kControlSizeSmall;
740 themeFont = kThemeSmallSystemFont ;
741 }
742 break ;
743 case wxWINDOW_VARIANT_LARGE :
744 size = kControlSizeLarge;
745 themeFont = kThemeSystemFont ;
746 break ;
747 default:
748 wxFAIL_MSG(_T("unexpected window variant"));
749 break ;
750 }
751 ::SetControlData( (ControlRef) m_macControl , kControlEntireControl, kControlSizeTag, sizeof( ControlSize ), &size );
752
753 wxFont font ;
754 font.MacCreateThemeFont( themeFont ) ;
755 SetFont( font ) ;
756}
757
758void wxWindowMac::MacUpdateControlFont()
759{
760 ControlFontStyleRec fontStyle;
761 if ( m_font.MacGetThemeFontID() != kThemeCurrentPortFont )
762 {
763 switch( m_font.MacGetThemeFontID() )
764 {
765 case kThemeSmallSystemFont : fontStyle.font = kControlFontSmallSystemFont ; break ;
766 case 109 /*mini font */ : fontStyle.font = -5 ; break ;
767 case kThemeSystemFont : fontStyle.font = kControlFontBigSystemFont ; break ;
768 default : fontStyle.font = kControlFontBigSystemFont ; break ;
769 }
770 fontStyle.flags = kControlUseFontMask ;
771 }
772 else
773 {
774 fontStyle.font = m_font.MacGetFontNum() ;
775 fontStyle.style = m_font.MacGetFontStyle() ;
776 fontStyle.size = m_font.MacGetFontSize() ;
777 fontStyle.flags = kControlUseFontMask | kControlUseFaceMask | kControlUseSizeMask ;
778 }
03c4c72b
SC
779
780 fontStyle.just = teJustLeft ;
781 fontStyle.flags |= kControlUseJustMask ;
782 if ( ( GetWindowStyle() & wxALIGN_MASK ) & wxALIGN_CENTER_HORIZONTAL )
783 fontStyle.just = teJustCenter ;
784 else if ( ( GetWindowStyle() & wxALIGN_MASK ) & wxALIGN_RIGHT )
785 fontStyle.just = teJustRight ;
786
787
facd6764
SC
788 fontStyle.foreColor = MAC_WXCOLORREF(GetForegroundColour().GetPixel() ) ;
789 fontStyle.flags |= kControlUseForeColorMask ;
03c4c72b 790
facd6764
SC
791 ::SetControlFontStyle( (ControlRef) m_macControl , &fontStyle );
792 Refresh() ;
793}
794
795bool wxWindowMac::SetFont(const wxFont& font)
796{
797 bool retval = !wxWindowBase::SetFont( font ) ;
798
799 MacUpdateControlFont() ;
800
801 return retval;
802}
803
804bool wxWindowMac::SetForegroundColour(const wxColour& col )
805{
806 if ( !wxWindowBase::SetForegroundColour(col) )
807 return false ;
808
809 MacUpdateControlFont() ;
810
811 return true ;
812}
813
814bool wxWindowMac::SetBackgroundColour(const wxColour& col )
815{
816 if ( !wxWindowBase::SetBackgroundColour(col) && m_hasBgCol )
817 return false ;
818
819 wxBrush brush ;
820 if ( col == wxSystemSettings::GetColour(wxSYS_COLOUR_APPWORKSPACE) )
821 {
822 brush.MacSetTheme( kThemeBrushDocumentWindowBackground ) ;
823 }
824 else if ( col == wxSystemSettings::GetColour(wxSYS_COLOUR_3DFACE ) )
825 {
826 brush.MacSetTheme( kThemeBrushDialogBackgroundActive ) ;
827 }
828 else
829 {
830 brush.SetColour( col ) ;
831 }
832 MacSetBackgroundBrush( brush ) ;
833
834 MacUpdateControlFont() ;
835
836 return true ;
837}
838
839
840bool wxWindowMac::MacCanFocus() const
841{
f1d527c1
SC
842#if 0
843 // there is currently no way to determinate whether the window is running in full keyboard
844 // access mode, therefore we cannot rely on these features yet
845 UInt32 features = 0 ;
846 GetControlFeatures( (ControlRef) m_macControl , &features ) ;
847 return features & ( kControlSupportsFocus | kControlGetsFocusOnClick ) ;
848#endif
849 return true ;
facd6764
SC
850}
851
852
e766c8a9 853void wxWindowMac::SetFocus()
e9576ca5 854{
6264b550
RR
855 if ( AcceptsFocus() )
856 {
f1d527c1
SC
857#if !TARGET_API_MAC_OSX
858 wxWindow* former = FindFocus() ;
eed1be65 859#endif
f1d527c1
SC
860 OSStatus err = SetKeyboardFocus( (WindowRef) MacGetTopLevelWindowRef() , (ControlRef) GetHandle() , kControlFocusNextPart ) ;
861 // as we cannot rely on the control features to find out whether we are in full keyboard mode, we can only
862 // leave in case of an error
863 if ( err == errCouldntSetFocus )
864 return ;
865
866#if !TARGET_API_MAC_OSX
867 // emulate carbon events when running under carbonlib where they are not natively available
868 if ( former )
869 {
870 EventRef evRef = NULL ;
871 verify_noerr( MacCreateEvent( NULL , kEventClassControl , kEventControlSetFocusPart , TicksToEventTime( TickCount() ) , kEventAttributeUserEvent ,
872 &evRef ) );
873
874 wxMacCarbonEvent cEvent( evRef ) ;
875 cEvent.SetParameter<ControlRef>( kEventParamDirectObject , (ControlRef) former->GetHandle() ) ;
876 cEvent.SetParameter<ControlPartCode>(kEventParamControlPart , typeControlPartCode , kControlFocusNoPart ) ;
877
878 wxMacWindowEventHandler( NULL , evRef , former ) ;
879 ReleaseEvent(evRef) ;
6264b550 880 }
f1d527c1 881 // send new focus event
6264b550 882 {
f1d527c1
SC
883 EventRef evRef = NULL ;
884 verify_noerr( MacCreateEvent( NULL , kEventClassControl , kEventControlSetFocusPart , TicksToEventTime( TickCount() ) , kEventAttributeUserEvent ,
885 &evRef ) );
886
887 wxMacCarbonEvent cEvent( evRef ) ;
888 cEvent.SetParameter<ControlRef>( kEventParamDirectObject , (ControlRef) GetHandle() ) ;
889 cEvent.SetParameter<ControlPartCode>(kEventParamControlPart , typeControlPartCode , kControlFocusNextPart ) ;
890
891 wxMacWindowEventHandler( NULL , evRef , this ) ;
892 ReleaseEvent(evRef) ;
6264b550 893 }
f1d527c1 894#endif
6264b550 895 }
e9576ca5
SC
896}
897
e9576ca5 898
4116c221 899void wxWindowMac::DoCaptureMouse()
e9576ca5 900{
519cb848 901 wxTheApp->s_captureWindow = this ;
e9576ca5
SC
902}
903
90b959ae
SC
904wxWindow* wxWindowBase::GetCapture()
905{
906 return wxTheApp->s_captureWindow ;
907}
908
4116c221 909void wxWindowMac::DoReleaseMouse()
e9576ca5 910{
519cb848 911 wxTheApp->s_captureWindow = NULL ;
e9576ca5
SC
912}
913
e9576ca5
SC
914#if wxUSE_DRAG_AND_DROP
915
e766c8a9 916void wxWindowMac::SetDropTarget(wxDropTarget *pDropTarget)
e9576ca5 917{
e40298d5
JS
918 if ( m_dropTarget != 0 ) {
919 delete m_dropTarget;
920 }
6ed71b4f 921
e40298d5
JS
922 m_dropTarget = pDropTarget;
923 if ( m_dropTarget != 0 )
924 {
925 // TODO
926 }
e9576ca5
SC
927}
928
929#endif
930
931// Old style file-manager drag&drop
e766c8a9 932void wxWindowMac::DragAcceptFiles(bool accept)
e9576ca5
SC
933{
934 // TODO
935}
936
facd6764
SC
937void wxWindowMac::MacGetPositionAndSizeFromControl(int& x, int& y,
938 int& w, int& h) const
e9576ca5 939{
facd6764
SC
940 Rect bounds ;
941 GetControlBounds( (ControlRef) m_macControl , &bounds ) ;
e9576ca5 942
14c9cbdb 943
facd6764
SC
944 x = bounds.left ;
945 y = bounds.top ;
946 w = bounds.right - bounds.left ;
947 h = bounds.bottom - bounds.top ;
948
949 wxTopLevelWindow* tlw = wxDynamicCast( this , wxTopLevelWindow ) ;
950 if ( tlw )
519cb848 951 {
facd6764
SC
952 Point tlworigin = { 0 , 0 } ;
953 GrafPtr port ;
bb253bfd 954 bool swapped = QDSwapPort( UMAGetWindowPort( (WindowRef) tlw->MacGetWindowRef() ) , &port ) ;
facd6764 955 ::LocalToGlobal( &tlworigin ) ;
bb253bfd
SC
956 if ( swapped )
957 ::SetPort( port ) ;
facd6764
SC
958 x = tlworigin.h ;
959 y = tlworigin.v ;
519cb848 960 }
e9576ca5
SC
961}
962
facd6764
SC
963bool wxWindowMac::MacGetBoundsForControl(const wxPoint& pos,
964 const wxSize& size,
965 int& x, int& y,
79392158 966 int& w, int& h , bool adjustOrigin ) const
51abe921 967{
facd6764
SC
968 x = (int)pos.x;
969 y = (int)pos.y;
970 // todo the default calls may be used as soon as PostCreateControl Is moved here
971 w = size.x ; // WidthDefault( size.x );
972 h = size.y ; // HeightDefault( size.y ) ;
973#if !TARGET_API_MAC_OSX
974 GetParent()->MacWindowToRootWindow( &x , &y ) ;
975#endif
79392158
SC
976 if ( adjustOrigin )
977 AdjustForParentClientOrigin( x , y ) ;
facd6764
SC
978 return true ;
979}
980
981// Get total size
982void wxWindowMac::DoGetSize(int *x, int *y) const
983{
984#if TARGET_API_MAC_OSX
985 int x1 , y1 , w1 ,h1 ;
986 MacGetPositionAndSizeFromControl( x1 , y1, w1 ,h1 ) ;
987 if(x) *x = w1 ;
988 if(y) *y = h1 ;
989
990#else
991 Rect bounds ;
992 GetControlBounds( (ControlRef) m_macControl , &bounds ) ;
993 if(x) *x = bounds.right - bounds.left ;
994 if(y) *y = bounds.bottom - bounds.top ;
995#endif
996}
997
998void wxWindowMac::DoGetPosition(int *x, int *y) const
999{
1000 #if TARGET_API_MAC_OSX
1001 int x1 , y1 , w1 ,h1 ;
1002 MacGetPositionAndSizeFromControl( x1 , y1, w1 ,h1 ) ;
1003 if ( !IsTopLevel() )
2b5f62a0 1004 {
facd6764
SC
1005 wxWindow *parent = GetParent();
1006 if ( parent )
8950f7cc 1007 {
facd6764
SC
1008 wxPoint pt(parent->GetClientAreaOrigin());
1009 x1 -= pt.x ;
1010 y1 -= pt.y ;
6ed71b4f 1011 }
2b5f62a0 1012 }
facd6764
SC
1013 if(x) *x = x1 ;
1014 if(y) *y = y1 ;
1015 #else
1016 Rect bounds ;
1017 GetControlBounds( (ControlRef) m_macControl , &bounds ) ;
1018 wxCHECK_RET( GetParent() , wxT("Missing Parent") ) ;
1019
1020 int xx = bounds.left ;
1021 int yy = bounds.top ;
1022
1023 if ( !GetParent()->IsTopLevel() )
1024 {
1025 GetControlBounds( (ControlRef) GetParent()->GetHandle() , &bounds ) ;
1026
1027 xx -= bounds.left ;
1028 yy -= bounds.top ;
1029 }
1030
1031 wxPoint pt(GetParent()->GetClientAreaOrigin());
1032 xx -= pt.x;
1033 yy -= pt.y;
51abe921 1034
facd6764
SC
1035 if(x) *x = xx;
1036 if(y) *y = yy;
e766c8a9 1037#endif
facd6764 1038}
51abe921 1039
e766c8a9 1040void wxWindowMac::DoScreenToClient(int *x, int *y) const
e9576ca5 1041{
facd6764
SC
1042 WindowRef window = (WindowRef) MacGetTopLevelWindowRef() ;
1043
1044 wxCHECK_RET( window , wxT("TopLevel Window Missing") ) ;
1045
1046 {
1047 Point localwhere = {0,0} ;
519cb848 1048
facd6764
SC
1049 if(x) localwhere.h = * x ;
1050 if(y) localwhere.v = * y ;
1051
1052 wxMacPortSaver s((GrafPtr)GetWindowPort( window )) ;
1053 ::GlobalToLocal( &localwhere ) ;
1054 if(x) *x = localwhere.h ;
1055 if(y) *y = localwhere.v ;
6ed71b4f 1056
facd6764 1057 }
2078220e 1058 MacRootWindowToWindow( x , y ) ;
facd6764
SC
1059
1060 wxPoint origin = GetClientAreaOrigin() ;
1061 if(x) *x -= origin.x ;
1062 if(y) *y -= origin.y ;
e9576ca5
SC
1063}
1064
e766c8a9 1065void wxWindowMac::DoClientToScreen(int *x, int *y) const
e9576ca5 1066{
facd6764
SC
1067 WindowRef window = (WindowRef) MacGetTopLevelWindowRef() ;
1068 wxCHECK_RET( window , wxT("TopLevel Window Missing") ) ;
14c9cbdb 1069
facd6764
SC
1070 wxPoint origin = GetClientAreaOrigin() ;
1071 if(x) *x += origin.x ;
1072 if(y) *y += origin.y ;
14c9cbdb 1073
2078220e 1074 MacWindowToRootWindow( x , y ) ;
14c9cbdb 1075
facd6764
SC
1076 {
1077 Point localwhere = { 0,0 };
1078 if(x) localwhere.h = * x ;
1079 if(y) localwhere.v = * y ;
7d9d1fd7 1080
facd6764
SC
1081 wxMacPortSaver s((GrafPtr)GetWindowPort( window )) ;
1082 ::LocalToGlobal( &localwhere ) ;
1083 if(x) *x = localwhere.h ;
1084 if(y) *y = localwhere.v ;
1085 }
519cb848
SC
1086}
1087
e766c8a9 1088void wxWindowMac::MacClientToRootWindow( int *x , int *y ) const
519cb848 1089{
1c310985
SC
1090 wxPoint origin = GetClientAreaOrigin() ;
1091 if(x) *x += origin.x ;
1092 if(y) *y += origin.y ;
14c9cbdb 1093
1c310985
SC
1094 MacWindowToRootWindow( x , y ) ;
1095}
1096
1097void wxWindowMac::MacRootWindowToClient( int *x , int *y ) const
1098{
1c310985 1099 MacRootWindowToWindow( x , y ) ;
facd6764
SC
1100
1101 wxPoint origin = GetClientAreaOrigin() ;
1c310985
SC
1102 if(x) *x -= origin.x ;
1103 if(y) *y -= origin.y ;
1104}
1105
1106void wxWindowMac::MacWindowToRootWindow( int *x , int *y ) const
1107{
facd6764
SC
1108 #if TARGET_API_MAC_OSX
1109 HIPoint pt ;
1110 if ( x ) pt.x = *x ;
1111 if ( y ) pt.y = *y ;
1112
125c7984
SC
1113 if ( !IsTopLevel() )
1114 HIViewConvertPoint( &pt , (ControlRef) m_macControl , (ControlRef) MacGetTopLevelWindow()->GetHandle() ) ;
facd6764
SC
1115
1116 if ( x ) *x = (int) pt.x ;
1117 if ( y ) *y = (int) pt.y ;
1118 #else
1c310985 1119 if ( !IsTopLevel() )
6264b550 1120 {
facd6764
SC
1121 Rect bounds ;
1122 GetControlBounds( (ControlRef) m_macControl , &bounds ) ;
1123 if(x) *x += bounds.left ;
1124 if(y) *y += bounds.top ;
6264b550 1125 }
facd6764
SC
1126#endif
1127}
1128
1129void wxWindowMac::MacWindowToRootWindow( short *x , short *y ) const
1130{
1131 int x1 , y1 ;
1132 if ( x ) x1 = *x ;
1133 if ( y ) y1 = *y ;
1134 MacWindowToRootWindow( &x1 , &y1 ) ;
1135 if ( x ) *x = x1 ;
1136 if ( y ) *y = y1 ;
519cb848
SC
1137}
1138
1c310985 1139void wxWindowMac::MacRootWindowToWindow( int *x , int *y ) const
519cb848 1140{
facd6764
SC
1141 #if TARGET_API_MAC_OSX
1142 HIPoint pt ;
1143 if ( x ) pt.x = *x ;
1144 if ( y ) pt.y = *y ;
1145
125c7984
SC
1146 if ( !IsTopLevel() )
1147 HIViewConvertPoint( &pt , (ControlRef) MacGetTopLevelWindow()->GetHandle() , (ControlRef) m_macControl ) ;
facd6764
SC
1148
1149 if ( x ) *x = (int) pt.x ;
1150 if ( y ) *y = (int) pt.y ;
1151 #else
1c310985 1152 if ( !IsTopLevel() )
6264b550 1153 {
facd6764
SC
1154 Rect bounds ;
1155 GetControlBounds( (ControlRef) m_macControl , &bounds ) ;
1156 if(x) *x -= bounds.left ;
1157 if(y) *y -= bounds.top ;
6264b550 1158 }
facd6764 1159#endif
e9576ca5
SC
1160}
1161
facd6764 1162void wxWindowMac::MacRootWindowToWindow( short *x , short *y ) const
e9576ca5 1163{
facd6764
SC
1164 int x1 , y1 ;
1165 if ( x ) x1 = *x ;
1166 if ( y ) y1 = *y ;
1167 MacRootWindowToWindow( &x1 , &y1 ) ;
1168 if ( x ) *x = x1 ;
1169 if ( y ) *y = y1 ;
1170}
6ed71b4f 1171
29281095
SC
1172void wxWindowMac::MacGetContentAreaInset( int &left , int &top , int &right , int &bottom )
1173{
1174 RgnHandle rgn = NewRgn() ;
1175 Rect content ;
1176 if ( GetControlRegion( (ControlRef) m_macControl , kControlContentMetaPart , rgn ) == noErr )
1177 {
1178 GetRegionBounds( rgn , &content ) ;
1179 DisposeRgn( rgn ) ;
1180 }
1181 else
1182 {
1183 GetControlBounds( (ControlRef) m_macControl , &content ) ;
1184 }
1185 Rect structure ;
1186 GetControlBounds( (ControlRef) m_macControl , &structure ) ;
1187#if !TARGET_API_MAC_OSX
1188 OffsetRect( &content , -structure.left , -structure.top ) ;
1189#endif
1190 left = content.left - structure.left ;
1191 top = content.top - structure.top ;
1192 right = structure.right - content.right ;
1193 bottom = structure.bottom - content.bottom ;
1194}
1195
facd6764
SC
1196wxSize wxWindowMac::DoGetSizeFromClientSize( const wxSize & size ) const
1197{
1198 wxSize sizeTotal = size;
1199
1200 RgnHandle rgn = NewRgn() ;
1201
1202 Rect content ;
1203
1204 if ( GetControlRegion( (ControlRef) m_macControl , kControlContentMetaPart , rgn ) == noErr )
6618870d 1205 {
facd6764
SC
1206 GetRegionBounds( rgn , &content ) ;
1207 DisposeRgn( rgn ) ;
6618870d
SC
1208 }
1209 else
1210 {
facd6764 1211 GetControlBounds( (ControlRef) m_macControl , &content ) ;
e40298d5 1212 }
facd6764
SC
1213 Rect structure ;
1214 GetControlBounds( (ControlRef) m_macControl , &structure ) ;
1215#if !TARGET_API_MAC_OSX
1216 OffsetRect( &content , -structure.left , -structure.top ) ;
1217#endif
6ed71b4f 1218
facd6764
SC
1219 sizeTotal.x += (structure.right - structure.left) - (content.right - content.left) ;
1220 sizeTotal.y += (structure.bottom - structure.top) - (content.bottom - content.top ) ;
6ed71b4f 1221
facd6764
SC
1222 sizeTotal.x += MacGetLeftBorderSize( ) + MacGetRightBorderSize( ) ;
1223 sizeTotal.y += MacGetTopBorderSize( ) + MacGetBottomBorderSize( ) ;
6ed71b4f 1224
facd6764 1225 return sizeTotal;
e9576ca5
SC
1226}
1227
1228
1229// Get size *available for subwindows* i.e. excluding menu bar etc.
e766c8a9 1230void wxWindowMac::DoGetClientSize(int *x, int *y) const
e9576ca5 1231{
9453cf2b 1232 int ww, hh;
6ed71b4f 1233
facd6764
SC
1234 RgnHandle rgn = NewRgn() ;
1235 Rect content ;
1236 if ( GetControlRegion( (ControlRef) m_macControl , kControlContentMetaPart , rgn ) == noErr )
1237 {
1238 GetRegionBounds( rgn , &content ) ;
1239 DisposeRgn( rgn ) ;
1240 }
1241 else
1242 {
1243 GetControlBounds( (ControlRef) m_macControl , &content ) ;
1244 }
1245#if !TARGET_API_MAC_OSX
1246 Rect structure ;
1247 GetControlBounds( (ControlRef) m_macControl , &structure ) ;
1248 OffsetRect( &content , -structure.left , -structure.top ) ;
1249#endif
1250 ww = content.right - content.left ;
1251 hh = content.bottom - content.top ;
1252
6264b550
RR
1253 ww -= MacGetLeftBorderSize( ) + MacGetRightBorderSize( ) ;
1254 hh -= MacGetTopBorderSize( ) + MacGetBottomBorderSize( );
6ed71b4f 1255
e40298d5
JS
1256 if ( (m_vScrollBar && m_vScrollBar->IsShown()) || (m_hScrollBar && m_hScrollBar->IsShown()) )
1257 {
1258 int x1 = 0 ;
1259 int y1 = 0 ;
facd6764
SC
1260 int w ;
1261 int h ;
1262 GetSize( &w , &h ) ;
1263
e40298d5
JS
1264 MacClientToRootWindow( &x1 , &y1 ) ;
1265 MacClientToRootWindow( &w , &h ) ;
6ed71b4f 1266
e40298d5 1267 wxWindowMac *iter = (wxWindowMac*)this ;
6ed71b4f 1268
e40298d5
JS
1269 int totW = 10000 , totH = 10000;
1270 while( iter )
6264b550 1271 {
e40298d5
JS
1272 if ( iter->IsTopLevel() )
1273 {
facd6764 1274 iter->GetSize( &totW , &totH ) ;
e40298d5
JS
1275 break ;
1276 }
6ed71b4f 1277
e40298d5 1278 iter = iter->GetParent() ;
6264b550 1279 }
6ed71b4f 1280
e40298d5 1281 if (m_hScrollBar && m_hScrollBar->IsShown() )
6264b550 1282 {
e40298d5
JS
1283 hh -= MAC_SCROLLBAR_SIZE;
1284 if ( h-y1 >= totH )
1285 {
1286 hh += 1 ;
1287 }
6264b550 1288 }
e40298d5 1289 if (m_vScrollBar && m_vScrollBar->IsShown() )
6264b550 1290 {
e40298d5
JS
1291 ww -= MAC_SCROLLBAR_SIZE;
1292 if ( w-x1 >= totW )
1293 {
1294 ww += 1 ;
1295 }
6264b550
RR
1296 }
1297 }
e40298d5
JS
1298 if(x) *x = ww;
1299 if(y) *y = hh;
facd6764
SC
1300
1301}
1302
1303bool wxWindowMac::SetCursor(const wxCursor& cursor)
1304{
1305 if (m_cursor == cursor)
1306 return FALSE;
1307
1308 if (wxNullCursor == cursor)
1309 {
1310 if ( ! wxWindowBase::SetCursor( *wxSTANDARD_CURSOR ) )
1311 return FALSE ;
1312 }
1313 else
1314 {
1315 if ( ! wxWindowBase::SetCursor( cursor ) )
1316 return FALSE ;
1317 }
1318
1319 wxASSERT_MSG( m_cursor.Ok(),
1320 wxT("cursor must be valid after call to the base version"));
1321
1322 /*
1323
1324 TODO why do we have to use current coordinates ?
1325
1326 Point pt ;
1327 wxWindowMac *mouseWin ;
1328 GetMouse( &pt ) ;
1329
1330 // Change the cursor NOW if we're within the correct window
1331
1332
1333 if ( MacGetWindowFromPoint( wxPoint( pt.h , pt.v ) , &mouseWin ) )
1334 {
1335 if ( mouseWin == this && !wxIsBusy() )
1336 {
1337 m_cursor.MacInstall() ;
1338 }
1339 }
1340 */
1341 if ( !wxIsBusy() )
1342 {
1343 m_cursor.MacInstall() ;
1344 }
1345
1346 return TRUE ;
519cb848
SC
1347}
1348
facd6764
SC
1349#if wxUSE_MENUS
1350bool wxWindowMac::DoPopupMenu(wxMenu *menu, int x, int y)
1351{
1352 menu->SetInvokingWindow(this);
1353 menu->UpdateUI();
1354 ClientToScreen( &x , &y ) ;
1355
1356 menu->MacBeforeDisplay( true ) ;
1357 long menuResult = ::PopUpMenuSelect((MenuHandle) menu->GetHMenu() ,y,x, 0) ;
1358 if ( HiWord(menuResult) != 0 )
1359 {
1360 MenuCommand id ;
1361 GetMenuItemCommandID( GetMenuHandle(HiWord(menuResult)) , LoWord(menuResult) , &id ) ;
1362 wxMenuItem* item = NULL ;
1363 wxMenu* realmenu ;
1364 item = menu->FindItem(id, &realmenu) ;
1365 if (item->IsCheckable())
1366 {
1367 item->Check( !item->IsChecked() ) ;
1368 }
1369 menu->SendEvent( id , item->IsCheckable() ? item->IsChecked() : -1 ) ;
1370 }
1371 menu->MacAfterDisplay( true ) ;
1372
1373 menu->SetInvokingWindow(NULL);
1374
1375 return TRUE;
1376}
1377#endif
51abe921
SC
1378
1379// ----------------------------------------------------------------------------
1380// tooltips
1381// ----------------------------------------------------------------------------
1382
1383#if wxUSE_TOOLTIPS
1384
e766c8a9 1385void wxWindowMac::DoSetToolTip(wxToolTip *tooltip)
51abe921
SC
1386{
1387 wxWindowBase::DoSetToolTip(tooltip);
6ed71b4f 1388
6264b550
RR
1389 if ( m_tooltip )
1390 m_tooltip->SetWindow(this);
51abe921
SC
1391}
1392
1393#endif // wxUSE_TOOLTIPS
1394
e766c8a9 1395void wxWindowMac::DoMoveWindow(int x, int y, int width, int height)
51abe921 1396{
facd6764
SC
1397 int former_x , former_y , former_w, former_h ;
1398#if !TARGET_API_MAC_OSX
1399 DoGetPosition( &former_x , &former_y ) ;
1400 DoGetSize( &former_w , &former_h ) ;
1401#else
1402 MacGetPositionAndSizeFromControl( former_x , former_y , former_w , former_h ) ;
1403#endif
6ed71b4f 1404
e40298d5
JS
1405 int actualWidth = width;
1406 int actualHeight = height;
1407 int actualX = x;
1408 int actualY = y;
6ed71b4f 1409
14c9cbdb 1410 if ((m_minWidth != -1) && (actualWidth < m_minWidth))
6264b550 1411 actualWidth = m_minWidth;
14c9cbdb 1412 if ((m_minHeight != -1) && (actualHeight < m_minHeight))
6264b550 1413 actualHeight = m_minHeight;
14c9cbdb 1414 if ((m_maxWidth != -1) && (actualWidth > m_maxWidth))
6264b550 1415 actualWidth = m_maxWidth;
14c9cbdb 1416 if ((m_maxHeight != -1) && (actualHeight > m_maxHeight))
6264b550 1417 actualHeight = m_maxHeight;
6ed71b4f 1418
6264b550
RR
1419 bool doMove = false ;
1420 bool doResize = false ;
6ed71b4f 1421
6264b550
RR
1422 if ( actualX != former_x || actualY != former_y )
1423 {
1424 doMove = true ;
1425 }
1426 if ( actualWidth != former_w || actualHeight != former_h )
1427 {
1428 doResize = true ;
1429 }
6ed71b4f 1430
6264b550
RR
1431 if ( doMove || doResize )
1432 {
79392158
SC
1433 // we don't adjust twice for the origin
1434 Rect r = wxMacGetBoundsForControl(this , wxPoint( actualX,actualY), wxSize( actualWidth, actualHeight ) , false ) ;
b05bf6ee 1435 bool vis = IsControlVisible( (ControlRef) m_macControl ) ;
facd6764 1436#if TARGET_API_MAC_OSX
b05bf6ee
SC
1437 // the HIViewSetFrame call itself should invalidate the areas, but when testing with the UnicodeTextCtrl it does not !
1438 if ( vis )
1439 SetControlVisibility( (ControlRef)m_macControl , false , true ) ;
1440 HIRect hir = { r.left , r.top , r.right - r.left , r.bottom - r.top } ;
1441 HIViewSetFrame ( (ControlRef) m_macControl , &hir ) ;
1442 if ( vis )
1443 SetControlVisibility( (ControlRef)m_macControl , true , true ) ;
facd6764 1444#else
b05bf6ee
SC
1445 if ( vis )
1446 SetControlVisibility( (ControlRef)m_macControl , false , true ) ;
6548fabe 1447 SetControlBounds( (ControlRef) m_macControl , &r ) ;
b05bf6ee
SC
1448 if ( vis )
1449 SetControlVisibility( (ControlRef)m_macControl , true , true ) ;
facd6764 1450#endif
6264b550
RR
1451 MacRepositionScrollBars() ;
1452 if ( doMove )
1453 {
facd6764 1454 wxPoint point(actualX,actualY);
6264b550
RR
1455 wxMoveEvent event(point, m_windowId);
1456 event.SetEventObject(this);
1457 GetEventHandler()->ProcessEvent(event) ;
1458 }
1459 if ( doResize )
1460 {
e40298d5 1461 MacRepositionScrollBars() ;
facd6764 1462 wxSize size(actualWidth, actualHeight);
e40298d5
JS
1463 wxSizeEvent event(size, m_windowId);
1464 event.SetEventObject(this);
1465 GetEventHandler()->ProcessEvent(event);
6264b550
RR
1466 }
1467 }
6ed71b4f 1468
954fc50b
SC
1469}
1470
facd6764
SC
1471wxSize wxWindowMac::DoGetBestSize() const
1472{
eb69d46e
SC
1473 if ( m_macIsUserPane || IsTopLevel() )
1474 return wxWindowBase::DoGetBestSize() ;
1475
facd6764
SC
1476 Rect bestsize = { 0 , 0 , 0 , 0 } ;
1477 short baselineoffset ;
1478 int bestWidth, bestHeight ;
1479 ::GetBestControlRect( (ControlRef) m_macControl , &bestsize , &baselineoffset ) ;
1480
1481 if ( EmptyRect( &bestsize ) )
1482 {
1483 baselineoffset = 0;
1484 bestsize.left = bestsize.top = 0 ;
1485 bestsize.right = 16 ;
1486 bestsize.bottom = 16 ;
1487 if ( IsKindOf( CLASSINFO( wxScrollBar ) ) )
1488 {
1489 bestsize.bottom = 16 ;
1490 }
1491 else if ( IsKindOf( CLASSINFO( wxSpinButton ) ) )
1492 {
1493 bestsize.bottom = 24 ;
1494 }
1495 else
1496 {
1497 // return wxWindowBase::DoGetBestSize() ;
1498 }
1499 }
1500
1501 bestWidth = bestsize.right - bestsize.left ;
1502 bestHeight = bestsize.bottom - bestsize.top ;
1503 if ( bestHeight < 10 )
1504 bestHeight = 13 ;
1505
1506 return wxSize(bestWidth, bestHeight);
eb69d46e 1507// return wxWindowBase::DoGetBestSize() ;
facd6764
SC
1508}
1509
1510
954fc50b
SC
1511// set the size of the window: if the dimensions are positive, just use them,
1512// but if any of them is equal to -1, it means that we must find the value for
1513// it ourselves (unless sizeFlags contains wxSIZE_ALLOW_MINUS_ONE flag, in
1514// which case -1 is a valid value for x and y)
1515//
1516// If sizeFlags contains wxSIZE_AUTO_WIDTH/HEIGHT flags (default), we calculate
1517// the width/height to best suit our contents, otherwise we reuse the current
1518// width/height
1519void wxWindowMac::DoSetSize(int x, int y, int width, int height, int sizeFlags)
1520{
1521 // get the current size and position...
1522 int currentX, currentY;
1523 GetPosition(&currentX, &currentY);
6ed71b4f 1524
954fc50b
SC
1525 int currentW,currentH;
1526 GetSize(&currentW, &currentH);
6ed71b4f 1527
954fc50b
SC
1528 // ... and don't do anything (avoiding flicker) if it's already ok
1529 if ( x == currentX && y == currentY &&
769ac869 1530 width == currentW && height == currentH && ( height != -1 && width != -1 ) )
954fc50b 1531 {
facd6764 1532 // TODO REMOVE
6264b550 1533 MacRepositionScrollBars() ; // we might have a real position shift
954fc50b
SC
1534 return;
1535 }
6ed71b4f 1536
954fc50b
SC
1537 if ( x == -1 && !(sizeFlags & wxSIZE_ALLOW_MINUS_ONE) )
1538 x = currentX;
1539 if ( y == -1 && !(sizeFlags & wxSIZE_ALLOW_MINUS_ONE) )
1540 y = currentY;
6ed71b4f 1541
954fc50b 1542 AdjustForParentClientOrigin(x, y, sizeFlags);
6ed71b4f 1543
954fc50b
SC
1544 wxSize size(-1, -1);
1545 if ( width == -1 )
1546 {
1547 if ( sizeFlags & wxSIZE_AUTO_WIDTH )
1548 {
1549 size = DoGetBestSize();
1550 width = size.x;
1551 }
1552 else
1553 {
1554 // just take the current one
1555 width = currentW;
1556 }
1557 }
6ed71b4f 1558
954fc50b
SC
1559 if ( height == -1 )
1560 {
1561 if ( sizeFlags & wxSIZE_AUTO_HEIGHT )
1562 {
1563 if ( size.x == -1 )
1564 {
1565 size = DoGetBestSize();
1566 }
1567 //else: already called DoGetBestSize() above
6ed71b4f 1568
954fc50b
SC
1569 height = size.y;
1570 }
1571 else
1572 {
1573 // just take the current one
1574 height = currentH;
1575 }
1576 }
6ed71b4f 1577
954fc50b 1578 DoMoveWindow(x, y, width, height);
6ed71b4f 1579
e9576ca5 1580}
519cb848 1581
e766c8a9 1582wxPoint wxWindowMac::GetClientAreaOrigin() const
e9576ca5 1583{
facd6764
SC
1584 RgnHandle rgn = NewRgn() ;
1585 Rect content ;
1586 GetControlRegion( (ControlRef) m_macControl , kControlContentMetaPart , rgn ) ;
1587 GetRegionBounds( rgn , &content ) ;
1588 DisposeRgn( rgn ) ;
1589#if !TARGET_API_MAC_OSX
736fac3a
SC
1590 // if the content rgn is empty / not supported
1591 // don't attempt to correct the coordinates to wxWindow relative ones
1592 if (!::EmptyRect( &content ) )
1593 {
1594 Rect structure ;
1595 GetControlBounds( (ControlRef) m_macControl , &structure ) ;
1596 OffsetRect( &content , -structure.left , -structure.top ) ;
1597 }
facd6764
SC
1598#endif
1599
1600 return wxPoint( content.left + MacGetLeftBorderSize( ) , content.top + MacGetTopBorderSize( ) );
1601}
1602
1603void wxWindowMac::DoSetClientSize(int clientwidth, int clientheight)
1604{
1605 if ( clientheight != -1 || clientheight != -1 )
1606 {
1607 int currentclientwidth , currentclientheight ;
1608 int currentwidth , currentheight ;
1609
1610 GetClientSize( &currentclientwidth , &currentclientheight ) ;
1611 GetSize( &currentwidth , &currentheight ) ;
1612
1613 DoSetSize( -1 , -1 , currentwidth + clientwidth - currentclientwidth ,
1614 currentheight + clientheight - currentclientheight , wxSIZE_USE_EXISTING ) ;
1615 }
e9576ca5
SC
1616}
1617
d84afea9 1618void wxWindowMac::SetTitle(const wxString& title)
e9576ca5 1619{
facd6764
SC
1620 m_label = wxStripMenuCodes(title) ;
1621
1622 if ( m_macControl )
1623 {
1624 UMASetControlTitle( (ControlRef) m_macControl , m_label , m_font.GetEncoding() ) ;
1625 }
1626 Refresh() ;
519cb848
SC
1627}
1628
d84afea9 1629wxString wxWindowMac::GetTitle() const
519cb848 1630{
ed60b502 1631 return m_label ;
519cb848
SC
1632}
1633
8ab50549
SC
1634bool wxWindowMac::Show(bool show)
1635{
1636 if ( !wxWindowBase::Show(show) )
1637 return FALSE;
1638
1639 // TODO use visibilityChanged Carbon Event for OSX
1640 bool former = MacIsReallyShown() ;
1641
1642 SetControlVisibility( (ControlRef) m_macControl , show , true ) ;
1643 if ( former != MacIsReallyShown() )
1644 MacPropagateVisibilityChanged() ;
1645 return TRUE;
1646}
1647
1648bool wxWindowMac::Enable(bool enable)
1649{
1650 wxASSERT( m_macControl != NULL ) ;
1651 if ( !wxWindowBase::Enable(enable) )
1652 return FALSE;
1653
1654 bool former = MacIsReallyEnabled() ;
1d3216f7 1655#if TARGET_API_MAC_OSX
8ab50549
SC
1656 if ( enable )
1657 EnableControl( (ControlRef) m_macControl ) ;
1658 else
1659 DisableControl( (ControlRef) m_macControl ) ;
1d3216f7
SC
1660#else
1661 if ( enable )
1662 ActivateControl( (ControlRef) m_macControl ) ;
1663 else
1664 DeactivateControl( (ControlRef) m_macControl ) ;
1665#endif
8ab50549
SC
1666
1667 if ( former != MacIsReallyEnabled() )
1668 MacPropagateEnabledStateChanged() ;
1669 return TRUE;
1670}
1671
1672//
1673// status change propagations (will be not necessary for OSX later )
1674//
1675
facd6764
SC
1676void wxWindowMac::MacPropagateVisibilityChanged()
1677{
73fe67bd 1678#if !TARGET_API_MAC_OSX
facd6764
SC
1679 MacVisibilityChanged() ;
1680
1681 wxWindowListNode *node = GetChildren().GetFirst();
1682 while ( node )
1683 {
1684 wxWindowMac *child = node->GetData();
1685 if ( child->IsShown() )
1686 child->MacPropagateVisibilityChanged( ) ;
1687 node = node->GetNext();
1688 }
73fe67bd 1689#endif
facd6764
SC
1690}
1691
8ab50549 1692void wxWindowMac::MacPropagateEnabledStateChanged( )
e9576ca5 1693{
73fe67bd 1694#if !TARGET_API_MAC_OSX
8ab50549 1695 MacEnabledStateChanged() ;
facd6764 1696
8ab50549
SC
1697 wxWindowListNode *node = GetChildren().GetFirst();
1698 while ( node )
1699 {
1700 wxWindowMac *child = node->GetData();
1701 if ( child->IsEnabled() )
1702 child->MacPropagateEnabledStateChanged() ;
1703 node = node->GetNext();
1704 }
73fe67bd 1705#endif
8ab50549
SC
1706}
1707
1708void wxWindowMac::MacPropagateHiliteChanged( )
1709{
73fe67bd 1710#if !TARGET_API_MAC_OSX
8ab50549 1711 MacHiliteChanged() ;
facd6764 1712
8ab50549
SC
1713 wxWindowListNode *node = GetChildren().GetFirst();
1714 while ( node )
1715 {
1716 wxWindowMac *child = node->GetData();
1717 // if ( child->IsEnabled() )
1718 child->MacPropagateHiliteChanged() ;
1719 node = node->GetNext();
1720 }
73fe67bd 1721#endif
8ab50549
SC
1722}
1723
1724//
1725// status change notifications
1726//
1727
1728void wxWindowMac::MacVisibilityChanged()
1729{
1730}
1731
1732void wxWindowMac::MacHiliteChanged()
1733{
1734}
1735
1736void wxWindowMac::MacEnabledStateChanged()
1737{
facd6764 1738}
e7549107 1739
8ab50549
SC
1740//
1741// status queries on the inherited window's state
1742//
1743
facd6764
SC
1744bool wxWindowMac::MacIsReallyShown()
1745{
1746 // only under OSX the visibility of the TLW is taken into account
1747#if TARGET_API_MAC_OSX
1748 return IsControlVisible( (ControlRef) m_macControl ) ;
1749#else
1750 wxWindow* win = this ;
1751 while( win->IsShown() )
1752 {
1753 if ( win->IsTopLevel() )
1754 return true ;
1755
1756 win = win->GetParent() ;
1757 if ( win == NULL )
1758 return true ;
1759
1760 } ;
1761 return false ;
1762#endif
1763}
4241baae 1764
facd6764
SC
1765bool wxWindowMac::MacIsReallyEnabled()
1766{
1d3216f7 1767#if TARGET_API_MAC_OSX
facd6764 1768 return IsControlEnabled( (ControlRef) m_macControl ) ;
1d3216f7
SC
1769#else
1770 return IsControlActive( (ControlRef) m_macControl ) ;
1771#endif
facd6764
SC
1772}
1773
8ab50549 1774bool wxWindowMac::MacIsReallyHilited()
c809f3be 1775{
8ab50549 1776 return IsControlActive( (ControlRef) m_macControl ) ;
c809f3be
SC
1777}
1778
8ab50549
SC
1779//
1780//
1781//
1782
e766c8a9 1783int wxWindowMac::GetCharHeight() const
e9576ca5 1784{
6264b550
RR
1785 wxClientDC dc ( (wxWindowMac*)this ) ;
1786 return dc.GetCharHeight() ;
e9576ca5
SC
1787}
1788
e766c8a9 1789int wxWindowMac::GetCharWidth() const
e9576ca5 1790{
6264b550
RR
1791 wxClientDC dc ( (wxWindowMac*)this ) ;
1792 return dc.GetCharWidth() ;
e9576ca5
SC
1793}
1794
e766c8a9 1795void wxWindowMac::GetTextExtent(const wxString& string, int *x, int *y,
e7549107 1796 int *descent, int *externalLeading, const wxFont *theFont ) const
e9576ca5 1797{
e7549107
SC
1798 const wxFont *fontToUse = theFont;
1799 if ( !fontToUse )
1800 fontToUse = &m_font;
14c9cbdb 1801
e766c8a9 1802 wxClientDC dc( (wxWindowMac*) this ) ;
7c74e7fe 1803 long lx,ly,ld,le ;
5fde6fcc 1804 dc.GetTextExtent( string , &lx , &ly , &ld, &le, (wxFont *)fontToUse ) ;
2f1ae414 1805 if ( externalLeading )
6264b550 1806 *externalLeading = le ;
2f1ae414 1807 if ( descent )
6264b550 1808 *descent = ld ;
2f1ae414 1809 if ( x )
6264b550 1810 *x = lx ;
2f1ae414 1811 if ( y )
6264b550 1812 *y = ly ;
e9576ca5
SC
1813}
1814
0a67a93b 1815/*
14c9cbdb 1816 * Rect is given in client coordinates, for further reading, read wxTopLevelWindowMac::InvalidateRect
1c310985
SC
1817 * we always intersect with the entire window, not only with the client area
1818 */
14c9cbdb 1819
e766c8a9 1820void wxWindowMac::Refresh(bool eraseBack, const wxRect *rect)
e9576ca5 1821{
facd6764 1822#if TARGET_API_MAC_OSX
1e8cde71
SC
1823 if ( rect == NULL )
1824 HIViewSetNeedsDisplay( (ControlRef) m_macControl , true ) ;
1825 else
1826 {
1827 RgnHandle update = NewRgn() ;
1828 SetRectRgn( update , rect->x , rect->y , rect->x + rect->width , rect->y + rect->height ) ;
84f6927e
SC
1829 SectRgn( (RgnHandle) MacGetVisibleRegion().GetWXHRGN() , update , update ) ;
1830 wxPoint origin = GetClientAreaOrigin() ;
1831 OffsetRgn( update, origin.x , origin.y ) ;
1e8cde71
SC
1832 HIViewSetNeedsDisplayInRegion( (ControlRef) m_macControl , update , true ) ;
1833 }
facd6764 1834#else
a9825a9b
SC
1835/*
1836 RgnHandle updateRgn = NewRgn() ;
1837 if ( rect == NULL )
1838 {
1839 CopyRgn( (RgnHandle) MacGetVisibleRegion().GetWXHRGN() , updateRgn ) ;
1840 }
1841 else
1842 {
1843 SetRectRgn( updateRgn , rect->x , rect->y , rect->x + rect->width , rect->y + rect->height ) ;
1844 SectRgn( (RgnHandle) MacGetVisibleRegion().GetWXHRGN() , updateRgn , updateRgn ) ;
1845 }
1846 InvalWindowRgn( (WindowRef) MacGetTopLevelWindowRef() , updateRgn ) ;
1847 DisposeRgn(updateRgn) ;
1848*/
facd6764
SC
1849 if ( IsControlVisible( (ControlRef) m_macControl ) )
1850 {
1851 SetControlVisibility( (ControlRef) m_macControl , false , false ) ;
1852 SetControlVisibility( (ControlRef) m_macControl , true , true ) ;
1853 }
1854 /*
94abc21f 1855 if ( MacGetTopLevelWindow() == NULL )
9a456218 1856 return ;
14c9cbdb 1857
facd6764 1858 if ( !IsControlVisible( (ControlRef) m_macControl ) )
c3a05e8a
SC
1859 return ;
1860
1861 wxPoint client = GetClientAreaOrigin();
9a456218
RR
1862 int x1 = -client.x;
1863 int y1 = -client.y;
1864 int x2 = m_width - client.x;
1865 int y2 = m_height - client.y;
1866
1867 if (IsKindOf( CLASSINFO(wxButton)))
1868 {
1869 // buttons have an "aura"
1870 y1 -= 5;
1871 x1 -= 5;
1872 y2 += 5;
1873 x2 += 5;
1874 }
1875
1876 Rect clientrect = { y1, x1, y2, x2 };
14c9cbdb 1877
1c310985 1878 if ( rect )
6264b550 1879 {
1c310985 1880 Rect r = { rect->y , rect->x , rect->y + rect->height , rect->x + rect->width } ;
14c9cbdb 1881 SectRect( &clientrect , &r , &clientrect ) ;
6264b550 1882 }
14c9cbdb 1883
1c310985 1884 if ( !EmptyRect( &clientrect ) )
e9576ca5 1885 {
1c310985 1886 int top = 0 , left = 0 ;
14c9cbdb 1887
1c310985
SC
1888 MacClientToRootWindow( &left , &top ) ;
1889 OffsetRect( &clientrect , left , top ) ;
14c9cbdb 1890
1c310985 1891 MacGetTopLevelWindow()->MacInvalidate( &clientrect , eraseBack ) ;
e9576ca5 1892 }
facd6764
SC
1893 */
1894#endif
1895}
1896
79392158
SC
1897void wxWindowMac::Freeze()
1898{
1899#if TARGET_API_MAC_OSX
1900 if ( !m_frozenness++ )
1901 {
1902 HIViewSetDrawingEnabled( (HIViewRef) m_macControl , false ) ;
1903 }
1904#endif
1905}
1906
b175b96b
SC
1907#if TARGET_API_MAC_OSX
1908static void InvalidateControlAndChildren( HIViewRef control )
1909{
1910 HIViewSetNeedsDisplay( control , true ) ;
1911 UInt16 childrenCount = 0 ;
1912 OSStatus err = CountSubControls( control , &childrenCount ) ;
1913 if ( err == errControlIsNotEmbedder )
1914 return ;
1915 wxASSERT_MSG( err == noErr , wxT("Unexpected error when accessing subcontrols") ) ;
1916
1917 for ( UInt16 i = childrenCount ; i >=1 ; --i )
1918 {
1919 HIViewRef child ;
1920 err = GetIndexedSubControl( control , i , & child ) ;
1921 if ( err == errControlIsNotEmbedder )
1922 return ;
1923 InvalidateControlAndChildren( child ) ;
1924 }
1925}
1926#endif
1927
79392158
SC
1928void wxWindowMac::Thaw()
1929{
1930#if TARGET_API_MAC_OSX
1931 wxASSERT_MSG( m_frozenness > 0, _T("Thaw() without matching Freeze()") );
1932
1933 if ( !--m_frozenness )
1934 {
1935 HIViewSetDrawingEnabled( (HIViewRef) m_macControl , true ) ;
b175b96b
SC
1936 InvalidateControlAndChildren( (HIViewRef) m_macControl ) ;
1937 // HIViewSetNeedsDisplay( (HIViewRef) m_macControl , true ) ;
79392158
SC
1938 }
1939#endif
1940}
1941
facd6764
SC
1942void wxWindowMac::MacRedrawControl()
1943{
1944/*
1945 if ( (ControlRef) m_macControl && MacGetTopLevelWindowRef() && IsControlVisible( (ControlRef) m_macControl ) )
1946 {
1947#if TARGET_API_MAC_CARBON
1948 Update() ;
1949#else
1950 wxClientDC dc(this) ;
1951 wxMacPortSetter helper(&dc) ;
1952 wxMacWindowClipper clipper(this) ;
1953 wxDC::MacSetupBackgroundForCurrentPort( MacGetBackgroundBrush() ) ;
1954 UMADrawControl( (ControlRef) m_macControl ) ;
1955#endif
1956 }
1957*/
1958}
1959
1960/* TODO
1961void wxWindowMac::OnPaint(wxPaintEvent& event)
1962{
1963 // why don't we skip that here ?
e9576ca5 1964}
facd6764 1965*/
e9576ca5 1966
e766c8a9 1967wxWindowMac *wxGetActiveWindow()
e9576ca5 1968{
519cb848 1969 // actually this is a windows-only concept
e9576ca5
SC
1970 return NULL;
1971}
1972
e9576ca5 1973// Coordinates relative to the window
e766c8a9 1974void wxWindowMac::WarpPointer (int x_pos, int y_pos)
e9576ca5 1975{
e40298d5 1976 // We really don't move the mouse programmatically under Mac.
e9576ca5
SC
1977}
1978
facd6764 1979void wxWindowMac::OnEraseBackground(wxEraseEvent& event)
e9576ca5 1980{
facd6764 1981 if ( m_macBackgroundBrush.Ok() == false || m_macBackgroundBrush.GetStyle() == wxTRANSPARENT )
94abc21f 1982 {
facd6764 1983 event.Skip() ;
94abc21f
SC
1984 }
1985 else
facd6764 1986 event.GetDC()->Clear() ;
1c310985
SC
1987}
1988
1989void wxWindowMac::OnNcPaint( wxNcPaintEvent& event )
1990{
de043984
SC
1991 wxWindowDC dc(this) ;
1992 wxMacPortSetter helper(&dc) ;
14c9cbdb 1993
76a5e5d2 1994 MacPaintBorders( dc.m_macLocalOrigin.x , dc.m_macLocalOrigin.y) ;
e9576ca5
SC
1995}
1996
e766c8a9 1997int wxWindowMac::GetScrollPos(int orient) const
e9576ca5 1998{
1c310985
SC
1999 if ( orient == wxHORIZONTAL )
2000 {
2001 if ( m_hScrollBar )
2002 return m_hScrollBar->GetThumbPosition() ;
2003 }
2004 else
2005 {
2006 if ( m_vScrollBar )
2007 return m_vScrollBar->GetThumbPosition() ;
2008 }
e9576ca5
SC
2009 return 0;
2010}
2011
2012// This now returns the whole range, not just the number
2013// of positions that we can scroll.
e766c8a9 2014int wxWindowMac::GetScrollRange(int orient) const
e9576ca5 2015{
1c310985
SC
2016 if ( orient == wxHORIZONTAL )
2017 {
2018 if ( m_hScrollBar )
2019 return m_hScrollBar->GetRange() ;
2020 }
2021 else
2022 {
2023 if ( m_vScrollBar )
2024 return m_vScrollBar->GetRange() ;
2025 }
e9576ca5
SC
2026 return 0;
2027}
2028
e766c8a9 2029int wxWindowMac::GetScrollThumb(int orient) const
e9576ca5 2030{
1c310985
SC
2031 if ( orient == wxHORIZONTAL )
2032 {
2033 if ( m_hScrollBar )
2034 return m_hScrollBar->GetThumbSize() ;
2035 }
2036 else
2037 {
2038 if ( m_vScrollBar )
2039 return m_vScrollBar->GetThumbSize() ;
2040 }
e9576ca5
SC
2041 return 0;
2042}
2043
e766c8a9 2044void wxWindowMac::SetScrollPos(int orient, int pos, bool refresh)
e9576ca5 2045{
1c310985 2046 if ( orient == wxHORIZONTAL )
6264b550 2047 {
1c310985
SC
2048 if ( m_hScrollBar )
2049 m_hScrollBar->SetThumbPosition( pos ) ;
6264b550
RR
2050 }
2051 else
2052 {
1c310985
SC
2053 if ( m_vScrollBar )
2054 m_vScrollBar->SetThumbPosition( pos ) ;
6264b550 2055 }
2f1ae414
SC
2056}
2057
14c9cbdb 2058void wxWindowMac::MacPaintBorders( int left , int top )
2f1ae414 2059{
1c310985 2060 if( IsTopLevel() )
6264b550 2061 return ;
11d1adbf
SC
2062
2063 int major,minor;
2064 wxGetOsVersion( &major, &minor );
14c9cbdb 2065
6264b550 2066 RGBColor white = { 0xFFFF, 0xFFFF , 0xFFFF } ;
6264b550 2067 RGBColor face = { 0xDDDD, 0xDDDD , 0xDDDD } ;
11d1adbf
SC
2068
2069 RGBColor darkShadow = { 0x0000, 0x0000 , 0x0000 } ;
2070 RGBColor lightShadow = { 0x4444, 0x4444 , 0x4444 } ;
2071 // OS X has lighter border edges than classic:
2072 if (major >= 10)
2073 {
2074 darkShadow.red = 0x8E8E;
2075 darkShadow.green = 0x8E8E;
2076 darkShadow.blue = 0x8E8E;
2077 lightShadow.red = 0xBDBD;
2078 lightShadow.green = 0xBDBD;
2079 lightShadow.blue = 0xBDBD;
2080 }
2081
6264b550 2082 PenNormal() ;
2f1ae414 2083
facd6764
SC
2084 int w , h ;
2085 GetSize( &w , &h ) ;
2f1ae414
SC
2086 if (HasFlag(wxRAISED_BORDER) || HasFlag( wxSUNKEN_BORDER) || HasFlag(wxDOUBLE_BORDER) )
2087 {
1c310985 2088#if wxMAC_USE_THEME_BORDER
11d1adbf
SC
2089 Rect rect = { top , left , m_height + top , m_width + left } ;
2090 SInt32 border = 0 ;
2091 /*
2092 GetThemeMetric( kThemeMetricListBoxFrameOutset , &border ) ;
2093 InsetRect( &rect , border , border );
2094 DrawThemeListBoxFrame(&rect,IsEnabled() ? kThemeStateActive : kThemeStateInactive) ;
2095 */
14c9cbdb 2096
1c310985
SC
2097 DrawThemePrimaryGroup(&rect ,IsEnabled() ? kThemeStateActive : kThemeStateInactive) ;
2098#else
ed60b502 2099 bool sunken = HasFlag( wxSUNKEN_BORDER ) ;
653b2449 2100 RGBForeColor( &face );
facd6764 2101 MoveTo( left + 0 , top + h - 2 );
7d9d1fd7 2102 LineTo( left + 0 , top + 0 );
facd6764 2103 LineTo( left + w - 2 , top + 0 );
653b2449 2104
facd6764
SC
2105 MoveTo( left + 2 , top + h - 3 );
2106 LineTo( left + w - 3 , top + h - 3 );
2107 LineTo( left + w - 3 , top + 2 );
653b2449 2108
11d1adbf 2109 RGBForeColor( sunken ? &face : &darkShadow );
facd6764
SC
2110 MoveTo( left + 0 , top + h - 1 );
2111 LineTo( left + w - 1 , top + h - 1 );
2112 LineTo( left + w - 1 , top + 0 );
653b2449 2113
11d1adbf 2114 RGBForeColor( sunken ? &lightShadow : &white );
facd6764 2115 MoveTo( left + 1 , top + h - 3 );
7d9d1fd7 2116 LineTo( left + 1, top + 1 );
facd6764 2117 LineTo( left + w - 3 , top + 1 );
653b2449 2118
11d1adbf 2119 RGBForeColor( sunken ? &white : &lightShadow );
facd6764
SC
2120 MoveTo( left + 1 , top + h - 2 );
2121 LineTo( left + w - 2 , top + h - 2 );
2122 LineTo( left + w - 2 , top + 1 );
653b2449 2123
11d1adbf 2124 RGBForeColor( sunken ? &darkShadow : &face );
facd6764 2125 MoveTo( left + 2 , top + h - 4 );
7d9d1fd7 2126 LineTo( left + 2 , top + 2 );
facd6764 2127 LineTo( left + w - 4 , top + 2 );
1c310985 2128#endif
8208e181
SC
2129 }
2130 else if (HasFlag(wxSIMPLE_BORDER))
2131 {
facd6764 2132 Rect rect = { top , left , h + top , w + left } ;
11d1adbf 2133 RGBForeColor( &darkShadow ) ;
6264b550 2134 FrameRect( &rect ) ;
2f1ae414 2135 }
8208e181
SC
2136}
2137
abda5788
SC
2138void wxWindowMac::RemoveChild( wxWindowBase *child )
2139{
2140 if ( child == m_hScrollBar )
2141 m_hScrollBar = NULL ;
2142 if ( child == m_vScrollBar )
2143 m_vScrollBar = NULL ;
14c9cbdb 2144
abda5788
SC
2145 wxWindowBase::RemoveChild( child ) ;
2146}
2147
e9576ca5 2148// New function that will replace some of the above.
e766c8a9 2149void wxWindowMac::SetScrollbar(int orient, int pos, int thumbVisible,
e9576ca5
SC
2150 int range, bool refresh)
2151{
e40298d5
JS
2152 if ( orient == wxHORIZONTAL )
2153 {
2154 if ( m_hScrollBar )
6264b550 2155 {
e40298d5 2156 if ( range == 0 || thumbVisible >= range )
6264b550 2157 {
e40298d5
JS
2158 if ( m_hScrollBar->IsShown() )
2159 m_hScrollBar->Show(false) ;
2160 }
2161 else
2162 {
2163 if ( !m_hScrollBar->IsShown() )
2164 m_hScrollBar->Show(true) ;
2165 m_hScrollBar->SetScrollbar( pos , thumbVisible , range , thumbVisible , refresh ) ;
6264b550
RR
2166 }
2167 }
e40298d5
JS
2168 }
2169 else
2170 {
2171 if ( m_vScrollBar )
6264b550 2172 {
e40298d5 2173 if ( range == 0 || thumbVisible >= range )
6264b550 2174 {
e40298d5
JS
2175 if ( m_vScrollBar->IsShown() )
2176 m_vScrollBar->Show(false) ;
2177 }
2178 else
2179 {
2180 if ( !m_vScrollBar->IsShown() )
2181 m_vScrollBar->Show(true) ;
2182 m_vScrollBar->SetScrollbar( pos , thumbVisible , range , thumbVisible , refresh ) ;
6264b550
RR
2183 }
2184 }
e40298d5
JS
2185 }
2186 MacRepositionScrollBars() ;
e9576ca5
SC
2187}
2188
2189// Does a physical scroll
e766c8a9 2190void wxWindowMac::ScrollWindow(int dx, int dy, const wxRect *rect)
e9576ca5 2191{
ba87f54c
SC
2192 if( dx == 0 && dy ==0 )
2193 return ;
2194
6ed71b4f 2195
6264b550 2196 {
fe779e40
SC
2197 wxClientDC dc(this) ;
2198 wxMacPortSetter helper(&dc) ;
2199
6264b550
RR
2200 int width , height ;
2201 GetClientSize( &width , &height ) ;
6ed71b4f 2202
facd6764
SC
2203
2204 wxPoint pos;
2205 pos.x = pos.y = 0;
2206
2207 Rect scrollrect;
2208 // TODO take out the boundaries
2209 GetControlBounds( (ControlRef) m_macControl, &scrollrect);
2210
6264b550 2211 RgnHandle updateRgn = NewRgn() ;
6264b550
RR
2212 if ( rect )
2213 {
14c9cbdb 2214 Rect r = { dc.YLOG2DEVMAC(rect->y) , dc.XLOG2DEVMAC(rect->x) , dc.YLOG2DEVMAC(rect->y + rect->height) ,
e40298d5 2215 dc.XLOG2DEVMAC(rect->x + rect->width) } ;
14c9cbdb 2216 SectRect( &scrollrect , &r , &scrollrect ) ;
6264b550
RR
2217 }
2218 ScrollRect( &scrollrect , dx , dy , updateRgn ) ;
facd6764
SC
2219#if TARGET_CARBON
2220 //KO: The docs say ScrollRect creates an update region, which thus calls an update event
2221 // but it seems the update only refreshes the background of the control, rather than calling
2222 // kEventControlDraw, so we need to force a proper update here. There has to be a better
2223 // way of doing this... (Note that code below under !TARGET_CARBON does not work either...)
2224 Update();
2225#endif
ba87f54c
SC
2226 // we also have to scroll the update rgn in this rectangle
2227 // in order not to loose updates
facd6764
SC
2228#if !TARGET_CARBON
2229 WindowRef rootWindow = (WindowRef) MacGetTopLevelWindowRef() ;
ba87f54c
SC
2230 RgnHandle formerUpdateRgn = NewRgn() ;
2231 RgnHandle scrollRgn = NewRgn() ;
2232 RectRgn( scrollRgn , &scrollrect ) ;
2233 GetWindowUpdateRgn( rootWindow , formerUpdateRgn ) ;
2234 Point pt = {0,0} ;
2235 LocalToGlobal( &pt ) ;
fe779e40 2236 OffsetRgn( formerUpdateRgn , -pt.h , -pt.v ) ;
ba87f54c
SC
2237 SectRgn( formerUpdateRgn , scrollRgn , formerUpdateRgn ) ;
2238 if ( !EmptyRgn( formerUpdateRgn ) )
2239 {
2240 MacOffsetRgn( formerUpdateRgn , dx , dy ) ;
2241 SectRgn( formerUpdateRgn , scrollRgn , formerUpdateRgn ) ;
2242 InvalWindowRgn(rootWindow , formerUpdateRgn ) ;
2243 }
2244 InvalWindowRgn(rootWindow , updateRgn ) ;
6264b550 2245 DisposeRgn( updateRgn ) ;
ba87f54c
SC
2246 DisposeRgn( formerUpdateRgn ) ;
2247 DisposeRgn( scrollRgn ) ;
facd6764 2248#endif
6264b550 2249 }
6ed71b4f 2250
eb22f2a6 2251 for (wxWindowListNode *node = GetChildren().GetFirst(); node; node = node->GetNext())
6264b550 2252 {
9bd1404d 2253 wxWindowMac *child = node->GetData();
6264b550
RR
2254 if (child == m_vScrollBar) continue;
2255 if (child == m_hScrollBar) continue;
2256 if (child->IsTopLevel()) continue;
6ed71b4f 2257
6264b550
RR
2258 int x,y;
2259 child->GetPosition( &x, &y );
2260 int w,h;
2261 child->GetSize( &w, &h );
00f55394
SC
2262 if (rect)
2263 {
2264 wxRect rc(x,y,w,h);
2265 if (rect->Intersects(rc))
2266 child->SetSize( x+dx, y+dy, w, h );
2267 }
2268 else
2269 {
2270 child->SetSize( x+dx, y+dy, w, h );
2271 }
6264b550 2272 }
ba87f54c 2273
facd6764 2274// TODO remove, was moved higher up Update() ;
6ed71b4f 2275
e9576ca5
SC
2276}
2277
e766c8a9 2278void wxWindowMac::MacOnScroll(wxScrollEvent &event )
7c74e7fe 2279{
6264b550
RR
2280 if ( event.m_eventObject == m_vScrollBar || event.m_eventObject == m_hScrollBar )
2281 {
2282 wxScrollWinEvent wevent;
2283 wevent.SetPosition(event.GetPosition());
2284 wevent.SetOrientation(event.GetOrientation());
2285 wevent.m_eventObject = this;
6ed71b4f
VZ
2286
2287 if (event.m_eventType == wxEVT_SCROLL_TOP)
6264b550 2288 wevent.m_eventType = wxEVT_SCROLLWIN_TOP;
6ed71b4f
VZ
2289 else if (event.m_eventType == wxEVT_SCROLL_BOTTOM)
2290 wevent.m_eventType = wxEVT_SCROLLWIN_BOTTOM;
2291 else if (event.m_eventType == wxEVT_SCROLL_LINEUP)
2292 wevent.m_eventType = wxEVT_SCROLLWIN_LINEUP;
2293 else if (event.m_eventType == wxEVT_SCROLL_LINEDOWN)
2294 wevent.m_eventType = wxEVT_SCROLLWIN_LINEDOWN;
2295 else if (event.m_eventType == wxEVT_SCROLL_PAGEUP)
2296 wevent.m_eventType = wxEVT_SCROLLWIN_PAGEUP;
2297 else if (event.m_eventType == wxEVT_SCROLL_PAGEDOWN)
2298 wevent.m_eventType = wxEVT_SCROLLWIN_PAGEDOWN;
2299 else if (event.m_eventType == wxEVT_SCROLL_THUMBTRACK)
2300 wevent.m_eventType = wxEVT_SCROLLWIN_THUMBTRACK;
2301 else if (event.m_eventType == wxEVT_SCROLL_THUMBRELEASE)
2302 wevent.m_eventType = wxEVT_SCROLLWIN_THUMBRELEASE;
2303
2304 GetEventHandler()->ProcessEvent(wevent);
7c74e7fe
SC
2305 }
2306}
2307
e9576ca5 2308// Get the window with the focus
e766c8a9 2309wxWindowMac *wxWindowBase::FindFocus()
e9576ca5 2310{
f1d527c1
SC
2311 ControlRef control ;
2312 GetKeyboardFocus( GetUserFocusWindow() , &control ) ;
2313 return wxFindControlFromMacControl( control ) ;
519cb848
SC
2314}
2315
e766c8a9 2316void wxWindowMac::OnSetFocus(wxFocusEvent& event)
7810c95b
SC
2317{
2318 // panel wants to track the window which was the last to have focus in it,
2319 // so we want to set ourselves as the window which last had focus
2320 //
2321 // notice that it's also important to do it upwards the tree becaus
2322 // otherwise when the top level panel gets focus, it won't set it back to
2323 // us, but to some other sibling
6ed71b4f 2324
c1fb8167
SC
2325 // CS:don't know if this is still needed:
2326 //wxChildFocusEvent eventFocus(this);
2327 //(void)GetEventHandler()->ProcessEvent(eventFocus);
7810c95b
SC
2328
2329 event.Skip();
2330}
2331
e39af974 2332void wxWindowMac::OnInternalIdle()
e9576ca5 2333{
e9576ca5
SC
2334 // This calls the UI-update mechanism (querying windows for
2335 // menu/toolbar/control state information)
e39af974
JS
2336 if (wxUpdateUIEvent::CanUpdate(this))
2337 UpdateWindowUI(wxUPDATE_UI_FROMIDLE);
e9576ca5
SC
2338}
2339
2340// Raise the window to the top of the Z order
e766c8a9 2341void wxWindowMac::Raise()
e9576ca5 2342{
6548fabe
SC
2343#if TARGET_API_MAC_OSX
2344 HIViewSetZOrder((ControlRef)m_macControl,kHIViewZOrderAbove, NULL) ;
2345#endif
e9576ca5
SC
2346}
2347
2348// Lower the window to the bottom of the Z order
e766c8a9 2349void wxWindowMac::Lower()
e9576ca5 2350{
6548fabe
SC
2351#if TARGET_API_MAC_OSX
2352 HIViewSetZOrder((ControlRef)m_macControl,kHIViewZOrderBelow, NULL) ;
2353#endif
e9576ca5
SC
2354}
2355
6ed71b4f 2356
facd6764 2357// static wxWindow *gs_lastWhich = NULL;
519cb848 2358
7de59551 2359bool wxWindowMac::MacSetupCursor( const wxPoint& pt)
467e3168
SC
2360{
2361 // first trigger a set cursor event
6ed71b4f 2362
467e3168
SC
2363 wxPoint clientorigin = GetClientAreaOrigin() ;
2364 wxSize clientsize = GetClientSize() ;
2365 wxCursor cursor ;
2366 if ( wxRect2DInt( clientorigin.x , clientorigin.y , clientsize.x , clientsize.y ).Contains( wxPoint2DInt( pt ) ) )
7de59551 2367 {
467e3168 2368 wxSetCursorEvent event( pt.x , pt.y );
6ed71b4f 2369
467e3168
SC
2370 bool processedEvtSetCursor = GetEventHandler()->ProcessEvent(event);
2371 if ( processedEvtSetCursor && event.HasCursor() )
2372 {
e40298d5 2373 cursor = event.GetCursor() ;
467e3168
SC
2374 }
2375 else
2376 {
6ed71b4f 2377
467e3168
SC
2378 // the test for processedEvtSetCursor is here to prevent using m_cursor
2379 // if the user code caught EVT_SET_CURSOR() and returned nothing from
2380 // it - this is a way to say that our cursor shouldn't be used for this
2381 // point
2382 if ( !processedEvtSetCursor && m_cursor.Ok() )
2383 {
2384 cursor = m_cursor ;
2385 }
2386 if ( wxIsBusy() )
2387 {
2388 }
2389 else
2390 {
2391 if ( !GetParent() )
2392 cursor = *wxSTANDARD_CURSOR ;
2393 }
2394 }
2395 if ( cursor.Ok() )
2396 cursor.MacInstall() ;
2397 }
2398 return cursor.Ok() ;
2399}
2400
e766c8a9 2401wxString wxWindowMac::MacGetToolTipString( wxPoint &pt )
2f1ae414 2402{
6264b550
RR
2403 if ( m_tooltip )
2404 {
2405 return m_tooltip->GetTip() ;
2406 }
427ff662 2407 return wxEmptyString ;
2f1ae414 2408}
6264b550 2409
1c310985 2410void wxWindowMac::Update()
519cb848 2411{
facd6764
SC
2412#if TARGET_API_MAC_OSX
2413 HIViewSetNeedsDisplay( (ControlRef) m_macControl , true ) ;
2414#else
2415 ::Draw1Control( (ControlRef) m_macControl ) ;
bec721ec 2416#endif
519cb848
SC
2417}
2418
14c9cbdb 2419wxTopLevelWindowMac* wxWindowMac::MacGetTopLevelWindow() const
519cb848 2420{
1c310985 2421 wxTopLevelWindowMac* win = NULL ;
facd6764 2422 WindowRef window = (WindowRef) MacGetTopLevelWindowRef() ;
1c310985 2423 if ( window )
6264b550 2424 {
1c310985 2425 win = wxFindWinFromMacWindow( window ) ;
14c9cbdb 2426 }
1c310985 2427 return win ;
519cb848 2428}
facd6764 2429wxRegion wxWindowMac::MacGetVisibleRegion( bool includeOuterStructures )
94abc21f 2430{
facd6764
SC
2431
2432 Rect r ;
e40298d5
JS
2433 RgnHandle visRgn = NewRgn() ;
2434 RgnHandle tempRgn = NewRgn() ;
facd6764 2435 if ( IsControlVisible( (ControlRef) m_macControl ) )
e40298d5 2436 {
facd6764
SC
2437 GetControlBounds( (ControlRef) m_macControl , &r ) ;
2438 if (! MacGetTopLevelWindow()->MacUsesCompositing() )
21f9e953 2439 {
facd6764
SC
2440 MacRootWindowToWindow( &r.left , & r.top ) ;
2441 MacRootWindowToWindow( &r.right , & r.bottom ) ;
21f9e953 2442 }
facd6764
SC
2443 else
2444 {
2445 r.right -= r.left ;
2446 r.bottom -= r.top ;
2447 r.left = 0 ;
2448 r.top = 0 ;
2449 }
2450 if ( includeOuterStructures )
2451 InsetRect( &r , -3 , -3 ) ;
2452 RectRgn( visRgn , &r ) ;
21f9e953 2453 if ( !IsTopLevel() )
94abc21f 2454 {
facd6764
SC
2455 wxWindow* child = this ;
2456 wxWindow* parent = child->GetParent() ;
21f9e953
SC
2457 while( parent )
2458 {
21f9e953 2459 int x , y ;
facd6764 2460 wxSize size ;
d3e780ec
SC
2461 // we have to find a better clipping algorithm here, in order not to clip things
2462 // positioned like status and toolbar
2463 if ( 1 /* parent->IsTopLevel() && child->IsKindOf( CLASSINFO( wxToolBar ) ) */ )
facd6764
SC
2464 {
2465 size = parent->GetSize() ;
2466 x = y = 0 ;
2467 }
2468 else
2469 {
2470 size = parent->GetClientSize() ;
2471 wxPoint origin = parent->GetClientAreaOrigin() ;
2472 x = origin.x ;
2473 y = origin.y ;
2474 }
21f9e953
SC
2475 parent->MacWindowToRootWindow( &x, &y ) ;
2476 MacRootWindowToWindow( &x , &y ) ;
2477
2478 SetRectRgn( tempRgn ,
2479 x + parent->MacGetLeftBorderSize() , y + parent->MacGetTopBorderSize() ,
2480 x + size.x - parent->MacGetRightBorderSize(),
2481 y + size.y - parent->MacGetBottomBorderSize()) ;
2482
2483 SectRgn( visRgn , tempRgn , visRgn ) ;
2484 if ( parent->IsTopLevel() )
2485 break ;
facd6764
SC
2486 child = parent ;
2487 parent = child->GetParent() ;
7372fd0a 2488 }
94abc21f 2489 }
e40298d5 2490 }
facd6764
SC
2491
2492 wxRegion vis = visRgn ;
e40298d5
JS
2493 DisposeRgn( visRgn ) ;
2494 DisposeRgn( tempRgn ) ;
facd6764 2495 return vis ;
94abc21f
SC
2496}
2497
facd6764
SC
2498/*
2499 This function must not change the updatergn !
2500 */
2501bool wxWindowMac::MacDoRedraw( WXHRGN updatergnr , long time )
519cb848 2502{
76a5e5d2 2503 RgnHandle updatergn = (RgnHandle) updatergnr ;
facd6764
SC
2504 bool handled = false ;
2505
2506 // calculate a client-origin version of the update rgn and set m_updateRegion to that
6264b550 2507 {
1c310985
SC
2508 RgnHandle newupdate = NewRgn() ;
2509 wxSize point = GetClientSize() ;
2510 wxPoint origin = GetClientAreaOrigin() ;
1c310985 2511 SetRectRgn( newupdate , origin.x , origin.y , origin.x + point.x , origin.y+point.y ) ;
facd6764 2512 SectRgn( newupdate , updatergn , newupdate ) ;
1c310985
SC
2513 OffsetRgn( newupdate , -origin.x , -origin.y ) ;
2514 m_updateRegion = newupdate ;
facd6764
SC
2515 DisposeRgn( newupdate ) ;
2516 }
6ed71b4f 2517
facd6764
SC
2518 if ( !EmptyRgn(updatergn) )
2519 {
2520 wxWindowDC dc(this);
2521 if (!EmptyRgn(updatergn))
2522 dc.SetClippingRegion(wxRegion(updatergn));
2523
2524 wxEraseEvent eevent( GetId(), &dc );
2525 eevent.SetEventObject( this );
2526 GetEventHandler()->ProcessEvent( eevent );
2527
1c310985 2528 if ( !m_updateRegion.Empty() )
6264b550 2529 {
facd6764 2530 // paint the window itself
e40298d5
JS
2531 wxPaintEvent event;
2532 event.m_timeStamp = time ;
2533 event.SetEventObject(this);
facd6764 2534 handled = GetEventHandler()->ProcessEvent(event);
fe779e40 2535
facd6764
SC
2536 // paint custom borders
2537 wxNcPaintEvent eventNc( GetId() );
2538 eventNc.SetEventObject( this );
2539 GetEventHandler()->ProcessEvent( eventNc );
14c9cbdb 2540 }
6264b550 2541 }
facd6764
SC
2542 return handled ;
2543}
6ed71b4f 2544
facd6764
SC
2545void wxWindowMac::MacRedraw( WXHRGN updatergnr , long time, bool erase)
2546{
2547 RgnHandle updatergn = (RgnHandle) updatergnr ;
2548 // updatergn is always already clipped to our boundaries
2549 // if we are in compositing mode then it is in relative to the upper left of the control
2550 // if we are in non-compositing, then it is relatvie to the uppder left of the content area
2551 // of the toplevel window
2552 // it is in window coordinates, not in client coordinates
6ed71b4f 2553
facd6764
SC
2554 // ownUpdateRgn is the area that this window has to repaint, it is in window coordinates
2555 RgnHandle ownUpdateRgn = NewRgn() ;
2556 CopyRgn( updatergn , ownUpdateRgn ) ;
2557
2558 if ( MacGetTopLevelWindow()->MacUsesCompositing() == false )
2559 {
2560 Rect bounds;
2561 UMAGetControlBoundsInWindowCoords( (ControlRef)m_macControl, &bounds );
2562 RgnHandle controlRgn = NewRgn();
2563 RectRgn( controlRgn, &bounds );
2564 //KO: This sets the ownUpdateRgn to the area of this control that is inside
2565 // the window update region
2566 SectRgn( ownUpdateRgn, controlRgn, ownUpdateRgn );
2567 DisposeRgn( controlRgn );
2568
2569 //KO: convert ownUpdateRgn to local coordinates
2570 OffsetRgn( ownUpdateRgn, -bounds.left, -bounds.top );
6264b550 2571 }
facd6764
SC
2572
2573 MacDoRedraw( ownUpdateRgn , time ) ;
2574 DisposeRgn( ownUpdateRgn ) ;
6ed71b4f 2575
519cb848
SC
2576}
2577
facd6764 2578WXWindow wxWindowMac::MacGetTopLevelWindowRef() const
519cb848 2579{
6264b550 2580 wxWindowMac *iter = (wxWindowMac*)this ;
14c9cbdb 2581
6264b550
RR
2582 while( iter )
2583 {
1c310985
SC
2584 if ( iter->IsTopLevel() )
2585 return ((wxTopLevelWindow*)iter)->MacGetWindowRef() ;
519cb848 2586
6264b550 2587 iter = iter->GetParent() ;
14c9cbdb 2588 }
427ff662 2589 wxASSERT_MSG( 1 , wxT("No valid mac root window") ) ;
6264b550 2590 return NULL ;
519cb848
SC
2591}
2592
14c9cbdb 2593void wxWindowMac::MacCreateScrollBars( long style )
519cb848 2594{
427ff662 2595 wxASSERT_MSG( m_vScrollBar == NULL && m_hScrollBar == NULL , wxT("attempt to create window twice") ) ;
14c9cbdb 2596
6264b550
RR
2597 bool hasBoth = ( style & wxVSCROLL ) && ( style & wxHSCROLL ) ;
2598 int adjust = hasBoth ? MAC_SCROLLBAR_SIZE - 1: 0 ;
2599 int width, height ;
2600 GetClientSize( &width , &height ) ;
14c9cbdb 2601
6264b550
RR
2602 wxPoint vPoint(width-MAC_SCROLLBAR_SIZE, 0) ;
2603 wxSize vSize(MAC_SCROLLBAR_SIZE, height - adjust) ;
2604 wxPoint hPoint(0 , height-MAC_SCROLLBAR_SIZE ) ;
2605 wxSize hSize( width - adjust, MAC_SCROLLBAR_SIZE) ;
14c9cbdb
RD
2606
2607 m_vScrollBar = new wxScrollBar(this, wxWINDOW_VSCROLL, vPoint,
6264b550
RR
2608 vSize , wxVERTICAL);
2609
2610 if ( style & wxVSCROLL )
2611 {
14c9cbdb 2612
6264b550
RR
2613 }
2614 else
2615 {
2616 m_vScrollBar->Show(false) ;
2617 }
14c9cbdb 2618 m_hScrollBar = new wxScrollBar(this, wxWINDOW_HSCROLL, hPoint,
6264b550
RR
2619 hSize , wxHORIZONTAL);
2620 if ( style & wxHSCROLL )
2621 {
2622 }
2623 else
2624 {
2625 m_hScrollBar->Show(false) ;
2626 }
14c9cbdb 2627
6264b550
RR
2628 // because the create does not take into account the client area origin
2629 MacRepositionScrollBars() ; // we might have a real position shift
519cb848
SC
2630}
2631
e766c8a9 2632void wxWindowMac::MacRepositionScrollBars()
519cb848 2633{
6264b550
RR
2634 bool hasBoth = ( m_hScrollBar && m_hScrollBar->IsShown()) && ( m_vScrollBar && m_vScrollBar->IsShown()) ;
2635 int adjust = hasBoth ? MAC_SCROLLBAR_SIZE - 1 : 0 ;
14c9cbdb 2636
6264b550 2637 // get real client area
14c9cbdb 2638
facd6764
SC
2639 int width ;
2640 int height ;
2641 GetSize( &width , &height ) ;
6264b550
RR
2642
2643 width -= MacGetLeftBorderSize() + MacGetRightBorderSize();
2644 height -= MacGetTopBorderSize() + MacGetBottomBorderSize();
14c9cbdb 2645
6264b550
RR
2646 wxPoint vPoint(width-MAC_SCROLLBAR_SIZE, 0) ;
2647 wxSize vSize(MAC_SCROLLBAR_SIZE, height - adjust) ;
2648 wxPoint hPoint(0 , height-MAC_SCROLLBAR_SIZE ) ;
2649 wxSize hSize( width - adjust, MAC_SCROLLBAR_SIZE) ;
14c9cbdb
RD
2650
2651 int x = 0 ;
6264b550 2652 int y = 0 ;
facd6764
SC
2653 int w ;
2654 int h ;
2655 GetSize( &w , &h ) ;
14c9cbdb 2656
6264b550
RR
2657 MacClientToRootWindow( &x , &y ) ;
2658 MacClientToRootWindow( &w , &h ) ;
14c9cbdb 2659
6264b550 2660 wxWindowMac *iter = (wxWindowMac*)this ;
14c9cbdb 2661
6264b550
RR
2662 int totW = 10000 , totH = 10000;
2663 while( iter )
2664 {
1c310985 2665 if ( iter->IsTopLevel() )
6264b550 2666 {
facd6764 2667 iter->GetSize( &totW , &totH ) ;
6264b550
RR
2668 break ;
2669 }
2670
2671 iter = iter->GetParent() ;
14c9cbdb
RD
2672 }
2673
6264b550
RR
2674 if ( x == 0 )
2675 {
2676 hPoint.x = -1 ;
2677 hSize.x += 1 ;
2678 }
2679 if ( y == 0 )
2680 {
2681 vPoint.y = -1 ;
2682 vSize.y += 1 ;
2683 }
14c9cbdb 2684
6264b550
RR
2685 if ( w-x >= totW )
2686 {
2687 hSize.x += 1 ;
2688 vPoint.x += 1 ;
2689 }
14c9cbdb 2690
6264b550
RR
2691 if ( h-y >= totH )
2692 {
2693 vSize.y += 1 ;
2694 hPoint.y += 1 ;
2695 }
2696
2697 if ( m_vScrollBar )
2698 {
2699 m_vScrollBar->SetSize( vPoint.x , vPoint.y, vSize.x, vSize.y , wxSIZE_ALLOW_MINUS_ONE);
2700 }
2701 if ( m_hScrollBar )
2702 {
2703 m_hScrollBar->SetSize( hPoint.x , hPoint.y, hSize.x, hSize.y, wxSIZE_ALLOW_MINUS_ONE);
2704 }
519cb848
SC
2705}
2706
e766c8a9 2707bool wxWindowMac::AcceptsFocus() const
7c551d95
SC
2708{
2709 return MacCanFocus() && wxWindowBase::AcceptsFocus();
2710}
519cb848 2711
14c9cbdb 2712void wxWindowMac::MacSuperChangedPosition()
519cb848 2713{
6264b550 2714 // only window-absolute structures have to be moved i.e. controls
519cb848 2715
eb22f2a6 2716 wxWindowListNode *node = GetChildren().GetFirst();
6264b550
RR
2717 while ( node )
2718 {
9bd1404d 2719 wxWindowMac *child = node->GetData();
6264b550 2720 child->MacSuperChangedPosition() ;
eb22f2a6 2721 node = node->GetNext();
6264b550 2722 }
519cb848 2723}
519cb848 2724
14c9cbdb 2725void wxWindowMac::MacTopLevelWindowChangedPosition()
a3bf4a62 2726{
6264b550 2727 // only screen-absolute structures have to be moved i.e. glcanvas
a3bf4a62 2728
eb22f2a6 2729 wxWindowListNode *node = GetChildren().GetFirst();
6264b550
RR
2730 while ( node )
2731 {
9bd1404d 2732 wxWindowMac *child = node->GetData();
6264b550 2733 child->MacTopLevelWindowChangedPosition() ;
eb22f2a6 2734 node = node->GetNext();
6264b550 2735 }
a3bf4a62 2736}
facd6764 2737
e766c8a9 2738long wxWindowMac::MacGetLeftBorderSize( ) const
2f1ae414 2739{
1c310985 2740 if( IsTopLevel() )
6264b550 2741 return 0 ;
2f1ae414
SC
2742
2743 if (m_windowStyle & wxRAISED_BORDER || m_windowStyle & wxSUNKEN_BORDER )
2744 {
ed60b502 2745 SInt32 border = 3 ;
1c310985 2746#if wxMAC_USE_THEME_BORDER
ed60b502 2747 GetThemeMetric( kThemeMetricListBoxFrameOutset , &border ) ;
1c310985 2748#endif
ed60b502 2749 return border ;
2f1ae414
SC
2750 }
2751 else if ( m_windowStyle &wxDOUBLE_BORDER)
2752 {
ed60b502 2753 SInt32 border = 3 ;
1c310985 2754#if wxMAC_USE_THEME_BORDER
ed60b502 2755 GetThemeMetric( kThemeMetricListBoxFrameOutset , &border ) ;
1c310985 2756#endif
ed60b502 2757 return border ;
2f1ae414
SC
2758 }
2759 else if (m_windowStyle &wxSIMPLE_BORDER)
2760 {
6264b550 2761 return 1 ;
2f1ae414 2762 }
6264b550 2763 return 0 ;
2f1ae414
SC
2764}
2765
e766c8a9 2766long wxWindowMac::MacGetRightBorderSize( ) const
5b781a67 2767{
1c310985
SC
2768 // they are all symmetric in mac themes
2769 return MacGetLeftBorderSize() ;
5b781a67
SC
2770}
2771
e766c8a9 2772long wxWindowMac::MacGetTopBorderSize( ) const
5b781a67 2773{
1c310985
SC
2774 // they are all symmetric in mac themes
2775 return MacGetLeftBorderSize() ;
5b781a67
SC
2776}
2777
e766c8a9 2778long wxWindowMac::MacGetBottomBorderSize( ) const
5b781a67 2779{
1c310985
SC
2780 // they are all symmetric in mac themes
2781 return MacGetLeftBorderSize() ;
5b781a67
SC
2782}
2783
14c9cbdb 2784long wxWindowMac::MacRemoveBordersFromStyle( long style )
2f1ae414 2785{
6264b550 2786 return style & ~( wxDOUBLE_BORDER | wxSUNKEN_BORDER | wxRAISED_BORDER | wxBORDER | wxSTATIC_BORDER ) ;
2f1ae414 2787}
0a67a93b 2788
e766c8a9 2789// Find the wxWindowMac at the current mouse position, returning the mouse
3723b7b1 2790// position.
e766c8a9 2791wxWindowMac* wxFindWindowAtPointer(wxPoint& pt)
3723b7b1 2792{
59a12e90 2793 pt = wxGetMousePosition();
e766c8a9 2794 wxWindowMac* found = wxFindWindowAtPoint(pt);
59a12e90 2795 return found;
3723b7b1
JS
2796}
2797
2798// Get the current mouse position.
2799wxPoint wxGetMousePosition()
2800{
57591e0e
JS
2801 int x, y;
2802 wxGetMousePosition(& x, & y);
2803 return wxPoint(x, y);
3723b7b1
JS
2804}
2805
6ed71b4f 2806void wxWindowMac::OnMouseEvent( wxMouseEvent &event )
8950f7cc
SC
2807{
2808 if ( event.GetEventType() == wxEVT_RIGHT_DOWN )
2809 {
2810 // copied from wxGTK : CS
249aad30 2811 // generate a "context menu" event: this is similar to wxEVT_RIGHT_DOWN
8950f7cc
SC
2812 // except that:
2813 //
2814 // (a) it's a command event and so is propagated to the parent
2815 // (b) under MSW it can be generated from kbd too
2816 // (c) it uses screen coords (because of (a))
2817 wxContextMenuEvent evtCtx(wxEVT_CONTEXT_MENU,
2818 this->GetId(),
2819 this->ClientToScreen(event.GetPosition()));
249aad30
SC
2820 if ( ! GetEventHandler()->ProcessEvent(evtCtx) )
2821 event.Skip() ;
8950f7cc 2822 }
facd6764
SC
2823 else
2824 {
2825 event.Skip() ;
2826 }
8950f7cc
SC
2827}
2828
facd6764
SC
2829void wxWindowMac::MacHandleControlClick( WXWidget control , wxInt16 controlpart , bool WXUNUSED( mouseStillDown ) )
2830{
facd6764
SC
2831}
2832
79392158 2833Rect wxMacGetBoundsForControl( wxWindow* window , const wxPoint& pos , const wxSize &size , bool adjustForOrigin )
3083eb85
SC
2834{
2835 int x ,y , w ,h ;
2836
79392158 2837 window->MacGetBoundsForControl( pos , size , x , y, w, h , adjustForOrigin) ;
3083eb85
SC
2838 Rect bounds = { y , x , y+h , x+w };
2839 return bounds ;
2840}
2841
f1d527c1
SC
2842wxInt32 wxWindowMac::MacControlHit(WXEVENTHANDLERREF WXUNUSED(handler) , WXEVENTREF WXUNUSED(event) )
2843{
2844 return eventNotHandledErr ;
2845}
2846
facd6764 2847