]> git.saurik.com Git - wxWidgets.git/blob - src/mac/control.cpp
Changed wxStat, wxAccess and wxOpen to no longer
[wxWidgets.git] / src / mac / control.cpp
1 /////////////////////////////////////////////////////////////////////////////
2 // Name: control.cpp
3 // Purpose: wxControl class
4 // Author: AUTHOR
5 // Modified by:
6 // Created: ??/??/98
7 // RCS-ID: $Id$
8 // Copyright: (c) AUTHOR
9 // Licence: wxWindows licence
10 /////////////////////////////////////////////////////////////////////////////
11
12 #ifdef __GNUG__
13 #pragma implementation "control.h"
14 #endif
15
16 #include "wx/defs.h"
17
18 #include "wx/control.h"
19 #include "wx/panel.h"
20 #include "wx/app.h"
21 #include "wx/dc.h"
22 #include "wx/dcclient.h"
23 #include "wx/notebook.h"
24 #include "wx/tabctrl.h"
25 #include "wx/radiobox.h"
26 #include "wx/spinbutt.h"
27 #include "wx/scrolbar.h"
28 #include "wx/button.h"
29 #include "wx/dialog.h"
30 #include "wx/statbox.h"
31 #include "wx/sizer.h"
32 #include "wx/stattext.h"
33
34 #if !USE_SHARED_LIBRARY
35 IMPLEMENT_ABSTRACT_CLASS(wxControl, wxWindow)
36
37 BEGIN_EVENT_TABLE(wxControl, wxWindow)
38 EVT_MOUSE_EVENTS( wxControl::OnMouseEvent )
39 // EVT_CHAR( wxControl::OnKeyDown )
40 EVT_PAINT( wxControl::OnPaint )
41 END_EVENT_TABLE()
42 #endif
43
44 #include "wx/mac/uma.h"
45 #include "wx/mac/private.h"
46
47 // Item members
48
49 ControlActionUPP wxMacLiveScrollbarActionUPP = NULL ;
50
51 pascal void wxMacLiveScrollbarActionProc( ControlHandle control , ControlPartCode partCode ) ;
52 pascal void wxMacLiveScrollbarActionProc( ControlHandle control , ControlPartCode partCode )
53 {
54 if ( partCode != 0)
55 {
56 wxControl* wx = (wxControl*) GetControlReference( control ) ;
57 if ( wx )
58 {
59 wx->MacHandleControlClick( control , partCode ) ;
60 }
61 }
62 }
63
64 ControlColorUPP wxMacSetupControlBackgroundUPP = NULL ;
65
66 pascal OSStatus wxMacSetupControlBackground( ControlRef iControl , SInt16 iMessage , SInt16 iDepth , Boolean iIsColor )
67 {
68 OSStatus status = noErr ;
69 switch( iMessage )
70 {
71 case kControlMsgSetUpBackground :
72 {
73 wxControl* wx = (wxControl*) GetControlReference( iControl ) ;
74 if ( wx != NULL && wx->IsKindOf( CLASSINFO( wxControl ) ) )
75 {
76 wxDC::MacSetupBackgroundForCurrentPort( wx->MacGetBackgroundBrush() ) ;
77 // SetThemeBackground( iDepth , iIsColor ) ;
78 }
79 else
80 {
81 status = paramErr ;
82 }
83 }
84 break ;
85 default :
86 status = paramErr ;
87 break ;
88 }
89 return status ;
90 }
91
92 wxControl::wxControl()
93 {
94 m_macControl = NULL ;
95 m_macHorizontalBorder = 0 ; // additional pixels around the real control
96 m_macVerticalBorder = 0 ;
97 m_backgroundColour = *wxWHITE;
98 m_foregroundColour = *wxBLACK;
99 #if WXWIN_COMPATIBILITY
100 m_callback = 0;
101 #endif // WXWIN_COMPATIBILITY
102
103 if ( wxMacLiveScrollbarActionUPP == NULL )
104 {
105 #if defined(UNIVERSAL_INTERFACES_VERSION) && (UNIVERSAL_INTERFACES_VERSION >= 0x0340)
106 wxMacLiveScrollbarActionUPP = NewControlActionUPP( wxMacLiveScrollbarActionProc );
107 #else
108 wxMacLiveScrollbarActionUPP = NewControlActionProc( wxMacLiveScrollbarActionProc ) ;
109 #endif
110 }
111 }
112
113 bool wxControl::Create(wxWindow *parent, wxWindowID id,
114 const wxPoint& pos,
115 const wxSize& size, long style,
116 const wxValidator& validator,
117 const wxString& name)
118 {
119 m_macControl = NULL ;
120 m_macHorizontalBorder = 0 ; // additional pixels around the real control
121 m_macVerticalBorder = 0 ;
122
123 bool rval = wxWindow::Create(parent, id, pos, size, style, name);
124 if ( parent )
125 {
126 m_backgroundColour = parent->GetBackgroundColour() ;
127 m_foregroundColour = parent->GetForegroundColour() ;
128 }
129 if (rval) {
130 #if wxUSE_VALIDATORS
131 SetValidator(validator);
132 #endif
133 }
134 return rval;
135 }
136
137 wxControl::~wxControl()
138 {
139 m_isBeingDeleted = TRUE;
140 // If we delete an item, we should initialize the parent panel,
141 // because it could now be invalid.
142 wxWindow *parent = GetParent() ;
143 if ( parent )
144 {
145 if (parent->GetDefaultItem() == (wxButton*) this)
146 parent->SetDefaultItem(NULL);
147 }
148 if ( (ControlHandle) m_macControl )
149 {
150 ::DisposeControl( (ControlHandle) m_macControl ) ;
151 m_macControl = NULL ;
152 }
153 }
154
155 void wxControl::SetLabel(const wxString& title)
156 {
157 m_label = wxStripMenuCodes(title) ;
158
159 if ( (ControlHandle) m_macControl )
160 {
161 Str255 maclabel ;
162 wxString label ;
163
164 if( wxApp::s_macDefaultEncodingIsPC )
165 label = wxMacMakeMacStringFromPC( m_label ) ;
166 else
167 label = m_label ;
168
169 #if TARGET_CARBON
170 c2pstrcpy( (StringPtr) maclabel , label ) ;
171 #else
172 strcpy( (char *) maclabel , label ) ;
173 c2pstr( (char *) maclabel ) ;
174 #endif
175 ::SetControlTitle( (ControlHandle) m_macControl , maclabel ) ;
176 }
177 Refresh() ;
178 }
179
180 wxSize wxControl::DoGetBestSize() const
181 {
182 Rect bestsize = { 0 , 0 , 0 , 0 } ;
183 short baselineoffset ;
184 int bestWidth, bestHeight ;
185 ::GetBestControlRect( (ControlHandle) m_macControl , &bestsize , &baselineoffset ) ;
186
187 if ( EmptyRect( &bestsize ) )
188 {
189 baselineoffset = 0;
190 bestsize.left = bestsize.top = 0 ;
191 bestsize.right = 16 ;
192 bestsize.bottom = 16 ;
193 if ( IsKindOf( CLASSINFO( wxScrollBar ) ) )
194 {
195 bestsize.bottom = 16 ;
196 }
197 else if ( IsKindOf( CLASSINFO( wxSpinButton ) ) )
198 {
199 bestsize.bottom = 24 ;
200 }
201 }
202
203 if ( IsKindOf( CLASSINFO( wxButton ) ) )
204 {
205 bestWidth = m_label.Length() * 8 + 12 ;
206 if ( bestWidth < 70 )
207 bestWidth = 70 ;
208 }
209 else if ( IsKindOf( CLASSINFO( wxStaticText ) ) )
210 {
211 bestWidth = m_label.Length() * 8 ;
212 }
213 else
214 bestWidth = bestsize.right - bestsize.left ;
215
216 bestWidth += 2 * m_macHorizontalBorder ;
217
218 bestHeight = bestsize.bottom - bestsize.top ;
219 if ( bestHeight < 10 )
220 bestHeight = 13 ;
221
222 bestHeight += 2 * m_macVerticalBorder;
223
224
225 return wxSize(bestWidth, bestHeight);
226 }
227
228 bool wxControl::ProcessCommand (wxCommandEvent & event)
229 {
230 // Tries:
231 // 1) A callback function (to become obsolete)
232 // 2) OnCommand, starting at this window and working up parent hierarchy
233 // 3) OnCommand then calls ProcessEvent to search the event tables.
234 #if WXWIN_COMPATIBILITY
235 if ( m_callback )
236 {
237 (void)(*m_callback)(this, event);
238
239 return TRUE;
240 }
241 else
242 #endif // WXWIN_COMPATIBILITY
243 {
244 return GetEventHandler()->ProcessEvent(event);
245 }
246 }
247
248 // ------------------------
249 wxList *wxWinMacControlList = NULL;
250 wxControl *wxFindControlFromMacControl(ControlHandle inControl )
251 {
252 wxNode *node = wxWinMacControlList->Find((long)inControl);
253 if (!node)
254 return NULL;
255 return (wxControl *)node->Data();
256 }
257
258 void wxAssociateControlWithMacControl(ControlHandle inControl, wxControl *control)
259 {
260 // adding NULL WindowRef is (first) surely a result of an error and
261 // (secondly) breaks menu command processing
262 wxCHECK_RET( inControl != (ControlHandle) NULL, "attempt to add a NULL WindowRef to window list" );
263
264 if ( !wxWinMacControlList->Find((long)inControl) )
265 wxWinMacControlList->Append((long)inControl, control);
266 }
267
268 void wxRemoveMacControlAssociation(wxControl *control)
269 {
270 wxWinMacControlList->DeleteObject(control);
271 }
272
273 void wxControl::MacPreControlCreate( wxWindow *parent, wxWindowID id, wxString label ,
274 const wxPoint& pos,
275 const wxSize& size, long style,
276 const wxValidator& validator,
277 const wxString& name , WXRECTPTR outBounds , unsigned char* maclabel )
278 {
279 m_label = label ;
280 SetName(name);
281 if ( &validator )
282 SetValidator(validator);
283
284 m_windowStyle = style;
285 parent->AddChild(this);
286
287 m_backgroundColour = parent->GetBackgroundColour() ;
288 m_foregroundColour = parent->GetForegroundColour() ;
289
290 if (id == -1)
291 m_windowId = NewControlId();
292 else
293 m_windowId = id;
294
295 // These sizes will be adjusted in MacPostControlCreate
296
297 m_width = size.x ;
298 m_height = size.y ;
299 m_x = pos.x ;
300 m_y = pos.y ;
301
302 ((Rect*)outBounds)->top = -10;
303 ((Rect*)outBounds)->left = -10;
304 ((Rect*)outBounds)->bottom = 0;
305 ((Rect*)outBounds)->right = 0;
306
307 char c_text[255];
308 strcpy( c_text , label ) ;
309 if( wxApp::s_macDefaultEncodingIsPC )
310 {
311 wxMacConvertFromPCForControls( c_text ) ;
312 }
313
314 #if TARGET_CARBON
315 c2pstrcpy( (StringPtr) maclabel , c_text ) ;
316 #else
317 strcpy( (char *) maclabel , c_text ) ;
318 c2pstr( (char *) maclabel ) ;
319 #endif
320 }
321
322 void wxControl::MacPostControlCreate()
323 {
324 wxASSERT_MSG( (ControlHandle) m_macControl != NULL , "No valid mac control" ) ;
325
326 if ( IsKindOf( CLASSINFO( wxScrollBar ) ) )
327 {
328 // no font
329 }
330 else if ( !UMAHasAquaLayout() && (IsKindOf( CLASSINFO( wxStaticBox ) ) || IsKindOf( CLASSINFO( wxRadioBox ) ) || IsKindOf( CLASSINFO( wxButton ) ) ) )
331 {
332 ControlFontStyleRec controlstyle ;
333 controlstyle.flags = kControlUseFontMask ;
334 controlstyle.font = kControlFontSmallBoldSystemFont ;
335
336 ::SetControlFontStyle( (ControlHandle) m_macControl , &controlstyle ) ;
337 }
338 else
339 {
340 ControlFontStyleRec controlstyle ;
341 controlstyle.flags = kControlUseFontMask ;
342 controlstyle.font = kControlFontSmallSystemFont ;
343
344 ::SetControlFontStyle( (ControlHandle) m_macControl , &controlstyle ) ;
345 }
346 ControlHandle container = (ControlHandle) GetParent()->MacGetContainerForEmbedding() ;
347 wxASSERT_MSG( container != NULL , wxT("No valid mac container control") ) ;
348 ::EmbedControl( (ControlHandle) m_macControl , container ) ;
349 m_macControlIsShown = true ;
350
351 wxAssociateControlWithMacControl( (ControlHandle) m_macControl , this ) ;
352
353 if ( wxMacSetupControlBackgroundUPP == NULL )
354 {
355 wxMacSetupControlBackgroundUPP = NewControlColorUPP( wxMacSetupControlBackground ) ;
356 }
357 SetControlColorProc( (ControlHandle) m_macControl , wxMacSetupControlBackgroundUPP ) ;
358
359 // Adjust the controls size and position
360 wxPoint pos(m_x, m_y);
361 wxSize best_size( DoGetBestSize() );
362 wxSize new_size( m_width, m_height );
363
364 m_x = m_y = m_width = m_height = -1; // Forces SetSize to move/size the control
365
366 if (new_size.x == -1) {
367 new_size.x = best_size.x;
368 }
369 if (new_size.y == -1) {
370 new_size.y = best_size.y;
371 }
372
373 SetSize(pos.x, pos.y, new_size.x, new_size.y);
374
375 UMAShowControl( (ControlHandle) m_macControl ) ;
376 Refresh() ;
377 }
378
379 void wxControl::MacAdjustControlRect()
380 {
381 wxASSERT_MSG( (ControlHandle) m_macControl != NULL , wxT("No valid mac control") ) ;
382 if ( m_width == -1 || m_height == -1 )
383 {
384 Rect bestsize = { 0 , 0 , 0 , 0 } ;
385 short baselineoffset ;
386
387 ::GetBestControlRect( (ControlHandle) m_macControl , &bestsize , &baselineoffset ) ;
388
389 if ( EmptyRect( &bestsize ) )
390 {
391 baselineoffset = 0;
392 bestsize.left = bestsize.top = 0 ;
393 bestsize.right = 16 ;
394 bestsize.bottom = 16 ;
395 if ( IsKindOf( CLASSINFO( wxScrollBar ) ) )
396 {
397 bestsize.bottom = 16 ;
398 }
399 else if ( IsKindOf( CLASSINFO( wxSpinButton ) ) )
400 {
401 bestsize.bottom = 24 ;
402 }
403 }
404
405 if ( m_width == -1 )
406 {
407 if ( IsKindOf( CLASSINFO( wxButton ) ) )
408 {
409 m_width = m_label.Length() * 8 + 12 ;
410 if ( m_width < 70 )
411 m_width = 70 ;
412 }
413 else if ( IsKindOf( CLASSINFO( wxStaticText ) ) )
414 {
415 m_width = m_label.Length() * 8 ;
416 }
417 else
418 m_width = bestsize.right - bestsize.left ;
419
420 m_width += 2 * m_macHorizontalBorder + MacGetLeftBorderSize() + MacGetRightBorderSize() ;
421 }
422 if ( m_height == -1 )
423 {
424 m_height = bestsize.bottom - bestsize.top ;
425 if ( m_height < 10 )
426 m_height = 13 ;
427
428 m_height += 2 * m_macVerticalBorder + MacGetTopBorderSize() + MacGetBottomBorderSize() ;
429 }
430 MacUpdateDimensions() ;
431 // UMASizeControl( (ControlHandle) m_macControl , m_width - 2 * m_macHorizontalBorder, m_height - 2 * m_macVerticalBorder ) ;
432 }
433 }
434
435 WXWidget wxControl::MacGetContainerForEmbedding()
436 {
437 if ( m_macControl )
438 return m_macControl ;
439
440 return wxWindow::MacGetContainerForEmbedding() ;
441 }
442
443 void wxControl::MacUpdateDimensions()
444 {
445 // actually in the current systems this should never be possible, but later reparenting
446 // may become a reality
447
448 if ( (ControlHandle) m_macControl == NULL )
449 return ;
450
451 if ( GetParent() == NULL )
452 return ;
453
454 WindowRef rootwindow = (WindowRef) MacGetRootWindow() ;
455 if ( rootwindow == NULL )
456 return ;
457
458 Rect oldBounds ;
459 GetControlBounds( (ControlHandle) m_macControl , &oldBounds ) ;
460
461 int new_x = m_x + MacGetLeftBorderSize() + m_macHorizontalBorder ;
462 int new_y = m_y + MacGetTopBorderSize() + m_macVerticalBorder ;
463 int new_width = m_width - MacGetLeftBorderSize() - MacGetRightBorderSize() - 2 * m_macHorizontalBorder ;
464 int new_height = m_height - MacGetTopBorderSize() - MacGetBottomBorderSize() - 2 * m_macVerticalBorder ;
465
466 GetParent()->MacWindowToRootWindow( & new_x , & new_y ) ;
467 bool doMove = new_x != oldBounds.left || new_y != oldBounds.top ;
468 bool doResize = ( oldBounds.right - oldBounds.left ) != new_width || (oldBounds.bottom - oldBounds.top ) != new_height ;
469 if ( doMove || doResize )
470 {
471 InvalWindowRect( rootwindow, &oldBounds ) ;
472 if ( doMove )
473 {
474 UMAMoveControl( (ControlHandle) m_macControl , new_x , new_y ) ;
475 }
476 if ( doResize )
477 {
478 UMASizeControl( (ControlHandle) m_macControl , new_width , new_height ) ;
479 }
480 }
481 }
482
483 void wxControl::MacSuperChangedPosition()
484 {
485 MacUpdateDimensions() ;
486 wxWindow::MacSuperChangedPosition() ;
487 }
488
489 void wxControl::MacSuperEnabled( bool enabled )
490 {
491 Refresh(FALSE) ;
492 wxWindow::MacSuperEnabled( enabled ) ;
493 }
494
495 void wxControl::MacSuperShown( bool show )
496 {
497 if ( (ControlHandle) m_macControl )
498 {
499 if ( !show )
500 {
501 if ( m_macControlIsShown )
502 {
503 ::UMAHideControl( (ControlHandle) m_macControl ) ;
504 m_macControlIsShown = false ;
505 }
506 }
507 else
508 {
509 if ( MacIsReallyShown() && !m_macControlIsShown )
510 {
511 ::UMAShowControl( (ControlHandle) m_macControl ) ;
512 m_macControlIsShown = true ;
513 }
514 }
515 }
516
517 wxWindow::MacSuperShown( show ) ;
518 }
519
520 void wxControl::DoSetSize(int x, int y,
521 int width, int height,
522 int sizeFlags )
523 {
524 wxWindow::DoSetSize( x , y ,width , height ,sizeFlags ) ;
525 return ;
526 /*
527
528 if ( (ControlHandle) m_macControl == NULL )
529 {
530 wxWindow::DoSetSize( x , y ,width , height ,sizeFlags ) ;
531 return ;
532 }
533
534 Rect oldbounds;
535 int new_x, new_y, new_width, new_height;
536 int mac_x, mac_y;
537
538 new_x = m_x;
539 new_y = m_y;
540 new_width = m_width;
541 new_height = m_height;
542
543 if (sizeFlags & wxSIZE_ALLOW_MINUS_ONE)
544 {
545 new_x = x;
546 new_y = y;
547 new_width = width;
548 new_height = height;
549 }
550 else
551 {
552 if (x != -1) new_x = x;
553 if (y != -1) new_y = y;
554 if (width != -1) new_width = width;
555 if (height != -1) new_height = height;
556 }
557
558 if(sizeFlags & wxSIZE_AUTO)
559 {
560 wxSize size = GetBestSize();
561 if (sizeFlags & wxSIZE_AUTO_WIDTH)
562 {
563 if (width == -1) new_width = size.x;
564 }
565 if (sizeFlags & wxSIZE_AUTO_HEIGHT)
566 {
567 if (height == -1) new_height = size.y;
568 }
569 }
570 AdjustForParentClientOrigin(new_x, new_y, sizeFlags);
571
572 mac_x = new_x;
573 mac_y = new_y;
574 if(GetParent()) {
575 GetParent()->MacWindowToRootWindow(&mac_x, &mac_y);
576 }
577 GetControlBounds( (ControlHandle) m_macControl, &oldbounds);
578 oldbounds.right = oldbounds.left + m_width;
579 oldbounds.bottom = oldbounds.top + m_height;
580
581 bool doMove = false;
582 bool doResize = false;
583
584 if ( mac_x != (oldbounds.left - m_macHorizontalBorder) ||
585 mac_y != (oldbounds.top - m_macVerticalBorder) )
586 {
587 doMove = true ;
588 }
589 if ( new_width != oldbounds.right - oldbounds.left - 2 * m_macHorizontalBorder ||
590 new_height != oldbounds.bottom - oldbounds.top - 2 * m_macVerticalBorder)
591 {
592 doResize = true ;
593 }
594
595 if ( doMove || doResize )
596 {
597 Refresh() ;
598
599 // Ensure resize is within constraints
600 if ((m_minWidth != -1) && (new_width < m_minWidth)) {
601 new_width = m_minWidth;
602 }
603 if ((m_minHeight != -1) && (new_height < m_minHeight)) {
604 new_height = m_minHeight;
605 }
606 if ((m_maxWidth != -1) && (new_width > m_maxWidth)) {
607 new_width = m_maxWidth;
608 }
609 if ((m_maxHeight != -1) && (new_height > m_maxHeight)) {
610 new_height = m_maxHeight;
611 }
612
613 if ( doMove )
614 {
615 m_x = new_x;
616 m_y = new_y;
617
618 UMAMoveControl( (ControlHandle) m_macControl,
619 mac_x + m_macHorizontalBorder, mac_y + m_macVerticalBorder);
620
621 wxMoveEvent event(wxPoint(m_x, m_y), m_windowId);
622 event.SetEventObject(this);
623 GetEventHandler()->ProcessEvent(event) ;
624 }
625 if ( doResize )
626 {
627 m_width = new_width;
628 m_height = new_height;
629
630 UMASizeControl( (ControlHandle) m_macControl,
631 m_width - 2 * m_macHorizontalBorder,
632 m_height - 2 * m_macVerticalBorder ) ;
633
634
635 wxSizeEvent event(wxSize(m_width, m_height), m_windowId);
636 event.SetEventObject(this);
637 GetEventHandler()->ProcessEvent(event);
638 }
639
640 Refresh() ;
641 }
642 */
643 }
644
645 bool wxControl::Show(bool show)
646 {
647 if ( !wxWindow::Show( show ) )
648 return FALSE ;
649
650 if ( (ControlHandle) m_macControl )
651 {
652 if ( !show )
653 {
654 if ( m_macControlIsShown )
655 {
656 ::UMAHideControl( (ControlHandle) m_macControl ) ;
657 m_macControlIsShown = false ;
658 }
659 }
660 else
661 {
662 if ( MacIsReallyShown() && !m_macControlIsShown )
663 {
664 ::UMAShowControl( (ControlHandle) m_macControl ) ;
665 m_macControlIsShown = true ;
666 }
667 }
668 }
669 return TRUE ;
670 }
671
672 bool wxControl::Enable(bool enable)
673 {
674 if ( !wxWindow::Enable(enable) )
675 return FALSE;
676
677 if ( (ControlHandle) m_macControl )
678 {
679 if ( enable )
680 UMAActivateControl( (ControlHandle) m_macControl ) ;
681 else
682 UMADeactivateControl( (ControlHandle) m_macControl ) ;
683 }
684 return TRUE ;
685 }
686
687 void wxControl::Refresh(bool eraseBack, const wxRect *rect)
688 {
689 wxWindow::Refresh( eraseBack , rect ) ;
690 }
691
692 void wxControl::MacRedrawControl()
693 {
694 if ( (ControlHandle) m_macControl && MacGetRootWindow() )
695 {
696 wxClientDC dc(this) ;
697 wxMacPortSetter helper(&dc) ;
698 /*
699 Rect r = { 0 , 0 , 32000 , 32000 } ;
700 ClipRect( &r ) ;
701 */
702 int x = 0 , y = 0;
703 wxWindow *parent = GetParent() ;
704 parent->MacWindowToRootWindow( &x,&y ) ;
705 RgnHandle clrgn = NewRgn() ;
706 RgnHandle insidergn = NewRgn() ;
707 wxSize size = parent->GetSize() ;
708 SetRectRgn( insidergn , parent->MacGetLeftBorderSize() , parent->MacGetTopBorderSize() ,
709 size.x - parent->MacGetLeftBorderSize() - parent->MacGetRightBorderSize(),
710 size.y - parent->MacGetTopBorderSize() - parent->MacGetBottomBorderSize()) ;
711
712 CopyRgn( (RgnHandle) parent->MacGetVisibleRegion(false).GetWXHRGN() , clrgn ) ;
713 SectRgn( clrgn , insidergn , clrgn ) ;
714 OffsetRgn( clrgn , x , y ) ;
715 SetClip( clrgn ) ;
716 DisposeRgn( clrgn ) ;
717 DisposeRgn( insidergn ) ;
718
719 wxDC::MacSetupBackgroundForCurrentPort( MacGetBackgroundBrush() ) ;
720 UMADrawControl( (ControlHandle) m_macControl ) ;
721 }
722 }
723
724 void wxControl::OnPaint(wxPaintEvent& event)
725 {
726 if ( (ControlHandle) m_macControl )
727 {
728 wxPaintDC dc(this) ;
729 wxMacPortSetter helper(&dc) ;
730 /*
731 Rect r = { 0 , 0 , 32000 , 32000 } ;
732 ClipRect( &r ) ;
733 */
734
735 int x = 0 , y = 0;
736 wxWindow *parent = GetParent() ;
737 parent->MacWindowToRootWindow( &x,&y ) ;
738 RgnHandle clrgn = NewRgn() ;
739 RgnHandle insidergn = NewRgn() ;
740 wxSize size = parent->GetSize() ;
741 SetRectRgn( insidergn , parent->MacGetLeftBorderSize() , parent->MacGetTopBorderSize() ,
742 size.x - parent->MacGetLeftBorderSize() - parent->MacGetRightBorderSize(),
743 size.y - parent->MacGetTopBorderSize() - parent->MacGetBottomBorderSize()) ;
744
745 CopyRgn( (RgnHandle) parent->MacGetVisibleRegion(false).GetWXHRGN() , clrgn ) ;
746 SectRgn( clrgn , insidergn , clrgn ) ;
747 OffsetRgn( clrgn , x , y ) ;
748 SetClip( clrgn ) ;
749 DisposeRgn( clrgn ) ;
750 DisposeRgn( insidergn ) ;
751
752 wxDC::MacSetupBackgroundForCurrentPort( MacGetBackgroundBrush() ) ;
753 UMADrawControl( (ControlHandle) m_macControl ) ;
754 }
755 else
756 {
757 event.Skip() ;
758 }
759 }
760 void wxControl::OnEraseBackground(wxEraseEvent& event)
761 {
762 wxWindow::OnEraseBackground( event ) ;
763 }
764
765
766 void wxControl::OnKeyDown( wxKeyEvent &event )
767 {
768 if ( (ControlHandle) m_macControl == NULL )
769 return ;
770
771 EventRecord *ev = (EventRecord*) wxTheApp->MacGetCurrentEvent() ;
772 short keycode ;
773 short keychar ;
774 keychar = short(ev->message & charCodeMask);
775 keycode = short(ev->message & keyCodeMask) >> 8 ;
776
777 ::HandleControlKey( (ControlHandle) m_macControl , keycode , keychar , ev->modifiers ) ;
778 }
779
780 void wxControl::OnMouseEvent( wxMouseEvent &event )
781 {
782 if ( (ControlHandle) m_macControl == NULL )
783 {
784 event.Skip() ;
785 return ;
786 }
787
788 if (event.GetEventType() == wxEVT_LEFT_DOWN || event.GetEventType() == wxEVT_LEFT_DCLICK )
789 {
790
791 int x = event.m_x ;
792 int y = event.m_y ;
793
794 MacClientToRootWindow( &x , &y ) ;
795
796 ControlHandle control ;
797 Point localwhere ;
798 SInt16 controlpart ;
799 WindowRef window = (WindowRef) MacGetRootWindow() ;
800
801 localwhere.h = x ;
802 localwhere.v = y ;
803
804 short modifiers = 0;
805
806 if ( !event.m_leftDown && !event.m_rightDown )
807 modifiers |= btnState ;
808
809 if ( event.m_shiftDown )
810 modifiers |= shiftKey ;
811
812 if ( event.m_controlDown )
813 modifiers |= controlKey ;
814
815 if ( event.m_altDown )
816 modifiers |= optionKey ;
817
818 if ( event.m_metaDown )
819 modifiers |= cmdKey ;
820 /*
821 #if TARGET_CARBON
822 control = FindControlUnderMouse( localwhere , window , &controlpart ) ;
823 #else
824 controlpart = FindControl( localwhere , window , &control ) ;
825 #endif
826 */
827 {
828 /*
829 if ( AcceptsFocus() && FindFocus() != this )
830 {
831 SetFocus() ;
832 }
833 */
834 control = (ControlHandle) m_macControl ;
835 if ( control && ::IsControlActive( control ) )
836 {
837 {
838 controlpart = ::HandleControlClick( control , localwhere , modifiers , (ControlActionUPP) -1 ) ;
839 wxTheApp->s_lastMouseDown = 0 ;
840 if ( control && controlpart != kControlNoPart &&
841 ! IsKindOf( CLASSINFO( wxScrollBar ) )
842 ) // otherwise we will get the event twice for scrollbar
843 {
844 MacHandleControlClick( control , controlpart ) ;
845 }
846 }
847 }
848 }
849 }
850 }
851
852 bool wxControl::MacCanFocus() const
853 {
854 { if ( (ControlHandle) m_macControl == NULL )
855 return true ;
856 else
857 return false ;
858 }
859 }
860
861 void wxControl::MacHandleControlClick( WXWidget control , wxInt16 controlpart )
862 {
863 wxASSERT_MSG( (ControlHandle) m_macControl != NULL , "No valid mac control" ) ;
864 }
865