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