]> git.saurik.com Git - wxWidgets.git/blame_incremental - src/mac/carbon/app.cpp
projects / wxWidgets.git / blame_incremental
? search:
summary | shortlog | log | commit | commitdiff | tree
blob | blame (non-incremental) | history | HEAD
Consistent tab behaviour
[wxWidgets.git] / src / mac / carbon / app.cpp
... / ...
CommitLineData
1/////////////////////////////////////////////////////////////////////////////
2// Name: app.cpp
3// Purpose: wxApp
4// Author: Stefan Csomor
5// Modified by:
6// Created: 1998-01-01
7// RCS-ID: $Id$
8// Copyright: (c) Stefan Csomor
9// Licence: wxWindows licence
10/////////////////////////////////////////////////////////////////////////////
11
12#ifdef __GNUG__
13#pragma implementation "app.h"
14#endif
15
16#include "wx/defs.h"
17
18#include "wx/window.h"
19#include "wx/frame.h"
20#include "wx/button.h"
21#include "wx/app.h"
22#include "wx/utils.h"
23#include "wx/gdicmn.h"
24#include "wx/pen.h"
25#include "wx/brush.h"
26#include "wx/cursor.h"
27#include "wx/intl.h"
28#include "wx/icon.h"
29#include "wx/palette.h"
30#include "wx/dc.h"
31#include "wx/dialog.h"
32#include "wx/msgdlg.h"
33#include "wx/log.h"
34#include "wx/module.h"
35#include "wx/memory.h"
36#include "wx/tooltip.h"
37#include "wx/textctrl.h"
38#include "wx/menu.h"
39#include "wx/docview.h"
40#include "wx/filename.h"
41
42#include <string.h>
43
44// mac
45
46#ifndef __DARWIN__
47 #if __option(profile)
48 #include <profiler.h>
49 #endif
50#endif
51
52// #include "apprsrc.h"
53
54#include "wx/mac/uma.h"
55#include "wx/mac/macnotfy.h"
56
57#ifdef __DARWIN__
58# include <CoreServices/CoreServices.h>
59# if defined(WXMAKINGDLL_CORE)
60# include <mach-o/dyld.h>
61# endif
62#else
63# include <Sound.h>
64# include <Threads.h>
65# include <ToolUtils.h>
66# include <DiskInit.h>
67# include <Devices.h>
68#endif
69
70extern wxList wxPendingDelete;
71
72// set wxMAC_USE_RAEL to 1 if RunApplicationEventLoop should be used
73// if 0 the lower level CarbonEventLoop will be used
74// on the long run RAEL should replace the low level event loop
75// we will have to clean up event handling to make sure we don't
76// miss handling of things like pending events etc
77// perhaps we will also have to pipe events through an ueber-event-handler
78// to make sure we have one place to do all these house-keeping functions
79
80#define wxMAC_USE_RAEL 0
81
82#if wxUSE_THREADS
83extern size_t g_numberOfThreads;
84#endif // wxUSE_THREADS
85
86// statics for implementation
87
88static bool s_inYield = FALSE;
89
90static bool s_inReceiveEvent = FALSE ;
91static EventTime sleepTime = kEventDurationNoWait ;
92
93#if !USE_SHARED_LIBRARY
94IMPLEMENT_DYNAMIC_CLASS(wxApp, wxEvtHandler)
95BEGIN_EVENT_TABLE(wxApp, wxEvtHandler)
96 EVT_IDLE(wxApp::OnIdle)
97 EVT_END_SESSION(wxApp::OnEndSession)
98 EVT_QUERY_END_SESSION(wxApp::OnQueryEndSession)
99END_EVENT_TABLE()
100#endif
101
102
103const short kMacMinHeap = (29 * 1024) ;
104// platform specific static variables
105
106const short kwxMacMenuBarResource = 1 ;
107const short kwxMacAppleMenuId = 1 ;
108
109WXHRGN wxApp::s_macCursorRgn = NULL;
110wxWindow* wxApp::s_captureWindow = NULL ;
111int wxApp::s_lastMouseDown = 0 ;
112long wxApp::sm_lastMessageTime = 0;
113long wxApp::s_lastModifiers = 0 ;
114
115
116bool wxApp::s_macSupportPCMenuShortcuts = true ;
117long wxApp::s_macAboutMenuItemId = wxID_ABOUT ;
118long wxApp::s_macPreferencesMenuItemId = wxID_PREFERENCES ;
119long wxApp::s_macExitMenuItemId = wxID_EXIT ;
120wxString wxApp::s_macHelpMenuTitleName = wxT("&Help") ;
121
122// Normally we're not a plugin
123bool wxApp::sm_isEmbedded = false;
124//----------------------------------------------------------------------
125// Core Apple Event Support
126//----------------------------------------------------------------------
127
128pascal OSErr AEHandleODoc( const AppleEvent *event , AppleEvent *reply , long refcon ) ;
129pascal OSErr AEHandleOApp( const AppleEvent *event , AppleEvent *reply , long refcon ) ;
130pascal OSErr AEHandlePDoc( const AppleEvent *event , AppleEvent *reply , long refcon ) ;
131pascal OSErr AEHandleQuit( const AppleEvent *event , AppleEvent *reply , long refcon ) ;
132pascal OSErr AEHandleRApp( const AppleEvent *event , AppleEvent *reply , long refcon ) ;
133
134pascal OSErr AEHandleODoc( const AppleEvent *event , AppleEvent *reply , long WXUNUSED(refcon) )
135{
136 return wxTheApp->MacHandleAEODoc( (AppleEvent*) event , reply) ;
137}
138
139pascal OSErr AEHandleOApp( const AppleEvent *event , AppleEvent *reply , long WXUNUSED(refcon) )
140{
141 return wxTheApp->MacHandleAEOApp( (AppleEvent*) event , reply ) ;
142}
143
144pascal OSErr AEHandlePDoc( const AppleEvent *event , AppleEvent *reply , long WXUNUSED(refcon) )
145{
146 return wxTheApp->MacHandleAEPDoc( (AppleEvent*) event , reply ) ;
147}
148
149pascal OSErr AEHandleQuit( const AppleEvent *event , AppleEvent *reply , long WXUNUSED(refcon) )
150{
151 return wxTheApp->MacHandleAEQuit( (AppleEvent*) event , reply) ;
152}
153
154pascal OSErr AEHandleRApp( const AppleEvent *event , AppleEvent *reply , long WXUNUSED(refcon) )
155{
156 return wxTheApp->MacHandleAERApp( (AppleEvent*) event , reply) ;
157}
158
159// AEODoc Calls MacOpenFile on each of the files passed
160
161short wxApp::MacHandleAEODoc(const WXEVENTREF event, WXEVENTREF WXUNUSED(reply))
162{
163 AEDescList docList;
164 AEKeyword keywd;
165 DescType returnedType;
166 Size actualSize;
167 long itemsInList;
168 FSSpec theSpec;
169 OSErr err;
170 short i;
171 err = AEGetParamDesc((AppleEvent *)event, keyDirectObject, typeAEList,&docList);
172 if (err != noErr)
173 return err;
174
175 err = AECountItems(&docList, &itemsInList);
176 if (err != noErr)
177 return err;
178
179 ProcessSerialNumber PSN ;
180 PSN.highLongOfPSN = 0 ;
181 PSN.lowLongOfPSN = kCurrentProcess ;
182 SetFrontProcess( &PSN ) ;
183
184 for (i = 1; i <= itemsInList; i++) {
185 AEGetNthPtr(&docList, i, typeFSS, &keywd, &returnedType,
186 (Ptr) & theSpec, sizeof(theSpec), &actualSize);
187 wxString fName = wxMacFSSpec2MacFilename(&theSpec);
188 MacOpenFile(fName);
189 }
190 return noErr;
191}
192
193// AEPDoc Calls MacPrintFile on each of the files passed
194
195short wxApp::MacHandleAEPDoc(const WXEVENTREF event , WXEVENTREF WXUNUSED(reply))
196{
197 AEDescList docList;
198 AEKeyword keywd;
199 DescType returnedType;
200 Size actualSize;
201 long itemsInList;
202 FSSpec theSpec;
203 OSErr err;
204 short i;
205 err = AEGetParamDesc((AppleEvent *)event, keyDirectObject, typeAEList,&docList);
206 if (err != noErr)
207 return err;
208
209 err = AECountItems(&docList, &itemsInList);
210 if (err != noErr)
211 return err;
212
213 ProcessSerialNumber PSN ;
214 PSN.highLongOfPSN = 0 ;
215 PSN.lowLongOfPSN = kCurrentProcess ;
216 SetFrontProcess( &PSN ) ;
217
218 for (i = 1; i <= itemsInList; i++) {
219 AEGetNthPtr(&docList, i, typeFSS, &keywd, &returnedType,
220 (Ptr) & theSpec, sizeof(theSpec), &actualSize);
221 wxString fName = wxMacFSSpec2MacFilename(&theSpec);
222 MacPrintFile(fName);
223 }
224 return noErr;
225}
226
227// AEOApp calls MacNewFile
228
229short wxApp::MacHandleAEOApp(const WXEVENTREF WXUNUSED(event) , WXEVENTREF WXUNUSED(reply))
230{
231 MacNewFile() ;
232 return noErr ;
233}
234
235// AEQuit attempts to quit the application
236
237short wxApp::MacHandleAEQuit(const WXEVENTREF WXUNUSED(event) , WXEVENTREF WXUNUSED(reply))
238{
239 wxWindow* win = GetTopWindow() ;
240 if ( win )
241 {
242 wxCommandEvent exitEvent(wxEVT_COMMAND_MENU_SELECTED, s_macExitMenuItemId);
243 if (!win->ProcessEvent(exitEvent))
244 win->Close(TRUE ) ;
245 }
246 else
247 {
248 ExitMainLoop() ;
249 }
250 return noErr ;
251}
252
253// AEROApp calls MacReopenApp
254
255short wxApp::MacHandleAERApp(const WXEVENTREF WXUNUSED(event) , WXEVENTREF WXUNUSED(reply))
256{
257 MacReopenApp() ;
258 return noErr ;
259}
260
261
262//----------------------------------------------------------------------
263// Support Routines linking the Mac...File Calls to the Document Manager
264//----------------------------------------------------------------------
265
266void wxApp::MacOpenFile(const wxString & fileName )
267{
268 wxDocManager* dm = wxDocManager::GetDocumentManager() ;
269 if ( dm )
270 dm->CreateDocument(fileName , wxDOC_SILENT ) ;
271}
272
273void wxApp::MacPrintFile(const wxString & fileName )
274{
275 wxDocManager* dm = wxDocManager::GetDocumentManager() ;
276 if ( dm )
277 {
278 wxDocument *doc = dm->CreateDocument(fileName , wxDOC_SILENT ) ;
279 if ( doc )
280 {
281 wxView* view = doc->GetFirstView() ;
282 if( view )
283 {
284 wxPrintout *printout = view->OnCreatePrintout();
285 if (printout)
286 {
287 wxPrinter printer;
288 printer.Print(view->GetFrame(), printout, TRUE);
289 delete printout;
290 }
291 }
292 if (doc->Close())
293 {
294 doc->DeleteAllViews();
295 dm->RemoveDocument(doc) ;
296 }
297 }
298 }
299}
300
301void wxApp::MacNewFile()
302{
303}
304
305void wxApp::MacReopenApp()
306{
307 // HIG says :
308 // if there is no open window -> create a new one
309 // if all windows are hidden -> show the first
310 // if some windows are not hidden -> do nothing
311
312 wxWindowList::compatibility_iterator node = wxTopLevelWindows.GetFirst();
313 if ( node == NULL )
314 {
315 MacNewFile() ;
316 }
317 else
318 {
319 wxTopLevelWindow* firstIconized = NULL ;
320 while (node)
321 {
322 wxTopLevelWindow* win = (wxTopLevelWindow*) node->GetData();
323 if ( win->IsIconized() == false )
324 {
325 firstIconized = NULL ;
326 break ;
327 }
328 else
329 {
330 if ( firstIconized == NULL )
331 firstIconized = win ;
332 }
333 node = node->GetNext();
334 }
335 if ( firstIconized )
336 firstIconized->Iconize( false ) ;
337 }
338}
339
340//----------------------------------------------------------------------
341// Carbon Event Handler
342//----------------------------------------------------------------------
343
344static const EventTypeSpec eventList[] =
345{
346 { kEventClassCommand, kEventProcessCommand } ,
347 { kEventClassCommand, kEventCommandUpdateStatus } ,
348
349 { kEventClassMenu, kEventMenuOpening },
350 { kEventClassMenu, kEventMenuClosed },
351 { kEventClassMenu, kEventMenuTargetItem },
352
353 { kEventClassApplication , kEventAppActivated } ,
354 { kEventClassApplication , kEventAppDeactivated } ,
355 // handling the quit event is not recommended by apple
356 // rather using the quit apple event - which we do
357
358 { kEventClassAppleEvent , kEventAppleEvent } ,
359
360 { kEventClassMouse , kEventMouseDown } ,
361 { kEventClassMouse , kEventMouseMoved } ,
362 { kEventClassMouse , kEventMouseUp } ,
363 { kEventClassMouse , kEventMouseDragged } ,
364 { 'WXMC' , 'WXMC' }
365} ;
366
367static pascal OSStatus
368wxMacAppMenuEventHandler( EventHandlerCallRef handler , EventRef event , void *data )
369{
370 EventRef formerEvent = (EventRef) wxTheApp->MacGetCurrentEvent() ;
371 EventHandlerCallRef formerEventHandlerCallRef = (EventHandlerCallRef) wxTheApp->MacGetCurrentEventHandlerCallRef() ;
372 wxTheApp->MacSetCurrentEvent( event , handler ) ;
373
374 wxMacCarbonEvent cEvent( event ) ;
375 MenuRef menuRef = cEvent.GetParameter<MenuRef>(kEventParamDirectObject) ;
376 wxMenu* menu = wxFindMenuFromMacMenu( menuRef ) ;
377
378 if ( menu )
379 {
380 wxEventType type=0;
381 MenuCommand cmd=0;
382 switch (GetEventKind(event))
383 {
384 case kEventMenuOpening:
385 type = wxEVT_MENU_OPEN;
386 break;
387 case kEventMenuClosed:
388 type = wxEVT_MENU_CLOSE;
389 break;
390 case kEventMenuTargetItem:
391 cmd = cEvent.GetParameter<MenuCommand>(kEventParamMenuCommand,typeMenuCommand) ;
392 if (cmd != 0)
393 type = wxEVT_MENU_HIGHLIGHT;
394 break;
395 default:
396 wxFAIL_MSG(wxT("Unexpected menu event kind"));
397 break;
398 }
399
400 if ( type )
401 {
402 wxMenuEvent wxevent(type, cmd);
403 wxevent.SetEventObject(menu);
404
405 wxEvtHandler* handler = menu->GetEventHandler();
406 if (handler && handler->ProcessEvent(wxevent))
407 {
408 // handled
409 }
410 else
411 {
412 wxWindow *win = menu->GetInvokingWindow();
413 if (win)
414 win->GetEventHandler()->ProcessEvent(wxevent);
415 }
416 }
417 }
418
419 wxTheApp->MacSetCurrentEvent( formerEvent, formerEventHandlerCallRef ) ;
420
421 return eventNotHandledErr;
422}
423
424static pascal OSStatus wxMacAppCommandEventHandler( EventHandlerCallRef handler , EventRef event , void *data )
425{
426 OSStatus result = eventNotHandledErr ;
427
428 HICommand command ;
429
430 wxMacCarbonEvent cEvent( event ) ;
431 cEvent.GetParameter<HICommand>(kEventParamDirectObject,typeHICommand,&command) ;
432
433 wxMenuItem* item = NULL ;
434 MenuCommand id = command.commandID ;
435 // for items we don't really control
436 if ( id == kHICommandPreferences )
437 {
438 id = wxApp::s_macPreferencesMenuItemId ;
439
440 wxMenuBar* mbar = wxMenuBar::MacGetInstalledMenuBar() ;
441 if ( mbar )
442 {
443 wxMenu* menu = NULL ;
444 item = mbar->FindItem( id , &menu ) ;
445 }
446 }
447 else if ( id != 0 && command.menu.menuRef != 0 && command.menu.menuItemIndex != 0 )
448 {
449 GetMenuItemRefCon( command.menu.menuRef , command.menu.menuItemIndex , (UInt32*) &item ) ;
450 }
451
452 if ( item )
453 {
454 switch( cEvent.GetKind() )
455 {
456 case kEventProcessCommand :
457 {
458 if (item->IsCheckable())
459 {
460 item->Check( !item->IsChecked() ) ;
461 }
462
463 item->GetMenu()->SendEvent( id , item->IsCheckable() ? item->IsChecked() : -1 ) ;
464 result = noErr ;
465 }
466 break ;
467 case kEventCommandUpdateStatus:
468 // eventually trigger an updateui round
469 result = noErr ;
470 break ;
471 default :
472 break ;
473 }
474 }
475 return result ;
476}
477
478static pascal OSStatus wxMacAppApplicationEventHandler( EventHandlerCallRef handler , EventRef event , void *data )
479{
480 OSStatus result = eventNotHandledErr ;
481 switch ( GetEventKind( event ) )
482 {
483 case kEventAppActivated :
484 {
485 if ( wxTheApp )
486 wxTheApp->SetActive( true , NULL ) ;
487 result = noErr ;
488 }
489 break ;
490 case kEventAppDeactivated :
491 {
492 if ( wxTheApp )
493 wxTheApp->SetActive( false , NULL ) ;
494 result = noErr ;
495 }
496 break ;
497 default :
498 break ;
499 }
500 return result ;
501}
502
503pascal OSStatus wxMacAppEventHandler( EventHandlerCallRef handler , EventRef event , void *data )
504{
505 OSStatus result = eventNotHandledErr ;
506 switch( GetEventClass( event ) )
507 {
508 case kEventClassCommand :
509 result = wxMacAppCommandEventHandler( handler , event , data ) ;
510 break ;
511 case kEventClassApplication :
512 result = wxMacAppApplicationEventHandler( handler , event , data ) ;
513 break ;
514 case kEventClassMenu :
515 result = wxMacAppMenuEventHandler( handler , event , data ) ;
516 break ;
517 case kEventClassMouse :
518 result = wxMacTopLevelMouseEventHandler( handler , event , NULL ) ;
519 break ;
520 case kEventClassAppleEvent :
521 {
522 EventRecord rec ;
523 wxMacConvertEventToRecord( event , &rec ) ;
524 result = AEProcessAppleEvent( &rec ) ;
525 }
526 break ;
527 default :
528 break ;
529 }
530
531 return result ;
532}
533
534DEFINE_ONE_SHOT_HANDLER_GETTER( wxMacAppEventHandler )
535
536#if defined(WXMAKINGDLL_CORE) && !defined(__DARWIN__)
537// we know it's there ;-)
538WXIMPORT char std::__throws_bad_alloc ;
539#endif
540
541pascal static void wxMacAssertOutputHandler(OSType componentSignature, UInt32 options,
542 const char *assertionString, const char *exceptionLabelString,
543 const char *errorString, const char *fileName, long lineNumber, void *value, ConstStr255Param outputMsg)
544{
545 // flow into assert handling
546 wxString fileNameStr ;
547 wxString assertionStr ;
548 wxString exceptionStr ;
549 wxString errorStr ;
550#if wxUSE_UNICODE
551 fileNameStr = wxString(fileName, wxConvLocal);
552 assertionStr = wxString(assertionString, wxConvLocal);
553 exceptionStr = wxString((exceptionLabelString!=0) ? exceptionLabelString : "", wxConvLocal) ;
554 errorStr = wxString((errorString!=0) ? errorString : "", wxConvLocal) ;
555#else
556 fileNameStr = fileName;
557 assertionStr = assertionString;
558 exceptionStr = (exceptionLabelString!=0) ? exceptionLabelString : "" ;
559 errorStr = (errorString!=0) ? errorString : "" ;
560#endif
561
562#if 1
563 // flow into log
564 wxLogDebug( wxT("AssertMacros: %s %s %s file: %s, line: %ld (value %p)\n"),
565 assertionStr.c_str() ,
566 exceptionStr.c_str() ,
567 errorStr.c_str(),
568 fileNameStr.c_str(), lineNumber ,
569 value ) ;
570#else
571
572 wxOnAssert(fileNameStr, lineNumber , assertionStr ,
573 wxString::Format( wxT("%s %s value (%p)") ,exceptionStr, errorStr , value ) ) ;
574#endif
575}
576
577bool wxApp::Initialize(int& argc, wxChar **argv)
578{
579 // Mac-specific
580
581#if __WXDEBUG__
582 InstallDebugAssertOutputHandler ( NewDebugAssertOutputHandlerUPP( wxMacAssertOutputHandler ) );
583#endif
584 UMAInitToolbox( 4, sm_isEmbedded ) ;
585 SetEventMask( everyEvent ) ;
586 UMAShowWatchCursor() ;
587
588#if defined(WXMAKINGDLL_CORE) && defined(__DARWIN__)
589 // open shared library resources from here since we don't have
590 // __wxinitialize in Mach-O shared libraries
591 wxStAppResource::OpenSharedLibraryResource(NULL);
592#endif
593
594#ifndef __DARWIN__
595# if __option(profile)
596 ProfilerInit( collectDetailed, bestTimeBase , 40000 , 50 ) ;
597# endif
598#endif
599
600#ifndef __DARWIN__
601 // now avoid exceptions thrown for new (bad_alloc)
602 // FIXME CS for some changes outside wxMac does not compile anymore
603#if 0
604 std::__throws_bad_alloc = 0 ;
605#endif
606
607#endif
608
609 s_macCursorRgn = ::NewRgn() ;
610
611 // Mac OS X passes a process serial number command line argument when
612 // the application is launched from the Finder. This argument must be
613 // removed from the command line arguments before being handled by the
614 // application (otherwise applications would need to handle it)
615 if ( argc > 1 )
616 {
617 static const wxChar *ARG_PSN = _T("-psn_");
618 if ( wxStrncmp(argv[1], ARG_PSN, wxStrlen(ARG_PSN)) == 0 )
619 {
620 // remove this argument
621 --argc;
622 memmove(argv + 1, argv + 2, argc * sizeof(char *));
623 }
624 }
625
626 if ( !wxAppBase::Initialize(argc, argv) )
627 return false;
628
629#if wxUSE_INTL
630 wxFont::SetDefaultEncoding(wxLocale::GetSystemEncoding());
631#endif
632
633
634 wxMacCreateNotifierTable() ;
635
636 UMAShowArrowCursor() ;
637
638 return true;
639}
640
641bool wxApp::OnInitGui()
642{
643 if( !wxAppBase::OnInitGui() )
644 return false ;
645
646 InstallStandardEventHandler( GetApplicationEventTarget() ) ;
647
648 if (!sm_isEmbedded)
649 {
650 InstallApplicationEventHandler(
651 GetwxMacAppEventHandlerUPP(),
652 GetEventTypeCount(eventList), eventList, wxTheApp, (EventHandlerRef *)&(wxTheApp->m_macEventHandler));
653 }
654
655 if (!sm_isEmbedded)
656 {
657 AEInstallEventHandler( kCoreEventClass , kAEOpenDocuments ,
658 NewAEEventHandlerUPP(AEHandleODoc) ,
659 0 , FALSE ) ;
660 AEInstallEventHandler( kCoreEventClass , kAEOpenApplication ,
661 NewAEEventHandlerUPP(AEHandleOApp) ,
662 0 , FALSE ) ;
663 AEInstallEventHandler( kCoreEventClass , kAEPrintDocuments ,
664 NewAEEventHandlerUPP(AEHandlePDoc) ,
665 0 , FALSE ) ;
666 AEInstallEventHandler( kCoreEventClass , kAEReopenApplication ,
667 NewAEEventHandlerUPP(AEHandleRApp) ,
668 0 , FALSE ) ;
669 AEInstallEventHandler( kCoreEventClass , kAEQuitApplication ,
670 NewAEEventHandlerUPP(AEHandleQuit) ,
671 0 , FALSE ) ;
672 }
673
674 return TRUE ;
675}
676
677void wxApp::CleanUp()
678{
679 wxToolTip::RemoveToolTips() ;
680
681 // One last chance for pending objects to be cleaned up
682 wxTheApp->DeletePendingObjects();
683
684 wxMacDestroyNotifierTable() ;
685
686#ifndef __DARWIN__
687# if __option(profile)
688 ProfilerDump( (StringPtr)"\papp.prof" ) ;
689 ProfilerTerm() ;
690# endif
691#endif
692
693#if defined(WXMAKINGDLL_CORE) && defined(__DARWIN__)
694 // close shared library resources from here since we don't have
695 // __wxterminate in Mach-O shared libraries
696 wxStAppResource::CloseSharedLibraryResource();
697#endif
698
699 UMACleanupToolbox() ;
700 if (s_macCursorRgn) {
701 ::DisposeRgn((RgnHandle)s_macCursorRgn);
702 }
703
704 #if 0
705 TerminateAE() ;
706 #endif
707
708 wxAppBase::CleanUp();
709}
710
711//----------------------------------------------------------------------
712// misc initialization stuff
713//----------------------------------------------------------------------
714
715// extern variable for shared library resource id
716// need to be able to find it with NSLookupAndBindSymbol
717short gSharedLibraryResource = kResFileNotOpened ;
718
719#if defined(WXMAKINGDLL_CORE) && defined(__DARWIN__)
720CFBundleRef gSharedLibraryBundle = NULL;
721#endif /* WXMAKINGDLL_CORE && __DARWIN__ */
722
723wxStAppResource::wxStAppResource()
724{
725 m_currentRefNum = CurResFile() ;
726 if ( gSharedLibraryResource != kResFileNotOpened )
727 {
728 UseResFile( gSharedLibraryResource ) ;
729 }
730}
731
732wxStAppResource::~wxStAppResource()
733{
734 if ( m_currentRefNum != kResFileNotOpened )
735 {
736 UseResFile( m_currentRefNum ) ;
737 }
738}
739
740void wxStAppResource::OpenSharedLibraryResource(const void *initBlock)
741{
742 gSharedLibraryResource = kResFileNotOpened;
743
744#ifdef WXMAKINGDLL_CORE
745 if ( initBlock != NULL ) {
746 const CFragInitBlock *theInitBlock = (const CFragInitBlock *)initBlock;
747 FSSpec *fileSpec = NULL;
748
749 if (theInitBlock->fragLocator.where == kDataForkCFragLocator) {
750 fileSpec = theInitBlock->fragLocator.u.onDisk.fileSpec;
751 }
752 else if (theInitBlock->fragLocator.where == kResourceCFragLocator) {
753 fileSpec = theInitBlock->fragLocator.u.inSegs.fileSpec;
754 }
755
756 if (fileSpec != NULL) {
757 gSharedLibraryResource = FSpOpenResFile(fileSpec, fsRdPerm);
758 }
759 }
760 else {
761#ifdef __DARWIN__
762 // Open the shared library resource file if it is not yet open
763 NSSymbol theSymbol;
764 NSModule theModule;
765 const char *theLibPath;
766
767 gSharedLibraryBundle = CFBundleGetBundleWithIdentifier(CFSTR("com.wxwindows.wxWidgets"));
768 if (gSharedLibraryBundle != NULL) {
769 // wxWidgets has been bundled into a framework
770 // load the framework resources
771
772 gSharedLibraryResource = CFBundleOpenBundleResourceMap(gSharedLibraryBundle);
773 }
774 else {
775 // wxWidgets is a simple dynamic shared library
776 // load the resources from the data fork of a separate resource file
777 wxString theResPath;
778 wxString theName;
779 FSRef theResRef;
780 OSErr theErr = noErr;
781
782 // get the library path
783 theSymbol = NSLookupAndBindSymbol("_gSharedLibraryResource");
784 theModule = NSModuleForSymbol(theSymbol);
785 theLibPath = NSLibraryNameForModule(theModule);
786
787 // if we call wxLogDebug from here then, as wxTheApp hasn't been
788 // created yet when we're called from wxApp::Initialize(), wxLog
789 // is going to create a default stderr-based log target instead of
790 // the expected normal GUI one -- don't do it, if we really want
791 // to see this message just use fprintf() here
792#if 0
793 wxLogDebug( wxT("wxMac library installation name is '%s'"),
794 theLibPath );
795#endif
796
797 // allocate copy to replace .dylib.* extension with .rsrc
798 if (theLibPath != NULL) {
799#if wxUSE_UNICODE
800 theResPath = wxString(theLibPath, wxConvLocal);
801#else
802 theResPath = wxString(theLibPath);
803#endif
804 // replace '_core' with '' in case of multi-lib build
805 theResPath.Replace(wxT("_core"), wxEmptyString);
806 // replace ".dylib" shared library extension with ".rsrc"
807 theResPath.Replace(wxT(".dylib"), wxT(".rsrc"));
808 // Find the begining of the filename
809 theName = theResPath.AfterLast('/');
810
811#if 0
812 wxLogDebug( wxT("wxMac resources file name is '%s'"),
813 theResPath.mb_str() );
814#endif
815
816 theErr = FSPathMakeRef((UInt8 *) theResPath.mb_str(), &theResRef, false);
817 if (theErr != noErr) {
818 // try in current directory (using name only)
819 theErr = FSPathMakeRef((UInt8 *) theName.mb_str(), &theResRef, false);
820 }
821
822 // open the resource file
823 if (theErr == noErr) {
824 theErr = FSOpenResourceFile( &theResRef, 0, NULL, fsRdPerm,
825 &gSharedLibraryResource);
826 }
827 if (theErr != noErr) {
828#ifdef __WXDEBUG__
829 wxLogDebug( wxT("unable to open wxMac resource file '%s'\n"),
830 theResPath.mb_str() );
831#endif // __WXDEBUG__
832 }
833
834 }
835 }
836#endif /* __DARWIN__ */
837 }
838#endif /* WXMAKINGDLL_CORE */
839}
840
841void wxStAppResource::CloseSharedLibraryResource()
842{
843#ifdef WXMAKINGDLL_CORE
844 // Close the shared library resource file
845 if (gSharedLibraryResource != kResFileNotOpened) {
846#ifdef __DARWIN__
847 if (gSharedLibraryBundle != NULL) {
848 CFBundleCloseBundleResourceMap(gSharedLibraryBundle,
849 gSharedLibraryResource);
850 gSharedLibraryBundle = NULL;
851 }
852 else
853#endif /* __DARWIN__ */
854 {
855 CloseResFile(gSharedLibraryResource);
856 }
857 gSharedLibraryResource = kResFileNotOpened;
858 }
859#endif /* WXMAKINGDLL_CORE */
860}
861
862#if defined(WXMAKINGDLL_CORE) && !defined(__DARWIN__)
863
864// for shared libraries we have to manually get the correct resource
865// ref num upon initializing and releasing when terminating, therefore
866// the __wxinitialize and __wxterminate must be used
867
868extern "C" {
869 void __sinit(void); /* (generated by linker) */
870 pascal OSErr __initialize(const CFragInitBlock *theInitBlock);
871 pascal void __terminate(void);
872}
873
874pascal OSErr __wxinitialize(const CFragInitBlock *theInitBlock)
875{
876 wxStAppResource::OpenSharedLibraryResource( theInitBlock ) ;
877 return __initialize( theInitBlock ) ;
878}
879
880pascal void __wxterminate(void)
881{
882 wxStAppResource::CloseSharedLibraryResource() ;
883 __terminate() ;
884}
885
886#endif /* WXMAKINGDLL_CORE && !__DARWIN__ */
887
888bool wxMacConvertEventToRecord( EventRef event , EventRecord *rec)
889{
890 bool converted = ConvertEventRefToEventRecord( event,rec) ;
891 OSStatus err = noErr ;
892 if ( !converted )
893 {
894 switch( GetEventClass( event ) )
895 {
896 case kEventClassKeyboard :
897 {
898 converted = true ;
899 switch( GetEventKind(event) )
900 {
901 case kEventRawKeyDown :
902 rec->what = keyDown ;
903 break ;
904 case kEventRawKeyRepeat :
905 rec->what = autoKey ;
906 break ;
907 case kEventRawKeyUp :
908 rec->what = keyUp ;
909 break ;
910 case kEventRawKeyModifiersChanged :
911 rec->what = nullEvent ;
912 break ;
913 default :
914 converted = false ;
915 break ;
916 }
917 if ( converted )
918 {
919 UInt32 keyCode ;
920 unsigned char charCode ;
921 UInt32 modifiers ;
922 GetMouse( &rec->where) ;
923
924 err = GetEventParameter(event, kEventParamKeyModifiers, typeUInt32, NULL, 4, NULL, &modifiers);
925 err = GetEventParameter(event, kEventParamKeyCode, typeUInt32, NULL, 4, NULL, &keyCode);
926 err = GetEventParameter(event, kEventParamKeyMacCharCodes, typeChar, NULL, 1, NULL, &charCode);
927 rec->modifiers = modifiers ;
928 rec->message = (keyCode << 8 ) + charCode ;
929 }
930 }
931 break ;
932 case kEventClassTextInput :
933 {
934 switch( GetEventKind( event ) )
935 {
936 case kEventTextInputUnicodeForKeyEvent :
937 {
938 EventRef rawEvent ;
939 err = GetEventParameter( event , kEventParamTextInputSendKeyboardEvent ,typeEventRef,NULL,sizeof(rawEvent),NULL,&rawEvent ) ;
940 converted = true ;
941 {
942 UInt32 keyCode ;
943 unsigned char charCode ;
944 UInt32 modifiers ;
945 GetMouse( &rec->where) ;
946 rec->what = keyDown ;
947 err = GetEventParameter(rawEvent, kEventParamKeyModifiers, typeUInt32, NULL, 4, NULL, &modifiers);
948 err = GetEventParameter(rawEvent, kEventParamKeyCode, typeUInt32, NULL, 4, NULL, &keyCode);
949 err = GetEventParameter(rawEvent, kEventParamKeyMacCharCodes, typeChar, NULL, 1, NULL, &charCode);
950 rec->modifiers = modifiers ;
951 rec->message = (keyCode << 8 ) + charCode ;
952 }
953 }
954 break ;
955 default :
956 break ;
957 }
958 }
959 break ;
960 }
961 }
962
963 return converted ;
964}
965
966wxApp::wxApp()
967{
968 m_printMode = wxPRINT_WINDOWS;
969
970 m_macCurrentEvent = NULL ;
971 m_macCurrentEventHandlerCallRef = NULL ;
972}
973
974int wxApp::MainLoop()
975{
976 m_keepGoing = TRUE;
977#if wxMAC_USE_RAEL
978 RunApplicationEventLoop() ;
979#else
980 while (m_keepGoing)
981 {
982 MacDoOneEvent() ;
983 }
984#endif
985 return 0;
986}
987
988void wxApp::ExitMainLoop()
989{
990 m_keepGoing = FALSE;
991#if wxMAC_USE_RAEL
992 QuitApplicationEventLoop() ;
993#endif
994}
995
996// Is a message/event pending?
997bool wxApp::Pending()
998{
999 // without the receive event (with pull param = false ) nothing is ever reported
1000 EventRef theEvent;
1001 ReceiveNextEvent (0, NULL, kEventDurationNoWait, false, &theEvent);
1002 return GetNumEventsInQueue( GetMainEventQueue() ) > 0 ;
1003}
1004
1005// Dispatch a message.
1006bool wxApp::Dispatch()
1007{
1008 MacDoOneEvent() ;
1009
1010 return true;
1011}
1012
1013void wxApp::OnIdle(wxIdleEvent& event)
1014{
1015 wxAppBase::OnIdle(event);
1016
1017 // If they are pending events, we must process them: pending events are
1018 // either events to the threads other than main or events posted with
1019 // wxPostEvent() functions
1020 wxMacProcessNotifierAndPendingEvents();
1021
1022 if(!wxMenuBar::MacGetInstalledMenuBar() && wxMenuBar::MacGetCommonMenuBar())
1023 wxMenuBar::MacGetCommonMenuBar()->MacInstallMenuBar();
1024}
1025
1026void wxApp::WakeUpIdle()
1027{
1028 wxMacWakeUp() ;
1029}
1030
1031void wxApp::Exit()
1032{
1033 wxApp::CleanUp();
1034 ::ExitToShell() ;
1035}
1036
1037void wxApp::OnEndSession(wxCloseEvent& WXUNUSED(event))
1038{
1039 if (GetTopWindow())
1040 GetTopWindow()->Close(TRUE);
1041}
1042
1043// Default behaviour: close the application with prompts. The
1044// user can veto the close, and therefore the end session.
1045void wxApp::OnQueryEndSession(wxCloseEvent& event)
1046{
1047 if (GetTopWindow())
1048 {
1049 if (!GetTopWindow()->Close(!event.CanVeto()))
1050 event.Veto(TRUE);
1051 }
1052}
1053
1054extern "C" void wxCYield() ;
1055void wxCYield()
1056{
1057 wxYield() ;
1058}
1059
1060// Yield to other processes
1061
1062bool wxApp::Yield(bool onlyIfNeeded)
1063{
1064 if (s_inYield)
1065 {
1066 if ( !onlyIfNeeded )
1067 {
1068 wxFAIL_MSG( wxT("wxYield called recursively" ) );
1069 }
1070
1071 return FALSE;
1072 }
1073
1074 s_inYield = TRUE;
1075
1076 // by definition yield should handle all non-processed events
1077
1078 EventRef theEvent;
1079
1080 OSStatus status = noErr ;
1081 do
1082 {
1083 s_inReceiveEvent = true ;
1084 status = ReceiveNextEvent(0, NULL,kEventDurationNoWait,true,&theEvent) ;
1085 s_inReceiveEvent = false ;
1086
1087 if ( status == eventLoopTimedOutErr )
1088 {
1089 // make sure next time the event loop will trigger idle events
1090 sleepTime = kEventDurationNoWait ;
1091 }
1092 else if ( status == eventLoopQuitErr )
1093 {
1094 // according to QA1061 this may also occur when a WakeUp Process
1095 // is executed
1096 }
1097 else
1098 {
1099 MacHandleOneEvent( theEvent ) ;
1100 ReleaseEvent(theEvent);
1101 }
1102 } while( status == noErr ) ;
1103
1104 wxMacProcessNotifierAndPendingEvents() ;
1105 s_inYield = FALSE;
1106
1107 return TRUE;
1108}
1109
1110void wxApp::MacDoOneEvent()
1111{
1112 EventRef theEvent;
1113
1114 s_inReceiveEvent = true ;
1115 OSStatus status = ReceiveNextEvent(0, NULL,sleepTime,true,&theEvent) ;
1116 s_inReceiveEvent = false ;
1117 if ( status == eventLoopTimedOutErr )
1118 {
1119 if ( wxTheApp->ProcessIdle() )
1120 sleepTime = kEventDurationNoWait ;
1121 else
1122 sleepTime = kEventDurationSecond;
1123 }
1124 else if ( status == eventLoopQuitErr )
1125 {
1126 // according to QA1061 this may also occur when a WakeUp Process
1127 // is executed
1128 }
1129 else
1130 {
1131 MacHandleOneEvent( theEvent ) ;
1132 ReleaseEvent(theEvent);
1133 sleepTime = kEventDurationNoWait ;
1134 }
1135 // repeaters
1136
1137 DeletePendingObjects() ;
1138 wxMacProcessNotifierAndPendingEvents() ;
1139}
1140
1141/*virtual*/ void wxApp::MacHandleUnhandledEvent( WXEVENTREF evr )
1142{
1143 // Override to process unhandled events as you please
1144}
1145
1146void wxApp::MacHandleOneEvent( WXEVENTREF evr )
1147{
1148 EventTargetRef theTarget;
1149 theTarget = GetEventDispatcherTarget();
1150 m_macCurrentEvent = evr ;
1151 OSStatus status = SendEventToEventTarget ((EventRef) evr , theTarget);
1152 if(status == eventNotHandledErr)
1153 {
1154 MacHandleUnhandledEvent(evr);
1155 }
1156 wxMacProcessNotifierAndPendingEvents() ;
1157#if wxUSE_THREADS
1158 wxMutexGuiLeaveOrEnter();
1159#endif // wxUSE_THREADS
1160}
1161
1162long wxMacTranslateKey(unsigned char key, unsigned char code) ;
1163long wxMacTranslateKey(unsigned char key, unsigned char code)
1164{
1165 long retval = key ;
1166 switch (key)
1167 {
1168 case kHomeCharCode :
1169 retval = WXK_HOME;
1170 break;
1171 case kEnterCharCode :
1172 retval = WXK_RETURN;
1173 break;
1174 case kEndCharCode :
1175 retval = WXK_END;
1176 break;
1177 case kHelpCharCode :
1178 retval = WXK_HELP;
1179 break;
1180 case kBackspaceCharCode :
1181 retval = WXK_BACK;
1182 break;
1183 case kTabCharCode :
1184 retval = WXK_TAB;
1185 break;
1186 case kPageUpCharCode :
1187 retval = WXK_PAGEUP;
1188 break;
1189 case kPageDownCharCode :
1190 retval = WXK_PAGEDOWN;
1191 break;
1192 case kReturnCharCode :
1193 retval = WXK_RETURN;
1194 break;
1195 case kFunctionKeyCharCode :
1196 {
1197 switch( code )
1198 {
1199 case 0x7a :
1200 retval = WXK_F1 ;
1201 break;
1202 case 0x78 :
1203 retval = WXK_F2 ;
1204 break;
1205 case 0x63 :
1206 retval = WXK_F3 ;
1207 break;
1208 case 0x76 :
1209 retval = WXK_F4 ;
1210 break;
1211 case 0x60 :
1212 retval = WXK_F5 ;
1213 break;
1214 case 0x61 :
1215 retval = WXK_F6 ;
1216 break;
1217 case 0x62:
1218 retval = WXK_F7 ;
1219 break;
1220 case 0x64 :
1221 retval = WXK_F8 ;
1222 break;
1223 case 0x65 :
1224 retval = WXK_F9 ;
1225 break;
1226 case 0x6D :
1227 retval = WXK_F10 ;
1228 break;
1229 case 0x67 :
1230 retval = WXK_F11 ;
1231 break;
1232 case 0x6F :
1233 retval = WXK_F12 ;
1234 break;
1235 case 0x69 :
1236 retval = WXK_F13 ;
1237 break;
1238 case 0x6B :
1239 retval = WXK_F14 ;
1240 break;
1241 case 0x71 :
1242 retval = WXK_F15 ;
1243 break;
1244 }
1245 }
1246 break ;
1247 case kEscapeCharCode :
1248 retval = WXK_ESCAPE ;
1249 break ;
1250 case kLeftArrowCharCode :
1251 retval = WXK_LEFT ;
1252 break ;
1253 case kRightArrowCharCode :
1254 retval = WXK_RIGHT ;
1255 break ;
1256 case kUpArrowCharCode :
1257 retval = WXK_UP ;
1258 break ;
1259 case kDownArrowCharCode :
1260 retval = WXK_DOWN ;
1261 break ;
1262 case kDeleteCharCode :
1263 retval = WXK_DELETE ;
1264 default:
1265 break ;
1266 } // end switch
1267
1268 return retval;
1269}
1270
1271int wxMacKeyCodeToModifier(wxKeyCode key)
1272{
1273 switch (key)
1274 {
1275 case WXK_START:
1276 case WXK_MENU:
1277 return cmdKey;
1278
1279 case WXK_SHIFT:
1280 return shiftKey;
1281
1282 case WXK_CAPITAL:
1283 return alphaLock;
1284
1285 case WXK_ALT:
1286 return optionKey;
1287
1288 case WXK_CONTROL:
1289 return controlKey;
1290
1291 default:
1292 return 0;
1293 }
1294}
1295
1296bool wxGetKeyState(wxKeyCode key) //virtual key code if < 10.2.x, else see below
1297{
1298//#ifdef __DARWIN__
1299// wxHIDKeyboard keyboard;
1300// return keyboard.IsActive(key);
1301//#else
1302// TODO: Have it use HID Manager on OSX...
1303//if OS X > 10.2 (i.e. 10.2.x)
1304//a known apple bug prevents the system from determining led
1305//states with GetKeys... can only determine caps lock led
1306 return !!(GetCurrentKeyModifiers() & wxMacKeyCodeToModifier(key));
1307//else
1308// KeyMapByteArray keymap;
1309// GetKeys((BigEndianLong*)keymap);
1310// return !!(BitTst(keymap, (sizeof(KeyMapByteArray)*8) - iKey));
1311//#endif
1312}
1313
1314
1315bool wxApp::MacSendKeyDownEvent( wxWindow* focus , long keymessage , long modifiers , long when , short wherex , short wherey )
1316{
1317 if ( !focus )
1318 return false ;
1319
1320 short keycode ;
1321 short keychar ;
1322 keychar = short(keymessage & charCodeMask);
1323 keycode = short(keymessage & keyCodeMask) >> 8 ;
1324
1325 if ( modifiers & ( controlKey|shiftKey|optionKey ) )
1326 {
1327 // control interferes with some built-in keys like pgdown, return etc. therefore we remove the controlKey modifier
1328 // and look at the character after
1329 UInt32 state = 0;
1330 UInt32 keyInfo = KeyTranslate((Ptr)GetScriptManagerVariable(smKCHRCache), ( modifiers & (~(controlKey|shiftKey|optionKey))) | keycode, &state);
1331 keychar = short(keyInfo & charCodeMask);
1332 keycode = short(keyInfo & keyCodeMask) >> 8 ;
1333 }
1334 long keyval = wxMacTranslateKey(keychar, keycode) ;
1335 long realkeyval = keyval ;
1336 if ( keyval == keychar )
1337 {
1338 // we are not on a special character combo -> pass the real os event-value to EVT_CHAR, but not to EVT_KEY (make upper first)
1339 realkeyval = short(keymessage & charCodeMask) ;
1340 keyval = wxToupper( keyval ) ;
1341 }
1342
1343 wxKeyEvent event(wxEVT_KEY_DOWN);
1344 bool handled = false ;
1345 event.m_shiftDown = modifiers & shiftKey;
1346 event.m_controlDown = modifiers & controlKey;
1347 event.m_altDown = modifiers & optionKey;
1348 event.m_metaDown = modifiers & cmdKey;
1349 event.m_keyCode = keyval ;
1350
1351 event.m_x = wherex;
1352 event.m_y = wherey;
1353 event.m_timeStamp = when;
1354 event.SetEventObject(focus);
1355 handled = focus->GetEventHandler()->ProcessEvent( event ) ;
1356 if ( handled && event.GetSkipped() )
1357 handled = false ;
1358 if ( !handled )
1359 {
1360#if wxUSE_ACCEL
1361 if (!handled)
1362 {
1363 wxWindow *ancestor = focus;
1364 while (ancestor)
1365 {
1366 int command = ancestor->GetAcceleratorTable()->GetCommand( event );
1367 if (command != -1)
1368 {
1369 wxCommandEvent command_event( wxEVT_COMMAND_MENU_SELECTED, command );
1370 handled = ancestor->GetEventHandler()->ProcessEvent( command_event );
1371 break;
1372 }
1373 if (ancestor->IsTopLevel())
1374 break;
1375 ancestor = ancestor->GetParent();
1376 }
1377 }
1378#endif // wxUSE_ACCEL
1379 }
1380 if (!handled)
1381 {
1382 event.Skip( FALSE ) ;
1383 event.SetEventType( wxEVT_CHAR ) ;
1384 // raw value again
1385 event.m_keyCode = realkeyval ;
1386
1387 handled = focus->GetEventHandler()->ProcessEvent( event ) ;
1388 if ( handled && event.GetSkipped() )
1389 handled = false ;
1390 }
1391 if ( !handled && (keyval == WXK_TAB) )
1392 {
1393 wxWindow* iter = focus->GetParent() ;
1394 while( iter && !handled )
1395 {
1396 if ( iter->HasFlag( wxTAB_TRAVERSAL ) )
1397 {
1398 wxNavigationKeyEvent new_event;
1399 new_event.SetEventObject( focus );
1400 new_event.SetDirection( !event.ShiftDown() );
1401 /* CTRL-TAB changes the (parent) window, i.e. switch notebook page */
1402 new_event.SetWindowChange( event.ControlDown() );
1403 new_event.SetCurrentFocus( focus );
1404 handled = focus->GetParent()->GetEventHandler()->ProcessEvent( new_event );
1405 if ( handled && new_event.GetSkipped() )
1406 handled = false ;
1407 }
1408 iter = iter->GetParent() ;
1409 }
1410 }
1411 // backdoor handler for default return and command escape
1412 if ( !handled && (!focus->IsKindOf(CLASSINFO(wxControl) ) || !focus->MacCanFocus() ) )
1413 {
1414 // if window is not having a focus still testing for default enter or cancel
1415 // TODO add the UMA version for ActiveNonFloatingWindow
1416 wxWindow* focus = wxFindWinFromMacWindow( FrontWindow() ) ;
1417 if ( focus )
1418 {
1419 if ( keyval == WXK_RETURN )
1420 {
1421 wxButton *def = wxDynamicCast(focus->GetDefaultItem(),
1422 wxButton);
1423 if ( def && def->IsEnabled() )
1424 {
1425 wxCommandEvent event(wxEVT_COMMAND_BUTTON_CLICKED, def->GetId() );
1426 event.SetEventObject(def);
1427 def->Command(event);
1428 return true ;
1429 }
1430 }
1431 /* generate wxID_CANCEL if command-. or <esc> has been pressed (typically in dialogs) */
1432 else if (keyval == WXK_ESCAPE || (keyval == '.' && modifiers & cmdKey ) )
1433 {
1434 wxCommandEvent new_event(wxEVT_COMMAND_BUTTON_CLICKED,wxID_CANCEL);
1435 new_event.SetEventObject( focus );
1436 handled = focus->GetEventHandler()->ProcessEvent( new_event );
1437 }
1438 }
1439 }
1440 return handled ;
1441}
1442
1443bool wxApp::MacSendKeyUpEvent( wxWindow* focus , long keymessage , long modifiers , long when , short wherex , short wherey )
1444{
1445 if ( !focus )
1446 return false ;
1447
1448 short keycode ;
1449 short keychar ;
1450 keychar = short(keymessage & charCodeMask);
1451 keycode = short(keymessage & keyCodeMask) >> 8 ;
1452 if ( modifiers & ( controlKey|shiftKey|optionKey ) )
1453 {
1454 // control interferes with some built-in keys like pgdown, return etc. therefore we remove the controlKey modifier
1455 // and look at the character after
1456 UInt32 state = 0;
1457 UInt32 keyInfo = KeyTranslate((Ptr)GetScriptManagerVariable(smKCHRCache), ( modifiers & (~(controlKey|shiftKey|optionKey))) | keycode, &state);
1458 keychar = short(keyInfo & charCodeMask);
1459 keycode = short(keyInfo & keyCodeMask) >> 8 ;
1460 }
1461 long keyval = wxMacTranslateKey(keychar, keycode) ;
1462
1463 if ( keyval == keychar )
1464 {
1465 keyval = wxToupper( keyval ) ;
1466 }
1467 bool handled = false ;
1468
1469 wxKeyEvent event(wxEVT_KEY_UP);
1470 event.m_shiftDown = modifiers & shiftKey;
1471 event.m_controlDown = modifiers & controlKey;
1472 event.m_altDown = modifiers & optionKey;
1473 event.m_metaDown = modifiers & cmdKey;
1474 event.m_keyCode = keyval ;
1475
1476 event.m_x = wherex;
1477 event.m_y = wherey;
1478 event.m_timeStamp = when;
1479 event.SetEventObject(focus);
1480 handled = focus->GetEventHandler()->ProcessEvent( event ) ;
1481
1482 return handled ;
1483}
wxWidgets (Impactor)