]> git.saurik.com Git - wxWidgets.git/blame - src/mac/carbon/window.cpp
MPThread implementation by AJ Lavin
[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
a9825a9b
SC
613 UInt32 features = kControlSupportsEmbedding | kControlSupportsLiveFeedback | kControlHasSpecialBackground |
614 kControlSupportsCalcBestRect | kControlHandlesTracking | kControlSupportsFocus | kControlWantsActivate | kControlWantsIdle;
facd6764 615
a9825a9b 616 ::CreateUserPaneControl( MAC_WXHWND(GetParent()->MacGetTopLevelWindowRef()) , &bounds, kControlSupportsEmbedding , (ControlRef*) &m_macControl);
facd6764
SC
617
618 MacPostControlCreate(pos,size) ;
bcbd6987 619#if !TARGET_API_MAC_OSX
facd6764
SC
620 SetControlData((ControlRef) m_macControl,kControlEntireControl,kControlUserPaneDrawProcTag,
621 sizeof(gControlUserPaneDrawUPP),(Ptr) &gControlUserPaneDrawUPP);
622 SetControlData((ControlRef) m_macControl,kControlEntireControl,kControlUserPaneHitTestProcTag,
623 sizeof(gControlUserPaneHitTestUPP),(Ptr) &gControlUserPaneHitTestUPP);
624 SetControlData((ControlRef) m_macControl,kControlEntireControl,kControlUserPaneTrackingProcTag,
625 sizeof(gControlUserPaneTrackingUPP),(Ptr) &gControlUserPaneTrackingUPP);
626 SetControlData((ControlRef) m_macControl,kControlEntireControl,kControlUserPaneIdleProcTag,
627 sizeof(gControlUserPaneIdleUPP),(Ptr) &gControlUserPaneIdleUPP);
628 SetControlData((ControlRef) m_macControl,kControlEntireControl,kControlUserPaneKeyDownProcTag,
629 sizeof(gControlUserPaneKeyDownUPP),(Ptr) &gControlUserPaneKeyDownUPP);
630 SetControlData((ControlRef) m_macControl,kControlEntireControl,kControlUserPaneActivateProcTag,
631 sizeof(gControlUserPaneActivateUPP),(Ptr) &gControlUserPaneActivateUPP);
632 SetControlData((ControlRef) m_macControl,kControlEntireControl,kControlUserPaneFocusProcTag,
633 sizeof(gControlUserPaneFocusUPP),(Ptr) &gControlUserPaneFocusUPP);
634 SetControlData((ControlRef) m_macControl,kControlEntireControl,kControlUserPaneBackgroundProcTag,
635 sizeof(gControlUserPaneBackgroundUPP),(Ptr) &gControlUserPaneBackgroundUPP);
636#endif
637 }
e766c8a9 638#ifndef __WXUNIVERSAL__
14c9cbdb
RD
639 // Don't give scrollbars to wxControls unless they ask for them
640 if ( (! IsKindOf(CLASSINFO(wxControl)) && ! IsKindOf(CLASSINFO(wxStatusBar))) ||
641 (IsKindOf(CLASSINFO(wxControl)) && ( style & wxHSCROLL || style & wxVSCROLL)))
6264b550
RR
642 {
643 MacCreateScrollBars( style ) ;
644 }
e766c8a9 645#endif
3dfafdb9
RD
646
647 wxWindowCreateEvent event(this);
7e4a196e 648 GetEventHandler()->AddPendingEvent(event);
3dfafdb9 649
e9576ca5
SC
650 return TRUE;
651}
652
facd6764
SC
653void wxWindowMac::MacPostControlCreate(const wxPoint& pos, const wxSize& size)
654{
655 wxASSERT_MSG( (ControlRef) m_macControl != NULL , wxT("No valid mac control") ) ;
656
facd6764
SC
657 ::SetControlReference( (ControlRef) m_macControl , (long) this ) ;
658
659 MacInstallEventHandler();
660
661 ControlRef container = (ControlRef) GetParent()->GetHandle() ;
662 wxASSERT_MSG( container != NULL , wxT("No valid mac container control") ) ;
663 ::EmbedControl( (ControlRef) m_macControl , container ) ;
664
665 // adjust font, controlsize etc
666 DoSetWindowVariant( m_windowVariant ) ;
667
668#if !TARGET_API_MAC_OSX
669 // eventually we can fix some clipping issues be reactivating this hook
670 //if ( m_macIsUserPane )
671 // SetControlColorProc( (ControlRef) m_macControl , wxMacSetupControlBackgroundUPP ) ;
672#endif
673
674 UMASetControlTitle( (ControlRef) m_macControl , wxStripMenuCodes(m_label) , m_font.GetEncoding() ) ;
675
676 wxSize new_size = size ;
677 if (!m_macIsUserPane)
678 {
679 wxSize best_size( DoGetBestSize() );
680
681 if (size.x == -1) {
682 new_size.x = best_size.x;
683 }
684 if (size.y == -1) {
685 new_size.y = best_size.y;
686 }
687 SetSize( pos.x, pos.y , new_size.x, new_size.y,wxSIZE_USE_EXISTING );
688 }
689
690 SetCursor( *wxSTANDARD_CURSOR ) ;
691
692}
693
694void wxWindowMac::DoSetWindowVariant( wxWindowVariant variant )
695{
23176131
JS
696 // Don't assert, in case we set the window variant before
697 // the window is created
698 // wxASSERT( m_macControl != NULL ) ;
facd6764 699
23176131
JS
700 m_windowVariant = variant ;
701
702 if (!m_macControl)
703 return;
facd6764
SC
704
705 ControlSize size ;
706 ThemeFontID themeFont = kThemeSystemFont ;
707
708 // we will get that from the settings later
709 // and make this NORMAL later, but first
710 // we have a few calculations that we must fix
711
712 switch ( variant )
713 {
714 case wxWINDOW_VARIANT_NORMAL :
715 size = kControlSizeNormal;
716 themeFont = kThemeSystemFont ;
717 break ;
718 case wxWINDOW_VARIANT_SMALL :
719 size = kControlSizeSmall;
720 themeFont = kThemeSmallSystemFont ;
721 break ;
722 case wxWINDOW_VARIANT_MINI :
723 if (UMAGetSystemVersion() >= 0x1030 )
724 {
725 // not always defined in the headers
726 size = 3 ;
727 themeFont = 109 ;
728 }
729 else
730 {
731 size = kControlSizeSmall;
732 themeFont = kThemeSmallSystemFont ;
733 }
734 break ;
735 case wxWINDOW_VARIANT_LARGE :
736 size = kControlSizeLarge;
737 themeFont = kThemeSystemFont ;
738 break ;
739 default:
740 wxFAIL_MSG(_T("unexpected window variant"));
741 break ;
742 }
743 ::SetControlData( (ControlRef) m_macControl , kControlEntireControl, kControlSizeTag, sizeof( ControlSize ), &size );
744
745 wxFont font ;
746 font.MacCreateThemeFont( themeFont ) ;
747 SetFont( font ) ;
748}
749
750void wxWindowMac::MacUpdateControlFont()
751{
752 ControlFontStyleRec fontStyle;
753 if ( m_font.MacGetThemeFontID() != kThemeCurrentPortFont )
754 {
755 switch( m_font.MacGetThemeFontID() )
756 {
757 case kThemeSmallSystemFont : fontStyle.font = kControlFontSmallSystemFont ; break ;
758 case 109 /*mini font */ : fontStyle.font = -5 ; break ;
759 case kThemeSystemFont : fontStyle.font = kControlFontBigSystemFont ; break ;
760 default : fontStyle.font = kControlFontBigSystemFont ; break ;
761 }
762 fontStyle.flags = kControlUseFontMask ;
763 }
764 else
765 {
766 fontStyle.font = m_font.MacGetFontNum() ;
767 fontStyle.style = m_font.MacGetFontStyle() ;
768 fontStyle.size = m_font.MacGetFontSize() ;
769 fontStyle.flags = kControlUseFontMask | kControlUseFaceMask | kControlUseSizeMask ;
770 }
03c4c72b
SC
771
772 fontStyle.just = teJustLeft ;
773 fontStyle.flags |= kControlUseJustMask ;
774 if ( ( GetWindowStyle() & wxALIGN_MASK ) & wxALIGN_CENTER_HORIZONTAL )
775 fontStyle.just = teJustCenter ;
776 else if ( ( GetWindowStyle() & wxALIGN_MASK ) & wxALIGN_RIGHT )
777 fontStyle.just = teJustRight ;
778
779
facd6764
SC
780 fontStyle.foreColor = MAC_WXCOLORREF(GetForegroundColour().GetPixel() ) ;
781 fontStyle.flags |= kControlUseForeColorMask ;
03c4c72b 782
facd6764
SC
783 ::SetControlFontStyle( (ControlRef) m_macControl , &fontStyle );
784 Refresh() ;
785}
786
787bool wxWindowMac::SetFont(const wxFont& font)
788{
789 bool retval = !wxWindowBase::SetFont( font ) ;
790
791 MacUpdateControlFont() ;
792
793 return retval;
794}
795
796bool wxWindowMac::SetForegroundColour(const wxColour& col )
797{
798 if ( !wxWindowBase::SetForegroundColour(col) )
799 return false ;
800
801 MacUpdateControlFont() ;
802
803 return true ;
804}
805
806bool wxWindowMac::SetBackgroundColour(const wxColour& col )
807{
808 if ( !wxWindowBase::SetBackgroundColour(col) && m_hasBgCol )
809 return false ;
810
811 wxBrush brush ;
812 if ( col == wxSystemSettings::GetColour(wxSYS_COLOUR_APPWORKSPACE) )
813 {
814 brush.MacSetTheme( kThemeBrushDocumentWindowBackground ) ;
815 }
816 else if ( col == wxSystemSettings::GetColour(wxSYS_COLOUR_3DFACE ) )
817 {
818 brush.MacSetTheme( kThemeBrushDialogBackgroundActive ) ;
819 }
820 else
821 {
822 brush.SetColour( col ) ;
823 }
824 MacSetBackgroundBrush( brush ) ;
825
826 MacUpdateControlFont() ;
827
828 return true ;
829}
830
831
832bool wxWindowMac::MacCanFocus() const
833{
f1d527c1
SC
834#if 0
835 // there is currently no way to determinate whether the window is running in full keyboard
836 // access mode, therefore we cannot rely on these features yet
837 UInt32 features = 0 ;
838 GetControlFeatures( (ControlRef) m_macControl , &features ) ;
839 return features & ( kControlSupportsFocus | kControlGetsFocusOnClick ) ;
840#endif
841 return true ;
facd6764
SC
842}
843
844
e766c8a9 845void wxWindowMac::SetFocus()
e9576ca5 846{
6264b550
RR
847 if ( AcceptsFocus() )
848 {
f1d527c1
SC
849#if !TARGET_API_MAC_OSX
850 wxWindow* former = FindFocus() ;
eed1be65 851#endif
f1d527c1
SC
852 OSStatus err = SetKeyboardFocus( (WindowRef) MacGetTopLevelWindowRef() , (ControlRef) GetHandle() , kControlFocusNextPart ) ;
853 // as we cannot rely on the control features to find out whether we are in full keyboard mode, we can only
854 // leave in case of an error
855 if ( err == errCouldntSetFocus )
856 return ;
857
858#if !TARGET_API_MAC_OSX
859 // emulate carbon events when running under carbonlib where they are not natively available
860 if ( former )
861 {
862 EventRef evRef = NULL ;
863 verify_noerr( MacCreateEvent( NULL , kEventClassControl , kEventControlSetFocusPart , TicksToEventTime( TickCount() ) , kEventAttributeUserEvent ,
864 &evRef ) );
865
866 wxMacCarbonEvent cEvent( evRef ) ;
867 cEvent.SetParameter<ControlRef>( kEventParamDirectObject , (ControlRef) former->GetHandle() ) ;
868 cEvent.SetParameter<ControlPartCode>(kEventParamControlPart , typeControlPartCode , kControlFocusNoPart ) ;
869
870 wxMacWindowEventHandler( NULL , evRef , former ) ;
871 ReleaseEvent(evRef) ;
6264b550 872 }
f1d527c1 873 // send new focus event
6264b550 874 {
f1d527c1
SC
875 EventRef evRef = NULL ;
876 verify_noerr( MacCreateEvent( NULL , kEventClassControl , kEventControlSetFocusPart , TicksToEventTime( TickCount() ) , kEventAttributeUserEvent ,
877 &evRef ) );
878
879 wxMacCarbonEvent cEvent( evRef ) ;
880 cEvent.SetParameter<ControlRef>( kEventParamDirectObject , (ControlRef) GetHandle() ) ;
881 cEvent.SetParameter<ControlPartCode>(kEventParamControlPart , typeControlPartCode , kControlFocusNextPart ) ;
882
883 wxMacWindowEventHandler( NULL , evRef , this ) ;
884 ReleaseEvent(evRef) ;
6264b550 885 }
f1d527c1 886#endif
6264b550 887 }
e9576ca5
SC
888}
889
e9576ca5 890
4116c221 891void wxWindowMac::DoCaptureMouse()
e9576ca5 892{
519cb848 893 wxTheApp->s_captureWindow = this ;
e9576ca5
SC
894}
895
90b959ae
SC
896wxWindow* wxWindowBase::GetCapture()
897{
898 return wxTheApp->s_captureWindow ;
899}
900
4116c221 901void wxWindowMac::DoReleaseMouse()
e9576ca5 902{
519cb848 903 wxTheApp->s_captureWindow = NULL ;
e9576ca5
SC
904}
905
e9576ca5
SC
906#if wxUSE_DRAG_AND_DROP
907
e766c8a9 908void wxWindowMac::SetDropTarget(wxDropTarget *pDropTarget)
e9576ca5 909{
e40298d5
JS
910 if ( m_dropTarget != 0 ) {
911 delete m_dropTarget;
912 }
6ed71b4f 913
e40298d5
JS
914 m_dropTarget = pDropTarget;
915 if ( m_dropTarget != 0 )
916 {
917 // TODO
918 }
e9576ca5
SC
919}
920
921#endif
922
923// Old style file-manager drag&drop
e766c8a9 924void wxWindowMac::DragAcceptFiles(bool accept)
e9576ca5
SC
925{
926 // TODO
927}
928
facd6764
SC
929void wxWindowMac::MacGetPositionAndSizeFromControl(int& x, int& y,
930 int& w, int& h) const
e9576ca5 931{
facd6764
SC
932 Rect bounds ;
933 GetControlBounds( (ControlRef) m_macControl , &bounds ) ;
e9576ca5 934
14c9cbdb 935
facd6764
SC
936 x = bounds.left ;
937 y = bounds.top ;
938 w = bounds.right - bounds.left ;
939 h = bounds.bottom - bounds.top ;
940
941 wxTopLevelWindow* tlw = wxDynamicCast( this , wxTopLevelWindow ) ;
942 if ( tlw )
519cb848 943 {
facd6764
SC
944 Point tlworigin = { 0 , 0 } ;
945 GrafPtr port ;
bb253bfd 946 bool swapped = QDSwapPort( UMAGetWindowPort( (WindowRef) tlw->MacGetWindowRef() ) , &port ) ;
facd6764 947 ::LocalToGlobal( &tlworigin ) ;
bb253bfd
SC
948 if ( swapped )
949 ::SetPort( port ) ;
facd6764
SC
950 x = tlworigin.h ;
951 y = tlworigin.v ;
519cb848 952 }
e9576ca5
SC
953}
954
facd6764
SC
955bool wxWindowMac::MacGetBoundsForControl(const wxPoint& pos,
956 const wxSize& size,
957 int& x, int& y,
79392158 958 int& w, int& h , bool adjustOrigin ) const
51abe921 959{
facd6764
SC
960 x = (int)pos.x;
961 y = (int)pos.y;
962 // todo the default calls may be used as soon as PostCreateControl Is moved here
963 w = size.x ; // WidthDefault( size.x );
964 h = size.y ; // HeightDefault( size.y ) ;
965#if !TARGET_API_MAC_OSX
966 GetParent()->MacWindowToRootWindow( &x , &y ) ;
967#endif
79392158
SC
968 if ( adjustOrigin )
969 AdjustForParentClientOrigin( x , y ) ;
facd6764
SC
970 return true ;
971}
972
973// Get total size
974void wxWindowMac::DoGetSize(int *x, int *y) const
975{
976#if TARGET_API_MAC_OSX
977 int x1 , y1 , w1 ,h1 ;
978 MacGetPositionAndSizeFromControl( x1 , y1, w1 ,h1 ) ;
979 if(x) *x = w1 ;
980 if(y) *y = h1 ;
981
982#else
983 Rect bounds ;
984 GetControlBounds( (ControlRef) m_macControl , &bounds ) ;
985 if(x) *x = bounds.right - bounds.left ;
986 if(y) *y = bounds.bottom - bounds.top ;
987#endif
988}
989
990void wxWindowMac::DoGetPosition(int *x, int *y) const
991{
992 #if TARGET_API_MAC_OSX
993 int x1 , y1 , w1 ,h1 ;
994 MacGetPositionAndSizeFromControl( x1 , y1, w1 ,h1 ) ;
995 if ( !IsTopLevel() )
2b5f62a0 996 {
facd6764
SC
997 wxWindow *parent = GetParent();
998 if ( parent )
8950f7cc 999 {
facd6764
SC
1000 wxPoint pt(parent->GetClientAreaOrigin());
1001 x1 -= pt.x ;
1002 y1 -= pt.y ;
6ed71b4f 1003 }
2b5f62a0 1004 }
facd6764
SC
1005 if(x) *x = x1 ;
1006 if(y) *y = y1 ;
1007 #else
1008 Rect bounds ;
1009 GetControlBounds( (ControlRef) m_macControl , &bounds ) ;
1010 wxCHECK_RET( GetParent() , wxT("Missing Parent") ) ;
1011
1012 int xx = bounds.left ;
1013 int yy = bounds.top ;
1014
1015 if ( !GetParent()->IsTopLevel() )
1016 {
1017 GetControlBounds( (ControlRef) GetParent()->GetHandle() , &bounds ) ;
1018
1019 xx -= bounds.left ;
1020 yy -= bounds.top ;
1021 }
1022
1023 wxPoint pt(GetParent()->GetClientAreaOrigin());
1024 xx -= pt.x;
1025 yy -= pt.y;
51abe921 1026
facd6764
SC
1027 if(x) *x = xx;
1028 if(y) *y = yy;
e766c8a9 1029#endif
facd6764 1030}
51abe921 1031
e766c8a9 1032void wxWindowMac::DoScreenToClient(int *x, int *y) const
e9576ca5 1033{
facd6764
SC
1034 WindowRef window = (WindowRef) MacGetTopLevelWindowRef() ;
1035
1036 wxCHECK_RET( window , wxT("TopLevel Window Missing") ) ;
1037
1038 {
1039 Point localwhere = {0,0} ;
519cb848 1040
facd6764
SC
1041 if(x) localwhere.h = * x ;
1042 if(y) localwhere.v = * y ;
1043
1044 wxMacPortSaver s((GrafPtr)GetWindowPort( window )) ;
1045 ::GlobalToLocal( &localwhere ) ;
1046 if(x) *x = localwhere.h ;
1047 if(y) *y = localwhere.v ;
6ed71b4f 1048
facd6764 1049 }
2078220e 1050 MacRootWindowToWindow( x , y ) ;
facd6764
SC
1051
1052 wxPoint origin = GetClientAreaOrigin() ;
1053 if(x) *x -= origin.x ;
1054 if(y) *y -= origin.y ;
e9576ca5
SC
1055}
1056
e766c8a9 1057void wxWindowMac::DoClientToScreen(int *x, int *y) const
e9576ca5 1058{
facd6764
SC
1059 WindowRef window = (WindowRef) MacGetTopLevelWindowRef() ;
1060 wxCHECK_RET( window , wxT("TopLevel Window Missing") ) ;
14c9cbdb 1061
facd6764
SC
1062 wxPoint origin = GetClientAreaOrigin() ;
1063 if(x) *x += origin.x ;
1064 if(y) *y += origin.y ;
14c9cbdb 1065
2078220e 1066 MacWindowToRootWindow( x , y ) ;
14c9cbdb 1067
facd6764
SC
1068 {
1069 Point localwhere = { 0,0 };
1070 if(x) localwhere.h = * x ;
1071 if(y) localwhere.v = * y ;
7d9d1fd7 1072
facd6764
SC
1073 wxMacPortSaver s((GrafPtr)GetWindowPort( window )) ;
1074 ::LocalToGlobal( &localwhere ) ;
1075 if(x) *x = localwhere.h ;
1076 if(y) *y = localwhere.v ;
1077 }
519cb848
SC
1078}
1079
e766c8a9 1080void wxWindowMac::MacClientToRootWindow( int *x , int *y ) const
519cb848 1081{
1c310985
SC
1082 wxPoint origin = GetClientAreaOrigin() ;
1083 if(x) *x += origin.x ;
1084 if(y) *y += origin.y ;
14c9cbdb 1085
1c310985
SC
1086 MacWindowToRootWindow( x , y ) ;
1087}
1088
1089void wxWindowMac::MacRootWindowToClient( int *x , int *y ) const
1090{
1c310985 1091 MacRootWindowToWindow( x , y ) ;
facd6764
SC
1092
1093 wxPoint origin = GetClientAreaOrigin() ;
1c310985
SC
1094 if(x) *x -= origin.x ;
1095 if(y) *y -= origin.y ;
1096}
1097
1098void wxWindowMac::MacWindowToRootWindow( int *x , int *y ) const
1099{
facd6764
SC
1100 #if TARGET_API_MAC_OSX
1101 HIPoint pt ;
1102 if ( x ) pt.x = *x ;
1103 if ( y ) pt.y = *y ;
1104
125c7984
SC
1105 if ( !IsTopLevel() )
1106 HIViewConvertPoint( &pt , (ControlRef) m_macControl , (ControlRef) MacGetTopLevelWindow()->GetHandle() ) ;
facd6764
SC
1107
1108 if ( x ) *x = (int) pt.x ;
1109 if ( y ) *y = (int) pt.y ;
1110 #else
1c310985 1111 if ( !IsTopLevel() )
6264b550 1112 {
facd6764
SC
1113 Rect bounds ;
1114 GetControlBounds( (ControlRef) m_macControl , &bounds ) ;
1115 if(x) *x += bounds.left ;
1116 if(y) *y += bounds.top ;
6264b550 1117 }
facd6764
SC
1118#endif
1119}
1120
1121void wxWindowMac::MacWindowToRootWindow( short *x , short *y ) const
1122{
1123 int x1 , y1 ;
1124 if ( x ) x1 = *x ;
1125 if ( y ) y1 = *y ;
1126 MacWindowToRootWindow( &x1 , &y1 ) ;
1127 if ( x ) *x = x1 ;
1128 if ( y ) *y = y1 ;
519cb848
SC
1129}
1130
1c310985 1131void wxWindowMac::MacRootWindowToWindow( int *x , int *y ) const
519cb848 1132{
facd6764
SC
1133 #if TARGET_API_MAC_OSX
1134 HIPoint pt ;
1135 if ( x ) pt.x = *x ;
1136 if ( y ) pt.y = *y ;
1137
125c7984
SC
1138 if ( !IsTopLevel() )
1139 HIViewConvertPoint( &pt , (ControlRef) MacGetTopLevelWindow()->GetHandle() , (ControlRef) m_macControl ) ;
facd6764
SC
1140
1141 if ( x ) *x = (int) pt.x ;
1142 if ( y ) *y = (int) pt.y ;
1143 #else
1c310985 1144 if ( !IsTopLevel() )
6264b550 1145 {
facd6764
SC
1146 Rect bounds ;
1147 GetControlBounds( (ControlRef) m_macControl , &bounds ) ;
1148 if(x) *x -= bounds.left ;
1149 if(y) *y -= bounds.top ;
6264b550 1150 }
facd6764 1151#endif
e9576ca5
SC
1152}
1153
facd6764 1154void wxWindowMac::MacRootWindowToWindow( short *x , short *y ) const
e9576ca5 1155{
facd6764
SC
1156 int x1 , y1 ;
1157 if ( x ) x1 = *x ;
1158 if ( y ) y1 = *y ;
1159 MacRootWindowToWindow( &x1 , &y1 ) ;
1160 if ( x ) *x = x1 ;
1161 if ( y ) *y = y1 ;
1162}
6ed71b4f 1163
29281095
SC
1164void wxWindowMac::MacGetContentAreaInset( int &left , int &top , int &right , int &bottom )
1165{
1166 RgnHandle rgn = NewRgn() ;
1167 Rect content ;
1168 if ( GetControlRegion( (ControlRef) m_macControl , kControlContentMetaPart , rgn ) == noErr )
1169 {
1170 GetRegionBounds( rgn , &content ) ;
1171 DisposeRgn( rgn ) ;
1172 }
1173 else
1174 {
1175 GetControlBounds( (ControlRef) m_macControl , &content ) ;
1176 }
1177 Rect structure ;
1178 GetControlBounds( (ControlRef) m_macControl , &structure ) ;
1179#if !TARGET_API_MAC_OSX
1180 OffsetRect( &content , -structure.left , -structure.top ) ;
1181#endif
1182 left = content.left - structure.left ;
1183 top = content.top - structure.top ;
1184 right = structure.right - content.right ;
1185 bottom = structure.bottom - content.bottom ;
1186}
1187
facd6764
SC
1188wxSize wxWindowMac::DoGetSizeFromClientSize( const wxSize & size ) const
1189{
1190 wxSize sizeTotal = size;
1191
1192 RgnHandle rgn = NewRgn() ;
1193
1194 Rect content ;
1195
1196 if ( GetControlRegion( (ControlRef) m_macControl , kControlContentMetaPart , rgn ) == noErr )
6618870d 1197 {
facd6764
SC
1198 GetRegionBounds( rgn , &content ) ;
1199 DisposeRgn( rgn ) ;
6618870d
SC
1200 }
1201 else
1202 {
facd6764 1203 GetControlBounds( (ControlRef) m_macControl , &content ) ;
e40298d5 1204 }
facd6764
SC
1205 Rect structure ;
1206 GetControlBounds( (ControlRef) m_macControl , &structure ) ;
1207#if !TARGET_API_MAC_OSX
1208 OffsetRect( &content , -structure.left , -structure.top ) ;
1209#endif
6ed71b4f 1210
facd6764
SC
1211 sizeTotal.x += (structure.right - structure.left) - (content.right - content.left) ;
1212 sizeTotal.y += (structure.bottom - structure.top) - (content.bottom - content.top ) ;
6ed71b4f 1213
facd6764
SC
1214 sizeTotal.x += MacGetLeftBorderSize( ) + MacGetRightBorderSize( ) ;
1215 sizeTotal.y += MacGetTopBorderSize( ) + MacGetBottomBorderSize( ) ;
6ed71b4f 1216
facd6764 1217 return sizeTotal;
e9576ca5
SC
1218}
1219
1220
1221// Get size *available for subwindows* i.e. excluding menu bar etc.
e766c8a9 1222void wxWindowMac::DoGetClientSize(int *x, int *y) const
e9576ca5 1223{
9453cf2b 1224 int ww, hh;
6ed71b4f 1225
facd6764
SC
1226 RgnHandle rgn = NewRgn() ;
1227 Rect content ;
1228 if ( GetControlRegion( (ControlRef) m_macControl , kControlContentMetaPart , rgn ) == noErr )
1229 {
1230 GetRegionBounds( rgn , &content ) ;
1231 DisposeRgn( rgn ) ;
1232 }
1233 else
1234 {
1235 GetControlBounds( (ControlRef) m_macControl , &content ) ;
1236 }
1237#if !TARGET_API_MAC_OSX
1238 Rect structure ;
1239 GetControlBounds( (ControlRef) m_macControl , &structure ) ;
1240 OffsetRect( &content , -structure.left , -structure.top ) ;
1241#endif
1242 ww = content.right - content.left ;
1243 hh = content.bottom - content.top ;
1244
6264b550
RR
1245 ww -= MacGetLeftBorderSize( ) + MacGetRightBorderSize( ) ;
1246 hh -= MacGetTopBorderSize( ) + MacGetBottomBorderSize( );
6ed71b4f 1247
e40298d5
JS
1248 if ( (m_vScrollBar && m_vScrollBar->IsShown()) || (m_hScrollBar && m_hScrollBar->IsShown()) )
1249 {
1250 int x1 = 0 ;
1251 int y1 = 0 ;
facd6764
SC
1252 int w ;
1253 int h ;
1254 GetSize( &w , &h ) ;
1255
e40298d5
JS
1256 MacClientToRootWindow( &x1 , &y1 ) ;
1257 MacClientToRootWindow( &w , &h ) ;
6ed71b4f 1258
e40298d5 1259 wxWindowMac *iter = (wxWindowMac*)this ;
6ed71b4f 1260
e40298d5
JS
1261 int totW = 10000 , totH = 10000;
1262 while( iter )
6264b550 1263 {
e40298d5
JS
1264 if ( iter->IsTopLevel() )
1265 {
facd6764 1266 iter->GetSize( &totW , &totH ) ;
e40298d5
JS
1267 break ;
1268 }
6ed71b4f 1269
e40298d5 1270 iter = iter->GetParent() ;
6264b550 1271 }
6ed71b4f 1272
e40298d5 1273 if (m_hScrollBar && m_hScrollBar->IsShown() )
6264b550 1274 {
e40298d5
JS
1275 hh -= MAC_SCROLLBAR_SIZE;
1276 if ( h-y1 >= totH )
1277 {
1278 hh += 1 ;
1279 }
6264b550 1280 }
e40298d5 1281 if (m_vScrollBar && m_vScrollBar->IsShown() )
6264b550 1282 {
e40298d5
JS
1283 ww -= MAC_SCROLLBAR_SIZE;
1284 if ( w-x1 >= totW )
1285 {
1286 ww += 1 ;
1287 }
6264b550
RR
1288 }
1289 }
e40298d5
JS
1290 if(x) *x = ww;
1291 if(y) *y = hh;
facd6764
SC
1292
1293}
1294
1295bool wxWindowMac::SetCursor(const wxCursor& cursor)
1296{
1297 if (m_cursor == cursor)
1298 return FALSE;
1299
1300 if (wxNullCursor == cursor)
1301 {
1302 if ( ! wxWindowBase::SetCursor( *wxSTANDARD_CURSOR ) )
1303 return FALSE ;
1304 }
1305 else
1306 {
1307 if ( ! wxWindowBase::SetCursor( cursor ) )
1308 return FALSE ;
1309 }
1310
1311 wxASSERT_MSG( m_cursor.Ok(),
1312 wxT("cursor must be valid after call to the base version"));
1313
1314 /*
1315
1316 TODO why do we have to use current coordinates ?
1317
1318 Point pt ;
1319 wxWindowMac *mouseWin ;
1320 GetMouse( &pt ) ;
1321
1322 // Change the cursor NOW if we're within the correct window
1323
1324
1325 if ( MacGetWindowFromPoint( wxPoint( pt.h , pt.v ) , &mouseWin ) )
1326 {
1327 if ( mouseWin == this && !wxIsBusy() )
1328 {
1329 m_cursor.MacInstall() ;
1330 }
1331 }
1332 */
1333 if ( !wxIsBusy() )
1334 {
1335 m_cursor.MacInstall() ;
1336 }
1337
1338 return TRUE ;
519cb848
SC
1339}
1340
facd6764
SC
1341#if wxUSE_MENUS
1342bool wxWindowMac::DoPopupMenu(wxMenu *menu, int x, int y)
1343{
1344 menu->SetInvokingWindow(this);
1345 menu->UpdateUI();
1346 ClientToScreen( &x , &y ) ;
1347
1348 menu->MacBeforeDisplay( true ) ;
1349 long menuResult = ::PopUpMenuSelect((MenuHandle) menu->GetHMenu() ,y,x, 0) ;
1350 if ( HiWord(menuResult) != 0 )
1351 {
1352 MenuCommand id ;
1353 GetMenuItemCommandID( GetMenuHandle(HiWord(menuResult)) , LoWord(menuResult) , &id ) ;
1354 wxMenuItem* item = NULL ;
1355 wxMenu* realmenu ;
1356 item = menu->FindItem(id, &realmenu) ;
1357 if (item->IsCheckable())
1358 {
1359 item->Check( !item->IsChecked() ) ;
1360 }
1361 menu->SendEvent( id , item->IsCheckable() ? item->IsChecked() : -1 ) ;
1362 }
1363 menu->MacAfterDisplay( true ) ;
1364
1365 menu->SetInvokingWindow(NULL);
1366
1367 return TRUE;
1368}
1369#endif
51abe921
SC
1370
1371// ----------------------------------------------------------------------------
1372// tooltips
1373// ----------------------------------------------------------------------------
1374
1375#if wxUSE_TOOLTIPS
1376
e766c8a9 1377void wxWindowMac::DoSetToolTip(wxToolTip *tooltip)
51abe921
SC
1378{
1379 wxWindowBase::DoSetToolTip(tooltip);
6ed71b4f 1380
6264b550
RR
1381 if ( m_tooltip )
1382 m_tooltip->SetWindow(this);
51abe921
SC
1383}
1384
1385#endif // wxUSE_TOOLTIPS
1386
e766c8a9 1387void wxWindowMac::DoMoveWindow(int x, int y, int width, int height)
51abe921 1388{
facd6764
SC
1389 int former_x , former_y , former_w, former_h ;
1390#if !TARGET_API_MAC_OSX
1391 DoGetPosition( &former_x , &former_y ) ;
1392 DoGetSize( &former_w , &former_h ) ;
1393#else
1394 MacGetPositionAndSizeFromControl( former_x , former_y , former_w , former_h ) ;
1395#endif
6ed71b4f 1396
e40298d5
JS
1397 int actualWidth = width;
1398 int actualHeight = height;
1399 int actualX = x;
1400 int actualY = y;
6ed71b4f 1401
14c9cbdb 1402 if ((m_minWidth != -1) && (actualWidth < m_minWidth))
6264b550 1403 actualWidth = m_minWidth;
14c9cbdb 1404 if ((m_minHeight != -1) && (actualHeight < m_minHeight))
6264b550 1405 actualHeight = m_minHeight;
14c9cbdb 1406 if ((m_maxWidth != -1) && (actualWidth > m_maxWidth))
6264b550 1407 actualWidth = m_maxWidth;
14c9cbdb 1408 if ((m_maxHeight != -1) && (actualHeight > m_maxHeight))
6264b550 1409 actualHeight = m_maxHeight;
6ed71b4f 1410
6264b550
RR
1411 bool doMove = false ;
1412 bool doResize = false ;
6ed71b4f 1413
6264b550
RR
1414 if ( actualX != former_x || actualY != former_y )
1415 {
1416 doMove = true ;
1417 }
1418 if ( actualWidth != former_w || actualHeight != former_h )
1419 {
1420 doResize = true ;
1421 }
6ed71b4f 1422
6264b550
RR
1423 if ( doMove || doResize )
1424 {
79392158
SC
1425 // we don't adjust twice for the origin
1426 Rect r = wxMacGetBoundsForControl(this , wxPoint( actualX,actualY), wxSize( actualWidth, actualHeight ) , false ) ;
b05bf6ee 1427 bool vis = IsControlVisible( (ControlRef) m_macControl ) ;
facd6764 1428#if TARGET_API_MAC_OSX
b05bf6ee
SC
1429 // the HIViewSetFrame call itself should invalidate the areas, but when testing with the UnicodeTextCtrl it does not !
1430 if ( vis )
1431 SetControlVisibility( (ControlRef)m_macControl , false , true ) ;
1432 HIRect hir = { r.left , r.top , r.right - r.left , r.bottom - r.top } ;
1433 HIViewSetFrame ( (ControlRef) m_macControl , &hir ) ;
1434 if ( vis )
1435 SetControlVisibility( (ControlRef)m_macControl , true , true ) ;
facd6764 1436#else
b05bf6ee
SC
1437 if ( vis )
1438 SetControlVisibility( (ControlRef)m_macControl , false , true ) ;
6548fabe 1439 SetControlBounds( (ControlRef) m_macControl , &r ) ;
b05bf6ee
SC
1440 if ( vis )
1441 SetControlVisibility( (ControlRef)m_macControl , true , true ) ;
facd6764 1442#endif
6264b550
RR
1443 MacRepositionScrollBars() ;
1444 if ( doMove )
1445 {
facd6764 1446 wxPoint point(actualX,actualY);
6264b550
RR
1447 wxMoveEvent event(point, m_windowId);
1448 event.SetEventObject(this);
1449 GetEventHandler()->ProcessEvent(event) ;
1450 }
1451 if ( doResize )
1452 {
e40298d5 1453 MacRepositionScrollBars() ;
facd6764 1454 wxSize size(actualWidth, actualHeight);
e40298d5
JS
1455 wxSizeEvent event(size, m_windowId);
1456 event.SetEventObject(this);
1457 GetEventHandler()->ProcessEvent(event);
6264b550
RR
1458 }
1459 }
6ed71b4f 1460
954fc50b
SC
1461}
1462
facd6764
SC
1463wxSize wxWindowMac::DoGetBestSize() const
1464{
eb69d46e
SC
1465 if ( m_macIsUserPane || IsTopLevel() )
1466 return wxWindowBase::DoGetBestSize() ;
1467
facd6764
SC
1468 Rect bestsize = { 0 , 0 , 0 , 0 } ;
1469 short baselineoffset ;
1470 int bestWidth, bestHeight ;
1471 ::GetBestControlRect( (ControlRef) m_macControl , &bestsize , &baselineoffset ) ;
1472
1473 if ( EmptyRect( &bestsize ) )
1474 {
1475 baselineoffset = 0;
1476 bestsize.left = bestsize.top = 0 ;
1477 bestsize.right = 16 ;
1478 bestsize.bottom = 16 ;
1479 if ( IsKindOf( CLASSINFO( wxScrollBar ) ) )
1480 {
1481 bestsize.bottom = 16 ;
1482 }
1483 else if ( IsKindOf( CLASSINFO( wxSpinButton ) ) )
1484 {
1485 bestsize.bottom = 24 ;
1486 }
1487 else
1488 {
1489 // return wxWindowBase::DoGetBestSize() ;
1490 }
1491 }
1492
1493 bestWidth = bestsize.right - bestsize.left ;
1494 bestHeight = bestsize.bottom - bestsize.top ;
1495 if ( bestHeight < 10 )
1496 bestHeight = 13 ;
1497
1498 return wxSize(bestWidth, bestHeight);
eb69d46e 1499// return wxWindowBase::DoGetBestSize() ;
facd6764
SC
1500}
1501
1502
954fc50b
SC
1503// set the size of the window: if the dimensions are positive, just use them,
1504// but if any of them is equal to -1, it means that we must find the value for
1505// it ourselves (unless sizeFlags contains wxSIZE_ALLOW_MINUS_ONE flag, in
1506// which case -1 is a valid value for x and y)
1507//
1508// If sizeFlags contains wxSIZE_AUTO_WIDTH/HEIGHT flags (default), we calculate
1509// the width/height to best suit our contents, otherwise we reuse the current
1510// width/height
1511void wxWindowMac::DoSetSize(int x, int y, int width, int height, int sizeFlags)
1512{
1513 // get the current size and position...
1514 int currentX, currentY;
1515 GetPosition(&currentX, &currentY);
6ed71b4f 1516
954fc50b
SC
1517 int currentW,currentH;
1518 GetSize(&currentW, &currentH);
6ed71b4f 1519
954fc50b
SC
1520 // ... and don't do anything (avoiding flicker) if it's already ok
1521 if ( x == currentX && y == currentY &&
769ac869 1522 width == currentW && height == currentH && ( height != -1 && width != -1 ) )
954fc50b 1523 {
facd6764 1524 // TODO REMOVE
6264b550 1525 MacRepositionScrollBars() ; // we might have a real position shift
954fc50b
SC
1526 return;
1527 }
6ed71b4f 1528
954fc50b
SC
1529 if ( x == -1 && !(sizeFlags & wxSIZE_ALLOW_MINUS_ONE) )
1530 x = currentX;
1531 if ( y == -1 && !(sizeFlags & wxSIZE_ALLOW_MINUS_ONE) )
1532 y = currentY;
6ed71b4f 1533
954fc50b 1534 AdjustForParentClientOrigin(x, y, sizeFlags);
6ed71b4f 1535
954fc50b
SC
1536 wxSize size(-1, -1);
1537 if ( width == -1 )
1538 {
1539 if ( sizeFlags & wxSIZE_AUTO_WIDTH )
1540 {
1541 size = DoGetBestSize();
1542 width = size.x;
1543 }
1544 else
1545 {
1546 // just take the current one
1547 width = currentW;
1548 }
1549 }
6ed71b4f 1550
954fc50b
SC
1551 if ( height == -1 )
1552 {
1553 if ( sizeFlags & wxSIZE_AUTO_HEIGHT )
1554 {
1555 if ( size.x == -1 )
1556 {
1557 size = DoGetBestSize();
1558 }
1559 //else: already called DoGetBestSize() above
6ed71b4f 1560
954fc50b
SC
1561 height = size.y;
1562 }
1563 else
1564 {
1565 // just take the current one
1566 height = currentH;
1567 }
1568 }
6ed71b4f 1569
954fc50b 1570 DoMoveWindow(x, y, width, height);
6ed71b4f 1571
e9576ca5 1572}
519cb848 1573
e766c8a9 1574wxPoint wxWindowMac::GetClientAreaOrigin() const
e9576ca5 1575{
facd6764
SC
1576 RgnHandle rgn = NewRgn() ;
1577 Rect content ;
1578 GetControlRegion( (ControlRef) m_macControl , kControlContentMetaPart , rgn ) ;
1579 GetRegionBounds( rgn , &content ) ;
1580 DisposeRgn( rgn ) ;
1581#if !TARGET_API_MAC_OSX
1582 Rect structure ;
1583 GetControlBounds( (ControlRef) m_macControl , &structure ) ;
1584 OffsetRect( &content , -structure.left , -structure.top ) ;
1585#endif
1586
1587 return wxPoint( content.left + MacGetLeftBorderSize( ) , content.top + MacGetTopBorderSize( ) );
1588}
1589
1590void wxWindowMac::DoSetClientSize(int clientwidth, int clientheight)
1591{
1592 if ( clientheight != -1 || clientheight != -1 )
1593 {
1594 int currentclientwidth , currentclientheight ;
1595 int currentwidth , currentheight ;
1596
1597 GetClientSize( &currentclientwidth , &currentclientheight ) ;
1598 GetSize( &currentwidth , &currentheight ) ;
1599
1600 DoSetSize( -1 , -1 , currentwidth + clientwidth - currentclientwidth ,
1601 currentheight + clientheight - currentclientheight , wxSIZE_USE_EXISTING ) ;
1602 }
e9576ca5
SC
1603}
1604
d84afea9 1605void wxWindowMac::SetTitle(const wxString& title)
e9576ca5 1606{
facd6764
SC
1607 m_label = wxStripMenuCodes(title) ;
1608
1609 if ( m_macControl )
1610 {
1611 UMASetControlTitle( (ControlRef) m_macControl , m_label , m_font.GetEncoding() ) ;
1612 }
1613 Refresh() ;
519cb848
SC
1614}
1615
d84afea9 1616wxString wxWindowMac::GetTitle() const
519cb848 1617{
ed60b502 1618 return m_label ;
519cb848
SC
1619}
1620
8ab50549
SC
1621bool wxWindowMac::Show(bool show)
1622{
1623 if ( !wxWindowBase::Show(show) )
1624 return FALSE;
1625
1626 // TODO use visibilityChanged Carbon Event for OSX
1627 bool former = MacIsReallyShown() ;
1628
1629 SetControlVisibility( (ControlRef) m_macControl , show , true ) ;
1630 if ( former != MacIsReallyShown() )
1631 MacPropagateVisibilityChanged() ;
1632 return TRUE;
1633}
1634
1635bool wxWindowMac::Enable(bool enable)
1636{
1637 wxASSERT( m_macControl != NULL ) ;
1638 if ( !wxWindowBase::Enable(enable) )
1639 return FALSE;
1640
1641 bool former = MacIsReallyEnabled() ;
1642 if ( enable )
1643 EnableControl( (ControlRef) m_macControl ) ;
1644 else
1645 DisableControl( (ControlRef) m_macControl ) ;
1646
1647 if ( former != MacIsReallyEnabled() )
1648 MacPropagateEnabledStateChanged() ;
1649 return TRUE;
1650}
1651
1652//
1653// status change propagations (will be not necessary for OSX later )
1654//
1655
facd6764
SC
1656void wxWindowMac::MacPropagateVisibilityChanged()
1657{
73fe67bd 1658#if !TARGET_API_MAC_OSX
facd6764
SC
1659 MacVisibilityChanged() ;
1660
1661 wxWindowListNode *node = GetChildren().GetFirst();
1662 while ( node )
1663 {
1664 wxWindowMac *child = node->GetData();
1665 if ( child->IsShown() )
1666 child->MacPropagateVisibilityChanged( ) ;
1667 node = node->GetNext();
1668 }
73fe67bd 1669#endif
facd6764
SC
1670}
1671
8ab50549 1672void wxWindowMac::MacPropagateEnabledStateChanged( )
e9576ca5 1673{
73fe67bd 1674#if !TARGET_API_MAC_OSX
8ab50549 1675 MacEnabledStateChanged() ;
facd6764 1676
8ab50549
SC
1677 wxWindowListNode *node = GetChildren().GetFirst();
1678 while ( node )
1679 {
1680 wxWindowMac *child = node->GetData();
1681 if ( child->IsEnabled() )
1682 child->MacPropagateEnabledStateChanged() ;
1683 node = node->GetNext();
1684 }
73fe67bd 1685#endif
8ab50549
SC
1686}
1687
1688void wxWindowMac::MacPropagateHiliteChanged( )
1689{
73fe67bd 1690#if !TARGET_API_MAC_OSX
8ab50549 1691 MacHiliteChanged() ;
facd6764 1692
8ab50549
SC
1693 wxWindowListNode *node = GetChildren().GetFirst();
1694 while ( node )
1695 {
1696 wxWindowMac *child = node->GetData();
1697 // if ( child->IsEnabled() )
1698 child->MacPropagateHiliteChanged() ;
1699 node = node->GetNext();
1700 }
73fe67bd 1701#endif
8ab50549
SC
1702}
1703
1704//
1705// status change notifications
1706//
1707
1708void wxWindowMac::MacVisibilityChanged()
1709{
1710}
1711
1712void wxWindowMac::MacHiliteChanged()
1713{
1714}
1715
1716void wxWindowMac::MacEnabledStateChanged()
1717{
facd6764 1718}
e7549107 1719
8ab50549
SC
1720//
1721// status queries on the inherited window's state
1722//
1723
facd6764
SC
1724bool wxWindowMac::MacIsReallyShown()
1725{
1726 // only under OSX the visibility of the TLW is taken into account
1727#if TARGET_API_MAC_OSX
1728 return IsControlVisible( (ControlRef) m_macControl ) ;
1729#else
1730 wxWindow* win = this ;
1731 while( win->IsShown() )
1732 {
1733 if ( win->IsTopLevel() )
1734 return true ;
1735
1736 win = win->GetParent() ;
1737 if ( win == NULL )
1738 return true ;
1739
1740 } ;
1741 return false ;
1742#endif
1743}
4241baae 1744
facd6764
SC
1745bool wxWindowMac::MacIsReallyEnabled()
1746{
1747 return IsControlEnabled( (ControlRef) m_macControl ) ;
1748}
1749
8ab50549 1750bool wxWindowMac::MacIsReallyHilited()
c809f3be 1751{
8ab50549 1752 return IsControlActive( (ControlRef) m_macControl ) ;
c809f3be
SC
1753}
1754
8ab50549
SC
1755//
1756//
1757//
1758
e766c8a9 1759int wxWindowMac::GetCharHeight() const
e9576ca5 1760{
6264b550
RR
1761 wxClientDC dc ( (wxWindowMac*)this ) ;
1762 return dc.GetCharHeight() ;
e9576ca5
SC
1763}
1764
e766c8a9 1765int wxWindowMac::GetCharWidth() const
e9576ca5 1766{
6264b550
RR
1767 wxClientDC dc ( (wxWindowMac*)this ) ;
1768 return dc.GetCharWidth() ;
e9576ca5
SC
1769}
1770
e766c8a9 1771void wxWindowMac::GetTextExtent(const wxString& string, int *x, int *y,
e7549107 1772 int *descent, int *externalLeading, const wxFont *theFont ) const
e9576ca5 1773{
e7549107
SC
1774 const wxFont *fontToUse = theFont;
1775 if ( !fontToUse )
1776 fontToUse = &m_font;
14c9cbdb 1777
e766c8a9 1778 wxClientDC dc( (wxWindowMac*) this ) ;
7c74e7fe 1779 long lx,ly,ld,le ;
5fde6fcc 1780 dc.GetTextExtent( string , &lx , &ly , &ld, &le, (wxFont *)fontToUse ) ;
2f1ae414 1781 if ( externalLeading )
6264b550 1782 *externalLeading = le ;
2f1ae414 1783 if ( descent )
6264b550 1784 *descent = ld ;
2f1ae414 1785 if ( x )
6264b550 1786 *x = lx ;
2f1ae414 1787 if ( y )
6264b550 1788 *y = ly ;
e9576ca5
SC
1789}
1790
0a67a93b 1791/*
14c9cbdb 1792 * Rect is given in client coordinates, for further reading, read wxTopLevelWindowMac::InvalidateRect
1c310985
SC
1793 * we always intersect with the entire window, not only with the client area
1794 */
14c9cbdb 1795
e766c8a9 1796void wxWindowMac::Refresh(bool eraseBack, const wxRect *rect)
e9576ca5 1797{
facd6764 1798#if TARGET_API_MAC_OSX
1e8cde71
SC
1799 if ( rect == NULL )
1800 HIViewSetNeedsDisplay( (ControlRef) m_macControl , true ) ;
1801 else
1802 {
1803 RgnHandle update = NewRgn() ;
1804 SetRectRgn( update , rect->x , rect->y , rect->x + rect->width , rect->y + rect->height ) ;
84f6927e
SC
1805 SectRgn( (RgnHandle) MacGetVisibleRegion().GetWXHRGN() , update , update ) ;
1806 wxPoint origin = GetClientAreaOrigin() ;
1807 OffsetRgn( update, origin.x , origin.y ) ;
1e8cde71
SC
1808 HIViewSetNeedsDisplayInRegion( (ControlRef) m_macControl , update , true ) ;
1809 }
facd6764 1810#else
a9825a9b
SC
1811/*
1812 RgnHandle updateRgn = NewRgn() ;
1813 if ( rect == NULL )
1814 {
1815 CopyRgn( (RgnHandle) MacGetVisibleRegion().GetWXHRGN() , updateRgn ) ;
1816 }
1817 else
1818 {
1819 SetRectRgn( updateRgn , rect->x , rect->y , rect->x + rect->width , rect->y + rect->height ) ;
1820 SectRgn( (RgnHandle) MacGetVisibleRegion().GetWXHRGN() , updateRgn , updateRgn ) ;
1821 }
1822 InvalWindowRgn( (WindowRef) MacGetTopLevelWindowRef() , updateRgn ) ;
1823 DisposeRgn(updateRgn) ;
1824*/
facd6764
SC
1825 if ( IsControlVisible( (ControlRef) m_macControl ) )
1826 {
1827 SetControlVisibility( (ControlRef) m_macControl , false , false ) ;
1828 SetControlVisibility( (ControlRef) m_macControl , true , true ) ;
1829 }
1830 /*
94abc21f 1831 if ( MacGetTopLevelWindow() == NULL )
9a456218 1832 return ;
14c9cbdb 1833
facd6764 1834 if ( !IsControlVisible( (ControlRef) m_macControl ) )
c3a05e8a
SC
1835 return ;
1836
1837 wxPoint client = GetClientAreaOrigin();
9a456218
RR
1838 int x1 = -client.x;
1839 int y1 = -client.y;
1840 int x2 = m_width - client.x;
1841 int y2 = m_height - client.y;
1842
1843 if (IsKindOf( CLASSINFO(wxButton)))
1844 {
1845 // buttons have an "aura"
1846 y1 -= 5;
1847 x1 -= 5;
1848 y2 += 5;
1849 x2 += 5;
1850 }
1851
1852 Rect clientrect = { y1, x1, y2, x2 };
14c9cbdb 1853
1c310985 1854 if ( rect )
6264b550 1855 {
1c310985 1856 Rect r = { rect->y , rect->x , rect->y + rect->height , rect->x + rect->width } ;
14c9cbdb 1857 SectRect( &clientrect , &r , &clientrect ) ;
6264b550 1858 }
14c9cbdb 1859
1c310985 1860 if ( !EmptyRect( &clientrect ) )
e9576ca5 1861 {
1c310985 1862 int top = 0 , left = 0 ;
14c9cbdb 1863
1c310985
SC
1864 MacClientToRootWindow( &left , &top ) ;
1865 OffsetRect( &clientrect , left , top ) ;
14c9cbdb 1866
1c310985 1867 MacGetTopLevelWindow()->MacInvalidate( &clientrect , eraseBack ) ;
e9576ca5 1868 }
facd6764
SC
1869 */
1870#endif
1871}
1872
79392158
SC
1873void wxWindowMac::Freeze()
1874{
1875#if TARGET_API_MAC_OSX
1876 if ( !m_frozenness++ )
1877 {
1878 HIViewSetDrawingEnabled( (HIViewRef) m_macControl , false ) ;
1879 }
1880#endif
1881}
1882
b175b96b
SC
1883#if TARGET_API_MAC_OSX
1884static void InvalidateControlAndChildren( HIViewRef control )
1885{
1886 HIViewSetNeedsDisplay( control , true ) ;
1887 UInt16 childrenCount = 0 ;
1888 OSStatus err = CountSubControls( control , &childrenCount ) ;
1889 if ( err == errControlIsNotEmbedder )
1890 return ;
1891 wxASSERT_MSG( err == noErr , wxT("Unexpected error when accessing subcontrols") ) ;
1892
1893 for ( UInt16 i = childrenCount ; i >=1 ; --i )
1894 {
1895 HIViewRef child ;
1896 err = GetIndexedSubControl( control , i , & child ) ;
1897 if ( err == errControlIsNotEmbedder )
1898 return ;
1899 InvalidateControlAndChildren( child ) ;
1900 }
1901}
1902#endif
1903
79392158
SC
1904void wxWindowMac::Thaw()
1905{
1906#if TARGET_API_MAC_OSX
1907 wxASSERT_MSG( m_frozenness > 0, _T("Thaw() without matching Freeze()") );
1908
1909 if ( !--m_frozenness )
1910 {
1911 HIViewSetDrawingEnabled( (HIViewRef) m_macControl , true ) ;
b175b96b
SC
1912 InvalidateControlAndChildren( (HIViewRef) m_macControl ) ;
1913 // HIViewSetNeedsDisplay( (HIViewRef) m_macControl , true ) ;
79392158
SC
1914 }
1915#endif
1916}
1917
facd6764
SC
1918void wxWindowMac::MacRedrawControl()
1919{
1920/*
1921 if ( (ControlRef) m_macControl && MacGetTopLevelWindowRef() && IsControlVisible( (ControlRef) m_macControl ) )
1922 {
1923#if TARGET_API_MAC_CARBON
1924 Update() ;
1925#else
1926 wxClientDC dc(this) ;
1927 wxMacPortSetter helper(&dc) ;
1928 wxMacWindowClipper clipper(this) ;
1929 wxDC::MacSetupBackgroundForCurrentPort( MacGetBackgroundBrush() ) ;
1930 UMADrawControl( (ControlRef) m_macControl ) ;
1931#endif
1932 }
1933*/
1934}
1935
1936/* TODO
1937void wxWindowMac::OnPaint(wxPaintEvent& event)
1938{
1939 // why don't we skip that here ?
e9576ca5 1940}
facd6764 1941*/
e9576ca5 1942
e766c8a9 1943wxWindowMac *wxGetActiveWindow()
e9576ca5 1944{
519cb848 1945 // actually this is a windows-only concept
e9576ca5
SC
1946 return NULL;
1947}
1948
e9576ca5 1949// Coordinates relative to the window
e766c8a9 1950void wxWindowMac::WarpPointer (int x_pos, int y_pos)
e9576ca5 1951{
e40298d5 1952 // We really don't move the mouse programmatically under Mac.
e9576ca5
SC
1953}
1954
facd6764 1955void wxWindowMac::OnEraseBackground(wxEraseEvent& event)
e9576ca5 1956{
facd6764 1957 if ( m_macBackgroundBrush.Ok() == false || m_macBackgroundBrush.GetStyle() == wxTRANSPARENT )
94abc21f 1958 {
facd6764 1959 event.Skip() ;
94abc21f
SC
1960 }
1961 else
facd6764 1962 event.GetDC()->Clear() ;
1c310985
SC
1963}
1964
1965void wxWindowMac::OnNcPaint( wxNcPaintEvent& event )
1966{
de043984
SC
1967 wxWindowDC dc(this) ;
1968 wxMacPortSetter helper(&dc) ;
14c9cbdb 1969
76a5e5d2 1970 MacPaintBorders( dc.m_macLocalOrigin.x , dc.m_macLocalOrigin.y) ;
e9576ca5
SC
1971}
1972
e766c8a9 1973int wxWindowMac::GetScrollPos(int orient) const
e9576ca5 1974{
1c310985
SC
1975 if ( orient == wxHORIZONTAL )
1976 {
1977 if ( m_hScrollBar )
1978 return m_hScrollBar->GetThumbPosition() ;
1979 }
1980 else
1981 {
1982 if ( m_vScrollBar )
1983 return m_vScrollBar->GetThumbPosition() ;
1984 }
e9576ca5
SC
1985 return 0;
1986}
1987
1988// This now returns the whole range, not just the number
1989// of positions that we can scroll.
e766c8a9 1990int wxWindowMac::GetScrollRange(int orient) const
e9576ca5 1991{
1c310985
SC
1992 if ( orient == wxHORIZONTAL )
1993 {
1994 if ( m_hScrollBar )
1995 return m_hScrollBar->GetRange() ;
1996 }
1997 else
1998 {
1999 if ( m_vScrollBar )
2000 return m_vScrollBar->GetRange() ;
2001 }
e9576ca5
SC
2002 return 0;
2003}
2004
e766c8a9 2005int wxWindowMac::GetScrollThumb(int orient) const
e9576ca5 2006{
1c310985
SC
2007 if ( orient == wxHORIZONTAL )
2008 {
2009 if ( m_hScrollBar )
2010 return m_hScrollBar->GetThumbSize() ;
2011 }
2012 else
2013 {
2014 if ( m_vScrollBar )
2015 return m_vScrollBar->GetThumbSize() ;
2016 }
e9576ca5
SC
2017 return 0;
2018}
2019
e766c8a9 2020void wxWindowMac::SetScrollPos(int orient, int pos, bool refresh)
e9576ca5 2021{
1c310985 2022 if ( orient == wxHORIZONTAL )
6264b550 2023 {
1c310985
SC
2024 if ( m_hScrollBar )
2025 m_hScrollBar->SetThumbPosition( pos ) ;
6264b550
RR
2026 }
2027 else
2028 {
1c310985
SC
2029 if ( m_vScrollBar )
2030 m_vScrollBar->SetThumbPosition( pos ) ;
6264b550 2031 }
2f1ae414
SC
2032}
2033
14c9cbdb 2034void wxWindowMac::MacPaintBorders( int left , int top )
2f1ae414 2035{
1c310985 2036 if( IsTopLevel() )
6264b550 2037 return ;
11d1adbf
SC
2038
2039 int major,minor;
2040 wxGetOsVersion( &major, &minor );
14c9cbdb 2041
6264b550 2042 RGBColor white = { 0xFFFF, 0xFFFF , 0xFFFF } ;
6264b550 2043 RGBColor face = { 0xDDDD, 0xDDDD , 0xDDDD } ;
11d1adbf
SC
2044
2045 RGBColor darkShadow = { 0x0000, 0x0000 , 0x0000 } ;
2046 RGBColor lightShadow = { 0x4444, 0x4444 , 0x4444 } ;
2047 // OS X has lighter border edges than classic:
2048 if (major >= 10)
2049 {
2050 darkShadow.red = 0x8E8E;
2051 darkShadow.green = 0x8E8E;
2052 darkShadow.blue = 0x8E8E;
2053 lightShadow.red = 0xBDBD;
2054 lightShadow.green = 0xBDBD;
2055 lightShadow.blue = 0xBDBD;
2056 }
2057
6264b550 2058 PenNormal() ;
2f1ae414 2059
facd6764
SC
2060 int w , h ;
2061 GetSize( &w , &h ) ;
2f1ae414
SC
2062 if (HasFlag(wxRAISED_BORDER) || HasFlag( wxSUNKEN_BORDER) || HasFlag(wxDOUBLE_BORDER) )
2063 {
1c310985 2064#if wxMAC_USE_THEME_BORDER
11d1adbf
SC
2065 Rect rect = { top , left , m_height + top , m_width + left } ;
2066 SInt32 border = 0 ;
2067 /*
2068 GetThemeMetric( kThemeMetricListBoxFrameOutset , &border ) ;
2069 InsetRect( &rect , border , border );
2070 DrawThemeListBoxFrame(&rect,IsEnabled() ? kThemeStateActive : kThemeStateInactive) ;
2071 */
14c9cbdb 2072
1c310985
SC
2073 DrawThemePrimaryGroup(&rect ,IsEnabled() ? kThemeStateActive : kThemeStateInactive) ;
2074#else
ed60b502 2075 bool sunken = HasFlag( wxSUNKEN_BORDER ) ;
653b2449 2076 RGBForeColor( &face );
facd6764 2077 MoveTo( left + 0 , top + h - 2 );
7d9d1fd7 2078 LineTo( left + 0 , top + 0 );
facd6764 2079 LineTo( left + w - 2 , top + 0 );
653b2449 2080
facd6764
SC
2081 MoveTo( left + 2 , top + h - 3 );
2082 LineTo( left + w - 3 , top + h - 3 );
2083 LineTo( left + w - 3 , top + 2 );
653b2449 2084
11d1adbf 2085 RGBForeColor( sunken ? &face : &darkShadow );
facd6764
SC
2086 MoveTo( left + 0 , top + h - 1 );
2087 LineTo( left + w - 1 , top + h - 1 );
2088 LineTo( left + w - 1 , top + 0 );
653b2449 2089
11d1adbf 2090 RGBForeColor( sunken ? &lightShadow : &white );
facd6764 2091 MoveTo( left + 1 , top + h - 3 );
7d9d1fd7 2092 LineTo( left + 1, top + 1 );
facd6764 2093 LineTo( left + w - 3 , top + 1 );
653b2449 2094
11d1adbf 2095 RGBForeColor( sunken ? &white : &lightShadow );
facd6764
SC
2096 MoveTo( left + 1 , top + h - 2 );
2097 LineTo( left + w - 2 , top + h - 2 );
2098 LineTo( left + w - 2 , top + 1 );
653b2449 2099
11d1adbf 2100 RGBForeColor( sunken ? &darkShadow : &face );
facd6764 2101 MoveTo( left + 2 , top + h - 4 );
7d9d1fd7 2102 LineTo( left + 2 , top + 2 );
facd6764 2103 LineTo( left + w - 4 , top + 2 );
1c310985 2104#endif
8208e181
SC
2105 }
2106 else if (HasFlag(wxSIMPLE_BORDER))
2107 {
facd6764 2108 Rect rect = { top , left , h + top , w + left } ;
11d1adbf 2109 RGBForeColor( &darkShadow ) ;
6264b550 2110 FrameRect( &rect ) ;
2f1ae414 2111 }
8208e181
SC
2112}
2113
abda5788
SC
2114void wxWindowMac::RemoveChild( wxWindowBase *child )
2115{
2116 if ( child == m_hScrollBar )
2117 m_hScrollBar = NULL ;
2118 if ( child == m_vScrollBar )
2119 m_vScrollBar = NULL ;
14c9cbdb 2120
abda5788
SC
2121 wxWindowBase::RemoveChild( child ) ;
2122}
2123
e9576ca5 2124// New function that will replace some of the above.
e766c8a9 2125void wxWindowMac::SetScrollbar(int orient, int pos, int thumbVisible,
e9576ca5
SC
2126 int range, bool refresh)
2127{
e40298d5
JS
2128 if ( orient == wxHORIZONTAL )
2129 {
2130 if ( m_hScrollBar )
6264b550 2131 {
e40298d5 2132 if ( range == 0 || thumbVisible >= range )
6264b550 2133 {
e40298d5
JS
2134 if ( m_hScrollBar->IsShown() )
2135 m_hScrollBar->Show(false) ;
2136 }
2137 else
2138 {
2139 if ( !m_hScrollBar->IsShown() )
2140 m_hScrollBar->Show(true) ;
2141 m_hScrollBar->SetScrollbar( pos , thumbVisible , range , thumbVisible , refresh ) ;
6264b550
RR
2142 }
2143 }
e40298d5
JS
2144 }
2145 else
2146 {
2147 if ( m_vScrollBar )
6264b550 2148 {
e40298d5 2149 if ( range == 0 || thumbVisible >= range )
6264b550 2150 {
e40298d5
JS
2151 if ( m_vScrollBar->IsShown() )
2152 m_vScrollBar->Show(false) ;
2153 }
2154 else
2155 {
2156 if ( !m_vScrollBar->IsShown() )
2157 m_vScrollBar->Show(true) ;
2158 m_vScrollBar->SetScrollbar( pos , thumbVisible , range , thumbVisible , refresh ) ;
6264b550
RR
2159 }
2160 }
e40298d5
JS
2161 }
2162 MacRepositionScrollBars() ;
e9576ca5
SC
2163}
2164
2165// Does a physical scroll
e766c8a9 2166void wxWindowMac::ScrollWindow(int dx, int dy, const wxRect *rect)
e9576ca5 2167{
ba87f54c
SC
2168 if( dx == 0 && dy ==0 )
2169 return ;
2170
6ed71b4f 2171
6264b550 2172 {
fe779e40
SC
2173 wxClientDC dc(this) ;
2174 wxMacPortSetter helper(&dc) ;
2175
6264b550
RR
2176 int width , height ;
2177 GetClientSize( &width , &height ) ;
6ed71b4f 2178
facd6764
SC
2179
2180 wxPoint pos;
2181 pos.x = pos.y = 0;
2182
2183 Rect scrollrect;
2184 // TODO take out the boundaries
2185 GetControlBounds( (ControlRef) m_macControl, &scrollrect);
2186
6264b550 2187 RgnHandle updateRgn = NewRgn() ;
6264b550
RR
2188 if ( rect )
2189 {
14c9cbdb 2190 Rect r = { dc.YLOG2DEVMAC(rect->y) , dc.XLOG2DEVMAC(rect->x) , dc.YLOG2DEVMAC(rect->y + rect->height) ,
e40298d5 2191 dc.XLOG2DEVMAC(rect->x + rect->width) } ;
14c9cbdb 2192 SectRect( &scrollrect , &r , &scrollrect ) ;
6264b550
RR
2193 }
2194 ScrollRect( &scrollrect , dx , dy , updateRgn ) ;
facd6764
SC
2195#if TARGET_CARBON
2196 //KO: The docs say ScrollRect creates an update region, which thus calls an update event
2197 // but it seems the update only refreshes the background of the control, rather than calling
2198 // kEventControlDraw, so we need to force a proper update here. There has to be a better
2199 // way of doing this... (Note that code below under !TARGET_CARBON does not work either...)
2200 Update();
2201#endif
ba87f54c
SC
2202 // we also have to scroll the update rgn in this rectangle
2203 // in order not to loose updates
facd6764
SC
2204#if !TARGET_CARBON
2205 WindowRef rootWindow = (WindowRef) MacGetTopLevelWindowRef() ;
ba87f54c
SC
2206 RgnHandle formerUpdateRgn = NewRgn() ;
2207 RgnHandle scrollRgn = NewRgn() ;
2208 RectRgn( scrollRgn , &scrollrect ) ;
2209 GetWindowUpdateRgn( rootWindow , formerUpdateRgn ) ;
2210 Point pt = {0,0} ;
2211 LocalToGlobal( &pt ) ;
fe779e40 2212 OffsetRgn( formerUpdateRgn , -pt.h , -pt.v ) ;
ba87f54c
SC
2213 SectRgn( formerUpdateRgn , scrollRgn , formerUpdateRgn ) ;
2214 if ( !EmptyRgn( formerUpdateRgn ) )
2215 {
2216 MacOffsetRgn( formerUpdateRgn , dx , dy ) ;
2217 SectRgn( formerUpdateRgn , scrollRgn , formerUpdateRgn ) ;
2218 InvalWindowRgn(rootWindow , formerUpdateRgn ) ;
2219 }
2220 InvalWindowRgn(rootWindow , updateRgn ) ;
6264b550 2221 DisposeRgn( updateRgn ) ;
ba87f54c
SC
2222 DisposeRgn( formerUpdateRgn ) ;
2223 DisposeRgn( scrollRgn ) ;
facd6764 2224#endif
6264b550 2225 }
6ed71b4f 2226
eb22f2a6 2227 for (wxWindowListNode *node = GetChildren().GetFirst(); node; node = node->GetNext())
6264b550 2228 {
9bd1404d 2229 wxWindowMac *child = node->GetData();
6264b550
RR
2230 if (child == m_vScrollBar) continue;
2231 if (child == m_hScrollBar) continue;
2232 if (child->IsTopLevel()) continue;
6ed71b4f 2233
6264b550
RR
2234 int x,y;
2235 child->GetPosition( &x, &y );
2236 int w,h;
2237 child->GetSize( &w, &h );
00f55394
SC
2238 if (rect)
2239 {
2240 wxRect rc(x,y,w,h);
2241 if (rect->Intersects(rc))
2242 child->SetSize( x+dx, y+dy, w, h );
2243 }
2244 else
2245 {
2246 child->SetSize( x+dx, y+dy, w, h );
2247 }
6264b550 2248 }
ba87f54c 2249
facd6764 2250// TODO remove, was moved higher up Update() ;
6ed71b4f 2251
e9576ca5
SC
2252}
2253
e766c8a9 2254void wxWindowMac::MacOnScroll(wxScrollEvent &event )
7c74e7fe 2255{
6264b550
RR
2256 if ( event.m_eventObject == m_vScrollBar || event.m_eventObject == m_hScrollBar )
2257 {
2258 wxScrollWinEvent wevent;
2259 wevent.SetPosition(event.GetPosition());
2260 wevent.SetOrientation(event.GetOrientation());
2261 wevent.m_eventObject = this;
6ed71b4f
VZ
2262
2263 if (event.m_eventType == wxEVT_SCROLL_TOP)
6264b550 2264 wevent.m_eventType = wxEVT_SCROLLWIN_TOP;
6ed71b4f
VZ
2265 else if (event.m_eventType == wxEVT_SCROLL_BOTTOM)
2266 wevent.m_eventType = wxEVT_SCROLLWIN_BOTTOM;
2267 else if (event.m_eventType == wxEVT_SCROLL_LINEUP)
2268 wevent.m_eventType = wxEVT_SCROLLWIN_LINEUP;
2269 else if (event.m_eventType == wxEVT_SCROLL_LINEDOWN)
2270 wevent.m_eventType = wxEVT_SCROLLWIN_LINEDOWN;
2271 else if (event.m_eventType == wxEVT_SCROLL_PAGEUP)
2272 wevent.m_eventType = wxEVT_SCROLLWIN_PAGEUP;
2273 else if (event.m_eventType == wxEVT_SCROLL_PAGEDOWN)
2274 wevent.m_eventType = wxEVT_SCROLLWIN_PAGEDOWN;
2275 else if (event.m_eventType == wxEVT_SCROLL_THUMBTRACK)
2276 wevent.m_eventType = wxEVT_SCROLLWIN_THUMBTRACK;
2277 else if (event.m_eventType == wxEVT_SCROLL_THUMBRELEASE)
2278 wevent.m_eventType = wxEVT_SCROLLWIN_THUMBRELEASE;
2279
2280 GetEventHandler()->ProcessEvent(wevent);
7c74e7fe
SC
2281 }
2282}
2283
e9576ca5 2284// Get the window with the focus
e766c8a9 2285wxWindowMac *wxWindowBase::FindFocus()
e9576ca5 2286{
f1d527c1
SC
2287 ControlRef control ;
2288 GetKeyboardFocus( GetUserFocusWindow() , &control ) ;
2289 return wxFindControlFromMacControl( control ) ;
519cb848
SC
2290}
2291
e766c8a9 2292void wxWindowMac::OnSetFocus(wxFocusEvent& event)
7810c95b
SC
2293{
2294 // panel wants to track the window which was the last to have focus in it,
2295 // so we want to set ourselves as the window which last had focus
2296 //
2297 // notice that it's also important to do it upwards the tree becaus
2298 // otherwise when the top level panel gets focus, it won't set it back to
2299 // us, but to some other sibling
6ed71b4f 2300
c1fb8167
SC
2301 // CS:don't know if this is still needed:
2302 //wxChildFocusEvent eventFocus(this);
2303 //(void)GetEventHandler()->ProcessEvent(eventFocus);
7810c95b
SC
2304
2305 event.Skip();
2306}
2307
e39af974 2308void wxWindowMac::OnInternalIdle()
e9576ca5 2309{
e9576ca5
SC
2310 // This calls the UI-update mechanism (querying windows for
2311 // menu/toolbar/control state information)
e39af974
JS
2312 if (wxUpdateUIEvent::CanUpdate(this))
2313 UpdateWindowUI(wxUPDATE_UI_FROMIDLE);
e9576ca5
SC
2314}
2315
2316// Raise the window to the top of the Z order
e766c8a9 2317void wxWindowMac::Raise()
e9576ca5 2318{
6548fabe
SC
2319#if TARGET_API_MAC_OSX
2320 HIViewSetZOrder((ControlRef)m_macControl,kHIViewZOrderAbove, NULL) ;
2321#endif
e9576ca5
SC
2322}
2323
2324// Lower the window to the bottom of the Z order
e766c8a9 2325void wxWindowMac::Lower()
e9576ca5 2326{
6548fabe
SC
2327#if TARGET_API_MAC_OSX
2328 HIViewSetZOrder((ControlRef)m_macControl,kHIViewZOrderBelow, NULL) ;
2329#endif
e9576ca5
SC
2330}
2331
6ed71b4f 2332
facd6764 2333// static wxWindow *gs_lastWhich = NULL;
519cb848 2334
7de59551 2335bool wxWindowMac::MacSetupCursor( const wxPoint& pt)
467e3168
SC
2336{
2337 // first trigger a set cursor event
6ed71b4f 2338
467e3168
SC
2339 wxPoint clientorigin = GetClientAreaOrigin() ;
2340 wxSize clientsize = GetClientSize() ;
2341 wxCursor cursor ;
2342 if ( wxRect2DInt( clientorigin.x , clientorigin.y , clientsize.x , clientsize.y ).Contains( wxPoint2DInt( pt ) ) )
7de59551 2343 {
467e3168 2344 wxSetCursorEvent event( pt.x , pt.y );
6ed71b4f 2345
467e3168
SC
2346 bool processedEvtSetCursor = GetEventHandler()->ProcessEvent(event);
2347 if ( processedEvtSetCursor && event.HasCursor() )
2348 {
e40298d5 2349 cursor = event.GetCursor() ;
467e3168
SC
2350 }
2351 else
2352 {
6ed71b4f 2353
467e3168
SC
2354 // the test for processedEvtSetCursor is here to prevent using m_cursor
2355 // if the user code caught EVT_SET_CURSOR() and returned nothing from
2356 // it - this is a way to say that our cursor shouldn't be used for this
2357 // point
2358 if ( !processedEvtSetCursor && m_cursor.Ok() )
2359 {
2360 cursor = m_cursor ;
2361 }
2362 if ( wxIsBusy() )
2363 {
2364 }
2365 else
2366 {
2367 if ( !GetParent() )
2368 cursor = *wxSTANDARD_CURSOR ;
2369 }
2370 }
2371 if ( cursor.Ok() )
2372 cursor.MacInstall() ;
2373 }
2374 return cursor.Ok() ;
2375}
2376
e766c8a9 2377wxString wxWindowMac::MacGetToolTipString( wxPoint &pt )
2f1ae414 2378{
6264b550
RR
2379 if ( m_tooltip )
2380 {
2381 return m_tooltip->GetTip() ;
2382 }
427ff662 2383 return wxEmptyString ;
2f1ae414 2384}
6264b550 2385
1c310985 2386void wxWindowMac::Update()
519cb848 2387{
facd6764
SC
2388#if TARGET_API_MAC_OSX
2389 HIViewSetNeedsDisplay( (ControlRef) m_macControl , true ) ;
2390#else
2391 ::Draw1Control( (ControlRef) m_macControl ) ;
bec721ec 2392#endif
519cb848
SC
2393}
2394
14c9cbdb 2395wxTopLevelWindowMac* wxWindowMac::MacGetTopLevelWindow() const
519cb848 2396{
1c310985 2397 wxTopLevelWindowMac* win = NULL ;
facd6764 2398 WindowRef window = (WindowRef) MacGetTopLevelWindowRef() ;
1c310985 2399 if ( window )
6264b550 2400 {
1c310985 2401 win = wxFindWinFromMacWindow( window ) ;
14c9cbdb 2402 }
1c310985 2403 return win ;
519cb848 2404}
facd6764 2405wxRegion wxWindowMac::MacGetVisibleRegion( bool includeOuterStructures )
94abc21f 2406{
facd6764
SC
2407
2408 Rect r ;
e40298d5
JS
2409 RgnHandle visRgn = NewRgn() ;
2410 RgnHandle tempRgn = NewRgn() ;
facd6764 2411 if ( IsControlVisible( (ControlRef) m_macControl ) )
e40298d5 2412 {
facd6764
SC
2413 GetControlBounds( (ControlRef) m_macControl , &r ) ;
2414 if (! MacGetTopLevelWindow()->MacUsesCompositing() )
21f9e953 2415 {
facd6764
SC
2416 MacRootWindowToWindow( &r.left , & r.top ) ;
2417 MacRootWindowToWindow( &r.right , & r.bottom ) ;
21f9e953 2418 }
facd6764
SC
2419 else
2420 {
2421 r.right -= r.left ;
2422 r.bottom -= r.top ;
2423 r.left = 0 ;
2424 r.top = 0 ;
2425 }
2426 if ( includeOuterStructures )
2427 InsetRect( &r , -3 , -3 ) ;
2428 RectRgn( visRgn , &r ) ;
21f9e953 2429 if ( !IsTopLevel() )
94abc21f 2430 {
facd6764
SC
2431 wxWindow* child = this ;
2432 wxWindow* parent = child->GetParent() ;
21f9e953
SC
2433 while( parent )
2434 {
21f9e953 2435 int x , y ;
facd6764 2436 wxSize size ;
d3e780ec
SC
2437 // we have to find a better clipping algorithm here, in order not to clip things
2438 // positioned like status and toolbar
2439 if ( 1 /* parent->IsTopLevel() && child->IsKindOf( CLASSINFO( wxToolBar ) ) */ )
facd6764
SC
2440 {
2441 size = parent->GetSize() ;
2442 x = y = 0 ;
2443 }
2444 else
2445 {
2446 size = parent->GetClientSize() ;
2447 wxPoint origin = parent->GetClientAreaOrigin() ;
2448 x = origin.x ;
2449 y = origin.y ;
2450 }
21f9e953
SC
2451 parent->MacWindowToRootWindow( &x, &y ) ;
2452 MacRootWindowToWindow( &x , &y ) ;
2453
2454 SetRectRgn( tempRgn ,
2455 x + parent->MacGetLeftBorderSize() , y + parent->MacGetTopBorderSize() ,
2456 x + size.x - parent->MacGetRightBorderSize(),
2457 y + size.y - parent->MacGetBottomBorderSize()) ;
2458
2459 SectRgn( visRgn , tempRgn , visRgn ) ;
2460 if ( parent->IsTopLevel() )
2461 break ;
facd6764
SC
2462 child = parent ;
2463 parent = child->GetParent() ;
7372fd0a 2464 }
94abc21f 2465 }
e40298d5 2466 }
facd6764
SC
2467
2468 wxRegion vis = visRgn ;
e40298d5
JS
2469 DisposeRgn( visRgn ) ;
2470 DisposeRgn( tempRgn ) ;
facd6764 2471 return vis ;
94abc21f
SC
2472}
2473
facd6764
SC
2474/*
2475 This function must not change the updatergn !
2476 */
2477bool wxWindowMac::MacDoRedraw( WXHRGN updatergnr , long time )
519cb848 2478{
76a5e5d2 2479 RgnHandle updatergn = (RgnHandle) updatergnr ;
facd6764
SC
2480 bool handled = false ;
2481
2482 // calculate a client-origin version of the update rgn and set m_updateRegion to that
6264b550 2483 {
1c310985
SC
2484 RgnHandle newupdate = NewRgn() ;
2485 wxSize point = GetClientSize() ;
2486 wxPoint origin = GetClientAreaOrigin() ;
1c310985 2487 SetRectRgn( newupdate , origin.x , origin.y , origin.x + point.x , origin.y+point.y ) ;
facd6764 2488 SectRgn( newupdate , updatergn , newupdate ) ;
1c310985
SC
2489 OffsetRgn( newupdate , -origin.x , -origin.y ) ;
2490 m_updateRegion = newupdate ;
facd6764
SC
2491 DisposeRgn( newupdate ) ;
2492 }
6ed71b4f 2493
facd6764
SC
2494 if ( !EmptyRgn(updatergn) )
2495 {
2496 wxWindowDC dc(this);
2497 if (!EmptyRgn(updatergn))
2498 dc.SetClippingRegion(wxRegion(updatergn));
2499
2500 wxEraseEvent eevent( GetId(), &dc );
2501 eevent.SetEventObject( this );
2502 GetEventHandler()->ProcessEvent( eevent );
2503
1c310985 2504 if ( !m_updateRegion.Empty() )
6264b550 2505 {
facd6764 2506 // paint the window itself
e40298d5
JS
2507 wxPaintEvent event;
2508 event.m_timeStamp = time ;
2509 event.SetEventObject(this);
facd6764 2510 handled = GetEventHandler()->ProcessEvent(event);
fe779e40 2511
facd6764
SC
2512 // paint custom borders
2513 wxNcPaintEvent eventNc( GetId() );
2514 eventNc.SetEventObject( this );
2515 GetEventHandler()->ProcessEvent( eventNc );
14c9cbdb 2516 }
6264b550 2517 }
facd6764
SC
2518 return handled ;
2519}
6ed71b4f 2520
facd6764
SC
2521void wxWindowMac::MacRedraw( WXHRGN updatergnr , long time, bool erase)
2522{
2523 RgnHandle updatergn = (RgnHandle) updatergnr ;
2524 // updatergn is always already clipped to our boundaries
2525 // if we are in compositing mode then it is in relative to the upper left of the control
2526 // if we are in non-compositing, then it is relatvie to the uppder left of the content area
2527 // of the toplevel window
2528 // it is in window coordinates, not in client coordinates
6ed71b4f 2529
facd6764
SC
2530 // ownUpdateRgn is the area that this window has to repaint, it is in window coordinates
2531 RgnHandle ownUpdateRgn = NewRgn() ;
2532 CopyRgn( updatergn , ownUpdateRgn ) ;
2533
2534 if ( MacGetTopLevelWindow()->MacUsesCompositing() == false )
2535 {
2536 Rect bounds;
2537 UMAGetControlBoundsInWindowCoords( (ControlRef)m_macControl, &bounds );
2538 RgnHandle controlRgn = NewRgn();
2539 RectRgn( controlRgn, &bounds );
2540 //KO: This sets the ownUpdateRgn to the area of this control that is inside
2541 // the window update region
2542 SectRgn( ownUpdateRgn, controlRgn, ownUpdateRgn );
2543 DisposeRgn( controlRgn );
2544
2545 //KO: convert ownUpdateRgn to local coordinates
2546 OffsetRgn( ownUpdateRgn, -bounds.left, -bounds.top );
6264b550 2547 }
facd6764
SC
2548
2549 MacDoRedraw( ownUpdateRgn , time ) ;
2550 DisposeRgn( ownUpdateRgn ) ;
6ed71b4f 2551
519cb848
SC
2552}
2553
facd6764 2554WXWindow wxWindowMac::MacGetTopLevelWindowRef() const
519cb848 2555{
6264b550 2556 wxWindowMac *iter = (wxWindowMac*)this ;
14c9cbdb 2557
6264b550
RR
2558 while( iter )
2559 {
1c310985
SC
2560 if ( iter->IsTopLevel() )
2561 return ((wxTopLevelWindow*)iter)->MacGetWindowRef() ;
519cb848 2562
6264b550 2563 iter = iter->GetParent() ;
14c9cbdb 2564 }
427ff662 2565 wxASSERT_MSG( 1 , wxT("No valid mac root window") ) ;
6264b550 2566 return NULL ;
519cb848
SC
2567}
2568
14c9cbdb 2569void wxWindowMac::MacCreateScrollBars( long style )
519cb848 2570{
427ff662 2571 wxASSERT_MSG( m_vScrollBar == NULL && m_hScrollBar == NULL , wxT("attempt to create window twice") ) ;
14c9cbdb 2572
6264b550
RR
2573 bool hasBoth = ( style & wxVSCROLL ) && ( style & wxHSCROLL ) ;
2574 int adjust = hasBoth ? MAC_SCROLLBAR_SIZE - 1: 0 ;
2575 int width, height ;
2576 GetClientSize( &width , &height ) ;
14c9cbdb 2577
6264b550
RR
2578 wxPoint vPoint(width-MAC_SCROLLBAR_SIZE, 0) ;
2579 wxSize vSize(MAC_SCROLLBAR_SIZE, height - adjust) ;
2580 wxPoint hPoint(0 , height-MAC_SCROLLBAR_SIZE ) ;
2581 wxSize hSize( width - adjust, MAC_SCROLLBAR_SIZE) ;
14c9cbdb
RD
2582
2583 m_vScrollBar = new wxScrollBar(this, wxWINDOW_VSCROLL, vPoint,
6264b550
RR
2584 vSize , wxVERTICAL);
2585
2586 if ( style & wxVSCROLL )
2587 {
14c9cbdb 2588
6264b550
RR
2589 }
2590 else
2591 {
2592 m_vScrollBar->Show(false) ;
2593 }
14c9cbdb 2594 m_hScrollBar = new wxScrollBar(this, wxWINDOW_HSCROLL, hPoint,
6264b550
RR
2595 hSize , wxHORIZONTAL);
2596 if ( style & wxHSCROLL )
2597 {
2598 }
2599 else
2600 {
2601 m_hScrollBar->Show(false) ;
2602 }
14c9cbdb 2603
6264b550
RR
2604 // because the create does not take into account the client area origin
2605 MacRepositionScrollBars() ; // we might have a real position shift
519cb848
SC
2606}
2607
e766c8a9 2608void wxWindowMac::MacRepositionScrollBars()
519cb848 2609{
6264b550
RR
2610 bool hasBoth = ( m_hScrollBar && m_hScrollBar->IsShown()) && ( m_vScrollBar && m_vScrollBar->IsShown()) ;
2611 int adjust = hasBoth ? MAC_SCROLLBAR_SIZE - 1 : 0 ;
14c9cbdb 2612
6264b550 2613 // get real client area
14c9cbdb 2614
facd6764
SC
2615 int width ;
2616 int height ;
2617 GetSize( &width , &height ) ;
6264b550
RR
2618
2619 width -= MacGetLeftBorderSize() + MacGetRightBorderSize();
2620 height -= MacGetTopBorderSize() + MacGetBottomBorderSize();
14c9cbdb 2621
6264b550
RR
2622 wxPoint vPoint(width-MAC_SCROLLBAR_SIZE, 0) ;
2623 wxSize vSize(MAC_SCROLLBAR_SIZE, height - adjust) ;
2624 wxPoint hPoint(0 , height-MAC_SCROLLBAR_SIZE ) ;
2625 wxSize hSize( width - adjust, MAC_SCROLLBAR_SIZE) ;
14c9cbdb
RD
2626
2627 int x = 0 ;
6264b550 2628 int y = 0 ;
facd6764
SC
2629 int w ;
2630 int h ;
2631 GetSize( &w , &h ) ;
14c9cbdb 2632
6264b550
RR
2633 MacClientToRootWindow( &x , &y ) ;
2634 MacClientToRootWindow( &w , &h ) ;
14c9cbdb 2635
6264b550 2636 wxWindowMac *iter = (wxWindowMac*)this ;
14c9cbdb 2637
6264b550
RR
2638 int totW = 10000 , totH = 10000;
2639 while( iter )
2640 {
1c310985 2641 if ( iter->IsTopLevel() )
6264b550 2642 {
facd6764 2643 iter->GetSize( &totW , &totH ) ;
6264b550
RR
2644 break ;
2645 }
2646
2647 iter = iter->GetParent() ;
14c9cbdb
RD
2648 }
2649
6264b550
RR
2650 if ( x == 0 )
2651 {
2652 hPoint.x = -1 ;
2653 hSize.x += 1 ;
2654 }
2655 if ( y == 0 )
2656 {
2657 vPoint.y = -1 ;
2658 vSize.y += 1 ;
2659 }
14c9cbdb 2660
6264b550
RR
2661 if ( w-x >= totW )
2662 {
2663 hSize.x += 1 ;
2664 vPoint.x += 1 ;
2665 }
14c9cbdb 2666
6264b550
RR
2667 if ( h-y >= totH )
2668 {
2669 vSize.y += 1 ;
2670 hPoint.y += 1 ;
2671 }
2672
2673 if ( m_vScrollBar )
2674 {
2675 m_vScrollBar->SetSize( vPoint.x , vPoint.y, vSize.x, vSize.y , wxSIZE_ALLOW_MINUS_ONE);
2676 }
2677 if ( m_hScrollBar )
2678 {
2679 m_hScrollBar->SetSize( hPoint.x , hPoint.y, hSize.x, hSize.y, wxSIZE_ALLOW_MINUS_ONE);
2680 }
519cb848
SC
2681}
2682
e766c8a9 2683bool wxWindowMac::AcceptsFocus() const
7c551d95
SC
2684{
2685 return MacCanFocus() && wxWindowBase::AcceptsFocus();
2686}
519cb848 2687
14c9cbdb 2688void wxWindowMac::MacSuperChangedPosition()
519cb848 2689{
6264b550 2690 // only window-absolute structures have to be moved i.e. controls
519cb848 2691
eb22f2a6 2692 wxWindowListNode *node = GetChildren().GetFirst();
6264b550
RR
2693 while ( node )
2694 {
9bd1404d 2695 wxWindowMac *child = node->GetData();
6264b550 2696 child->MacSuperChangedPosition() ;
eb22f2a6 2697 node = node->GetNext();
6264b550 2698 }
519cb848 2699}
519cb848 2700
14c9cbdb 2701void wxWindowMac::MacTopLevelWindowChangedPosition()
a3bf4a62 2702{
6264b550 2703 // only screen-absolute structures have to be moved i.e. glcanvas
a3bf4a62 2704
eb22f2a6 2705 wxWindowListNode *node = GetChildren().GetFirst();
6264b550
RR
2706 while ( node )
2707 {
9bd1404d 2708 wxWindowMac *child = node->GetData();
6264b550 2709 child->MacTopLevelWindowChangedPosition() ;
eb22f2a6 2710 node = node->GetNext();
6264b550 2711 }
a3bf4a62 2712}
facd6764 2713
e766c8a9 2714long wxWindowMac::MacGetLeftBorderSize( ) const
2f1ae414 2715{
1c310985 2716 if( IsTopLevel() )
6264b550 2717 return 0 ;
2f1ae414
SC
2718
2719 if (m_windowStyle & wxRAISED_BORDER || m_windowStyle & wxSUNKEN_BORDER )
2720 {
ed60b502 2721 SInt32 border = 3 ;
1c310985 2722#if wxMAC_USE_THEME_BORDER
ed60b502 2723 GetThemeMetric( kThemeMetricListBoxFrameOutset , &border ) ;
1c310985 2724#endif
ed60b502 2725 return border ;
2f1ae414
SC
2726 }
2727 else if ( m_windowStyle &wxDOUBLE_BORDER)
2728 {
ed60b502 2729 SInt32 border = 3 ;
1c310985 2730#if wxMAC_USE_THEME_BORDER
ed60b502 2731 GetThemeMetric( kThemeMetricListBoxFrameOutset , &border ) ;
1c310985 2732#endif
ed60b502 2733 return border ;
2f1ae414
SC
2734 }
2735 else if (m_windowStyle &wxSIMPLE_BORDER)
2736 {
6264b550 2737 return 1 ;
2f1ae414 2738 }
6264b550 2739 return 0 ;
2f1ae414
SC
2740}
2741
e766c8a9 2742long wxWindowMac::MacGetRightBorderSize( ) const
5b781a67 2743{
1c310985
SC
2744 // they are all symmetric in mac themes
2745 return MacGetLeftBorderSize() ;
5b781a67
SC
2746}
2747
e766c8a9 2748long wxWindowMac::MacGetTopBorderSize( ) const
5b781a67 2749{
1c310985
SC
2750 // they are all symmetric in mac themes
2751 return MacGetLeftBorderSize() ;
5b781a67
SC
2752}
2753
e766c8a9 2754long wxWindowMac::MacGetBottomBorderSize( ) const
5b781a67 2755{
1c310985
SC
2756 // they are all symmetric in mac themes
2757 return MacGetLeftBorderSize() ;
5b781a67
SC
2758}
2759
14c9cbdb 2760long wxWindowMac::MacRemoveBordersFromStyle( long style )
2f1ae414 2761{
6264b550 2762 return style & ~( wxDOUBLE_BORDER | wxSUNKEN_BORDER | wxRAISED_BORDER | wxBORDER | wxSTATIC_BORDER ) ;
2f1ae414 2763}
0a67a93b 2764
e766c8a9 2765// Find the wxWindowMac at the current mouse position, returning the mouse
3723b7b1 2766// position.
e766c8a9 2767wxWindowMac* wxFindWindowAtPointer(wxPoint& pt)
3723b7b1 2768{
59a12e90 2769 pt = wxGetMousePosition();
e766c8a9 2770 wxWindowMac* found = wxFindWindowAtPoint(pt);
59a12e90 2771 return found;
3723b7b1
JS
2772}
2773
2774// Get the current mouse position.
2775wxPoint wxGetMousePosition()
2776{
57591e0e
JS
2777 int x, y;
2778 wxGetMousePosition(& x, & y);
2779 return wxPoint(x, y);
3723b7b1
JS
2780}
2781
6ed71b4f 2782void wxWindowMac::OnMouseEvent( wxMouseEvent &event )
8950f7cc
SC
2783{
2784 if ( event.GetEventType() == wxEVT_RIGHT_DOWN )
2785 {
2786 // copied from wxGTK : CS
249aad30 2787 // generate a "context menu" event: this is similar to wxEVT_RIGHT_DOWN
8950f7cc
SC
2788 // except that:
2789 //
2790 // (a) it's a command event and so is propagated to the parent
2791 // (b) under MSW it can be generated from kbd too
2792 // (c) it uses screen coords (because of (a))
2793 wxContextMenuEvent evtCtx(wxEVT_CONTEXT_MENU,
2794 this->GetId(),
2795 this->ClientToScreen(event.GetPosition()));
249aad30
SC
2796 if ( ! GetEventHandler()->ProcessEvent(evtCtx) )
2797 event.Skip() ;
8950f7cc 2798 }
facd6764
SC
2799 else
2800 {
2801 event.Skip() ;
2802 }
8950f7cc
SC
2803}
2804
facd6764
SC
2805void wxWindowMac::MacHandleControlClick( WXWidget control , wxInt16 controlpart , bool WXUNUSED( mouseStillDown ) )
2806{
facd6764
SC
2807}
2808
79392158 2809Rect wxMacGetBoundsForControl( wxWindow* window , const wxPoint& pos , const wxSize &size , bool adjustForOrigin )
3083eb85
SC
2810{
2811 int x ,y , w ,h ;
2812
79392158 2813 window->MacGetBoundsForControl( pos , size , x , y, w, h , adjustForOrigin) ;
3083eb85
SC
2814 Rect bounds = { y , x , y+h , x+w };
2815 return bounds ;
2816}
2817
f1d527c1
SC
2818wxInt32 wxWindowMac::MacControlHit(WXEVENTHANDLERREF WXUNUSED(handler) , WXEVENTREF WXUNUSED(event) )
2819{
2820 return eventNotHandledErr ;
2821}
2822
facd6764 2823