1 /////////////////////////////////////////////////////////////////////////////
4 // Author: Julian Smart
8 // Copyright: (c) Julian Smart and Markus Holzem
9 // Licence: wxWindows license
10 /////////////////////////////////////////////////////////////////////////////
13 #pragma implementation "app.h"
16 // For compilers that support precompilation, includes "wx.h".
17 #include "wx/wxprec.h"
19 #if defined(__BORLANDC__)
27 #include "wx/gdicmn.h"
30 #include "wx/cursor.h"
32 #include "wx/palette.h"
34 #include "wx/dialog.h"
35 #include "wx/msgdlg.h"
39 #include "wx/msw/private.h"
41 #include "wx/module.h"
44 #include "wx/thread.h"
46 // define the array of MSG strutures
47 WX_DECLARE_OBJARRAY(MSG
, wxMsgArray
);
49 #include "wx/arrimpl.cpp"
51 WX_DEFINE_OBJARRAY(wxMsgArray
);
52 #endif // wxUSE_THREADS
54 #if wxUSE_WX_RESOURCES
55 #include "wx/resource.h"
58 // To UG: there's no point in putting this #if here
59 // if you don't do the same for the Ole calls further down.
60 // Also, OLE is used not just for drag and drop (it's used by automatn.cpp).
61 // #if wxUSE_DRAG_AND_DROP
62 #if !defined(__GNUWIN32__) && !defined(__SC__)
70 #if defined(__WIN95__) && !defined(__GNUWIN32__)
74 // use debug CRT functions for memory leak detections in VC++ if we're not
75 // using wxWindows own methods
76 #if defined(__WXDEBUG__) && defined(_MSC_VER) && !wxUSE_GLOBAL_MEMORY_OPERATORS && !defined(__NO_VC_CRTDBG__)
77 #define wxUSE_VC_CRTDBG
79 #undef wxUSE_VC_CRTDBG
82 #ifdef wxUSE_VC_CRTDBG
83 // VC++ uses this macro as debug/release mode indicator
88 /* Need to undef new if including crtdbg.h */
95 #if defined(__WXDEBUG__) && wxUSE_GLOBAL_MEMORY_OPERATORS && wxUSE_DEBUG_NEW_ALWAYS
96 #define new new(__FILE__,__LINE__)
98 #endif // wxUSE_VC_CRTDBG
100 extern char *wxBuffer
;
101 extern char *wxOsVersion
;
102 extern wxList
*wxWinHandleList
;
103 extern wxList WXDLLEXPORT wxPendingDelete
;
104 extern void wxSetKeyboardHook(bool doIt
);
105 extern wxCursor
*g_globalCursor
;
107 HINSTANCE wxhInstance
= 0;
108 static MSG s_currentMsg
;
109 wxApp
*wxTheApp
= NULL
;
111 // @@ why not const? and not static?
112 char wxFrameClassName
[] = "wxFrameClass";
113 char wxMDIFrameClassName
[] = "wxMDIFrameClass";
114 char wxMDIChildFrameClassName
[] = "wxMDIChildFrameClass";
115 char wxPanelClassName
[] = "wxPanelClass";
116 char wxCanvasClassName
[] = "wxCanvasClass";
118 HICON wxSTD_FRAME_ICON
= NULL
;
119 HICON wxSTD_MDICHILDFRAME_ICON
= NULL
;
120 HICON wxSTD_MDIPARENTFRAME_ICON
= NULL
;
122 HICON wxDEFAULT_FRAME_ICON
= NULL
;
123 HICON wxDEFAULT_MDICHILDFRAME_ICON
= NULL
;
124 HICON wxDEFAULT_MDIPARENTFRAME_ICON
= NULL
;
126 HBRUSH wxDisableButtonBrush
= 0;
128 LRESULT APIENTRY
wxWndProc(HWND
, UINT
, WPARAM
, LPARAM
);
130 #if !USE_SHARED_LIBRARY
131 IMPLEMENT_DYNAMIC_CLASS(wxApp
, wxEvtHandler
)
133 BEGIN_EVENT_TABLE(wxApp
, wxEvtHandler
)
134 EVT_IDLE(wxApp::OnIdle
)
135 EVT_END_SESSION(wxApp::OnEndSession
)
136 EVT_QUERY_END_SESSION(wxApp::OnQueryEndSession
)
140 long wxApp::sm_lastMessageTime
= 0;
143 static HINSTANCE gs_hRichEdit
= NULL
;
148 bool wxApp::Initialize()
150 // Some people may wish to use this, but
151 // probably it shouldn't be here by default.
153 // wxRedirectIOToConsole();
156 wxBuffer
= new char[1500];
158 #ifdef wxUSE_VC_CRTDBG
159 // do check for memory leaks on program exit
160 // (another useful flag is _CRTDBG_DELAY_FREE_MEM_DF which doesn't free
161 // deallocated memory which may be used to simulate low-memory condition)
162 _CrtSetDbgFlag(_CrtSetDbgFlag(_CRTDBG_REPORT_FLAG
) | _CRTDBG_LEAK_CHECK_DF
);
163 #endif // debug build under MS VC++
165 wxClassInfo::InitializeClasses();
168 wxGetResource("wxWindows", "OsVersion", &wxOsVersion
);
171 wxTheColourDatabase
= new wxColourDatabase(wxKEY_STRING
);
172 wxTheColourDatabase
->Initialize();
174 wxInitializeStockLists();
175 wxInitializeStockObjects();
177 #if wxUSE_WX_RESOURCES
178 wxInitializeResourceSystem();
181 wxBitmap::InitStandardHandlers();
183 #if defined(__WIN95__)
184 InitCommonControls();
185 gs_hRichEdit
= LoadLibrary("RICHED32.DLL");
187 if (gs_hRichEdit
== NULL
)
189 wxMessageBox("Could not initialise Rich Edit DLL");
195 // for OLE, enlarge message queue to be as large as possible
196 while (!SetMessageQueue(iMsg
) && (iMsg
-= 8));
200 dwOleVer = CoBuildVersion();
202 // check the OLE library version
203 if (rmm != HIWORD(dwOleVer))
205 wxMessageBox("Incorrect version of OLE libraries.");
210 #if !defined(__GNUWIN32__) && !defined(__SC__)
211 // we need to initialize OLE library
212 if ( FAILED(::OleInitialize(NULL
)) )
213 wxFatalError(_("Cannot initialize OLE"));
217 if (!Ctl3dRegister(wxhInstance
))
218 wxFatalError("Cannot register CTL3D");
220 Ctl3dAutoSubclass(wxhInstance
);
223 g_globalCursor
= new wxCursor
;
225 wxSTD_FRAME_ICON
= LoadIcon(wxhInstance
, "wxSTD_FRAME");
226 wxSTD_MDIPARENTFRAME_ICON
= LoadIcon(wxhInstance
, "wxSTD_MDIPARENTFRAME");
227 wxSTD_MDICHILDFRAME_ICON
= LoadIcon(wxhInstance
, "wxSTD_MDICHILDFRAME");
229 wxDEFAULT_FRAME_ICON
= LoadIcon(wxhInstance
, "wxDEFAULT_FRAME");
230 wxDEFAULT_MDIPARENTFRAME_ICON
= LoadIcon(wxhInstance
, "wxDEFAULT_MDIPARENTFRAME");
231 wxDEFAULT_MDICHILDFRAME_ICON
= LoadIcon(wxhInstance
, "wxDEFAULT_MDICHILDFRAME");
233 RegisterWindowClasses();
235 // Create the brush for disabling bitmap buttons
238 lb
.lbStyle
= BS_PATTERN
;
239 lb
.lbHatch
= (int)LoadBitmap( wxhInstance
, "wxDISABLE_BUTTON_BITMAP" ) ;
240 wxDisableButtonBrush
= ::CreateBrushIndirect( & lb
) ;
241 ::DeleteObject( (HGDIOBJ
)lb
.lbHatch
) ;
247 wxWinHandleList
= new wxList(wxKEY_INTEGER
);
249 // This is to foil optimizations in Visual C++ that
250 // throw out dummy.obj.
251 #if defined(_MSC_VER) && !defined(WXMAKINGDLL)
252 extern char wxDummyChar
;
253 if (wxDummyChar
) wxDummyChar
++;
256 wxSetKeyboardHook(TRUE
);
258 wxModule::RegisterModules();
259 if (!wxModule::InitializeModules())
264 //// RegisterWindowClasses
266 bool wxApp::RegisterWindowClasses()
268 ///////////////////////////////////////////////////////////////////////
269 // Register the frame window class.
270 WNDCLASS wndclass
; // Structure used to register Windows class.
272 wndclass
.style
= CS_HREDRAW
| CS_VREDRAW
;
273 wndclass
.lpfnWndProc
= (WNDPROC
)wxWndProc
;
274 wndclass
.cbClsExtra
= 0;
275 wndclass
.cbWndExtra
= sizeof( DWORD
); // was 4
276 wndclass
.hInstance
= wxhInstance
;
277 wndclass
.hIcon
= NULL
; // wxSTD_FRAME_ICON;
278 wndclass
.hCursor
= LoadCursor( NULL
, IDC_ARROW
);
279 wndclass
.hbrBackground
= (HBRUSH
)(COLOR_APPWORKSPACE
+1) ;
280 // wndclass.hbrBackground = GetStockObject( WHITE_BRUSH );
281 wndclass
.lpszMenuName
= NULL
;
282 #ifdef _MULTIPLE_INSTANCES
283 sprintf( wxFrameClassName
,"wxFrameClass%d", wxhInstance
);
285 wndclass
.lpszClassName
= wxFrameClassName
;
287 if (!RegisterClass( &wndclass
))
289 // wxFatalError("Can't register Frame Window class");
292 ///////////////////////////////////////////////////////////////////////
293 // Register the MDI frame window class.
294 WNDCLASS wndclass1
; // Structure used to register Windows class.
296 wndclass1
.style
= CS_HREDRAW
| CS_VREDRAW
;
297 wndclass1
.lpfnWndProc
= (WNDPROC
)wxWndProc
;
298 wndclass1
.cbClsExtra
= 0;
299 wndclass1
.cbWndExtra
= sizeof( DWORD
); // was 4
300 wndclass1
.hInstance
= wxhInstance
;
301 wndclass1
.hIcon
= NULL
; // wxSTD_MDIPARENTFRAME_ICON;
302 wndclass1
.hCursor
= LoadCursor( NULL
, IDC_ARROW
);
303 // wndclass1.hbrBackground = (HBRUSH)(COLOR_APPWORKSPACE+1) ;
304 wndclass1
.hbrBackground
= NULL
;
305 wndclass1
.lpszMenuName
= NULL
;
307 wndclass1
.lpszClassName
= wxMDIFrameClassName
;
308 if (!RegisterClass( &wndclass1
))
310 // wxFatalError("Can't register MDI Frame window class");
314 ///////////////////////////////////////////////////////////////////////
315 // Register the MDI child frame window class.
316 WNDCLASS wndclass4
; // Structure used to register Windows class.
318 wndclass4
.style
= CS_HREDRAW
| CS_VREDRAW
;
319 wndclass4
.lpfnWndProc
= (WNDPROC
)wxWndProc
;
320 wndclass4
.cbClsExtra
= 0;
321 wndclass4
.cbWndExtra
= sizeof( DWORD
); // was 4
322 wndclass4
.hInstance
= wxhInstance
;
323 wndclass4
.hIcon
= NULL
; // wxSTD_MDICHILDFRAME_ICON;
324 wndclass4
.hCursor
= LoadCursor( NULL
, IDC_ARROW
);
325 // TODO: perhaps this should be NULL so that Windows doesn't
326 // paint the background itself (would OnEraseBackground duplicate
328 wndclass4
.hbrBackground
= (HBRUSH
)(COLOR_WINDOW
+1) ;
329 // wndclass4.hbrBackground = NULL;
330 wndclass4
.lpszMenuName
= NULL
;
331 wndclass4
.lpszClassName
= wxMDIChildFrameClassName
;
333 if (!RegisterClass( &wndclass4
))
335 // wxFatalError("Can't register MDI child frame window class");
339 ///////////////////////////////////////////////////////////////////////
340 // Register the panel window class.
341 WNDCLASS wndclass2
; // Structure used to register Windows class.
342 memset(&wndclass2
, 0, sizeof(WNDCLASS
)); // start with NULL defaults
343 // Use CS_OWNDC to avoid messing about restoring the context
344 // for every graphic operation.
345 wndclass2
.style
= CS_HREDRAW
| CS_VREDRAW
;
346 wndclass2
.lpfnWndProc
= (WNDPROC
)wxWndProc
;
347 wndclass2
.cbClsExtra
= 0;
348 wndclass2
.cbWndExtra
= sizeof( DWORD
); // was 4
349 wndclass2
.hInstance
= wxhInstance
;
350 wndclass2
.hIcon
= NULL
;
351 wndclass2
.hCursor
= NULL
;
352 // wndclass2.hbrBackground = (HBRUSH)(COLOR_BTNFACE+1) ;
353 wndclass2
.hbrBackground
= (HBRUSH
) GetStockObject( LTGRAY_BRUSH
);
354 wndclass2
.lpszMenuName
= NULL
;
355 wndclass2
.lpszClassName
= wxPanelClassName
;
356 if (!RegisterClass( &wndclass2
))
358 // wxFatalError("Can't register Panel Window class");
362 ///////////////////////////////////////////////////////////////////////
363 // Register the canvas and textsubwindow class name
364 WNDCLASS wndclass3
; // Structure used to register Windows class.
365 memset(&wndclass3
, 0, sizeof(WNDCLASS
)); // start with NULL defaults
366 // Use CS_OWNDC to avoid messing about restoring the context
367 // for every graphic operation.
368 // wndclass3.style = CS_HREDRAW | CS_VREDRAW | CS_OWNDC | CS_DBLCLKS ;
370 wndclass3
.style
= CS_HREDRAW
| CS_VREDRAW
| CS_DBLCLKS
;
371 wndclass3
.lpfnWndProc
= (WNDPROC
)wxWndProc
;
372 wndclass3
.cbClsExtra
= 0;
373 wndclass3
.cbWndExtra
= sizeof( DWORD
); // was 4
374 wndclass3
.hInstance
= wxhInstance
;
375 wndclass3
.hIcon
= NULL
;
376 wndclass3
.hCursor
= NULL
;
377 // wndclass3.hbrBackground = (HBRUSH)(COLOR_WINDOW+1) ;
378 wndclass3
.hbrBackground
= NULL
;
379 wndclass3
.lpszMenuName
= NULL
;
380 wndclass3
.lpszClassName
= wxCanvasClassName
;
381 if (!RegisterClass( &wndclass3
))
383 // wxFatalError("Can't register Canvas class");
390 //// Convert Windows to argc, argv style
392 void wxApp::ConvertToStandardCommandArgs(char* lpCmdLine
)
396 wxString
cmdLine(lpCmdLine
);
399 // Get application name
400 char name
[260]; // 260 is MAX_PATH value from windef.h
401 ::GetModuleFileName(wxhInstance
, name
, WXSIZEOF(name
));
403 // GNUWIN32 already fills in the first arg with the application name.
404 #if !defined(__GNUWIN32__)
409 strcpy(name
, wxFileNameFromPath(name
));
410 wxStripExtension(name
);
411 wxTheApp
->SetAppName(name
);
414 // Treat strings enclosed in double-quotes as single arguments
416 int len
= cmdLine
.Length();
420 while ((i
< len
) && isspace(cmdLine
.GetChar(i
)))
425 if (cmdLine
.GetChar(i
) == '"') // We found the start of a string
429 while ((i
< len
) && (cmdLine
.GetChar(i
) != '"'))
432 wxString
arg(cmdLine
.Mid(first
, (i
- first
)));
438 i
++; // Skip past 2nd quote
440 else // Unquoted argument
443 while ((i
< len
) && !isspace(cmdLine
.GetChar(i
)))
446 wxString
arg(cmdLine
.Mid(first
, (i
- first
)));
454 wxTheApp
->argv
= new char*[count
+ 1];
455 for (i
= 0; i
< count
; i
++)
457 wxString
arg(args
[i
]);
458 wxTheApp
->argv
[i
] = copystring((const char*)arg
);
460 wxTheApp
->argv
[count
] = NULL
; // argv[] is a NULL-terminated list
461 wxTheApp
->argc
= count
;
464 //// Cleans up any wxWindows internal structures left lying around
466 void wxApp::CleanUp()
469 wxModule::CleanUpModules();
471 #if wxUSE_WX_RESOURCES
472 wxCleanUpResourceSystem();
474 // wxDefaultResourceTable->ClearTable();
477 // Indicate that the cursor can be freed,
478 // so that cursor won't be deleted by deleting
479 // the bitmap list before g_globalCursor goes out
480 // of scope (double deletion of the cursor).
481 wxSetCursor(wxNullCursor
);
482 delete g_globalCursor
;
484 wxDeleteStockObjects() ;
486 // Destroy all GDI lists, etc.
487 wxDeleteStockLists();
489 delete wxTheColourDatabase
;
490 wxTheColourDatabase
= NULL
;
492 wxBitmap::CleanUpHandlers();
497 //// WINDOWS-SPECIFIC CLEANUP
499 wxSetKeyboardHook(FALSE
);
502 if (gs_hRichEdit
!= NULL
)
503 FreeLibrary(gs_hRichEdit
);
510 if (wxSTD_FRAME_ICON
)
511 DestroyIcon(wxSTD_FRAME_ICON
);
512 if (wxSTD_MDICHILDFRAME_ICON
)
513 DestroyIcon(wxSTD_MDICHILDFRAME_ICON
);
514 if (wxSTD_MDIPARENTFRAME_ICON
)
515 DestroyIcon(wxSTD_MDIPARENTFRAME_ICON
);
517 if (wxDEFAULT_FRAME_ICON
)
518 DestroyIcon(wxDEFAULT_FRAME_ICON
);
519 if (wxDEFAULT_MDICHILDFRAME_ICON
)
520 DestroyIcon(wxDEFAULT_MDICHILDFRAME_ICON
);
521 if (wxDEFAULT_MDIPARENTFRAME_ICON
)
522 DestroyIcon(wxDEFAULT_MDIPARENTFRAME_ICON
);
524 if ( wxDisableButtonBrush
)
525 ::DeleteObject( wxDisableButtonBrush
) ;
527 #if !defined(__GNUWIN32__) && !defined(__SC__)
532 Ctl3dUnregister(wxhInstance
);
536 delete wxWinHandleList
;
538 wxClassInfo::CleanUpClasses();
543 #if (defined(__WXDEBUG__) && wxUSE_MEMORY_TRACING) || wxUSE_DEBUG_CONTEXT
544 // At this point we want to check if there are any memory
545 // blocks that aren't part of the wxDebugContext itself,
546 // as a special case. Then when dumping we need to ignore
547 // wxDebugContext, too.
548 if (wxDebugContext::CountObjectsLeft() > 0)
550 wxLogDebug("There were memory leaks.");
551 wxDebugContext::Dump();
552 wxDebugContext::PrintStatistics();
554 // wxDebugContext::SetStream(NULL, NULL);
557 // do it as the very last thing because everything else can log messages
558 wxLog::DontCreateOnDemand();
559 delete wxLog::SetActiveTarget(NULL
);
562 #if !defined(_WINDLL) || (defined(_WINDLL) && defined(WXMAKINGDLL))
564 // temporarily disable this warning
566 #pragma warning(disable: 4715) // not all control paths return a value
569 //// Main wxWindows entry point
570 int wxEntry(WXHINSTANCE hInstance
,
571 WXHINSTANCE
WXUNUSED(hPrevInstance
),
576 // take everything into a try-except block in release build
577 // FIXME other compilers must support Win32 SEH (structured exception
578 // handling) too, just find the appropriate keyword in their docs!
579 // Please note that it's _not_ the same as C++ exceptions!
580 #if !defined(__WXDEBUG__) && defined(_MSC_VER)
581 #define CATCH_PROGRAM_EXCEPTIONS
585 #undef CATCH_PROGRAM_EXCEPTIONS
588 wxhInstance
= (HINSTANCE
) hInstance
;
590 if (!wxApp::Initialize())
593 // create the application object or ensure that one already exists
596 // The app may have declared a global application object, but we recommend
597 // the IMPLEMENT_APP macro is used instead, which sets an initializer
598 // function for delayed, dynamic app object construction.
599 wxCHECK_MSG( wxApp::GetInitializerFunction(), 0,
600 "No initializer - use IMPLEMENT_APP macro." );
602 wxTheApp
= (*wxApp::GetInitializerFunction()) ();
605 wxCHECK_MSG( wxTheApp
, 0, "You have to define an instance of wxApp!" );
607 // save the WinMain() parameters
608 wxTheApp
->ConvertToStandardCommandArgs(lpCmdLine
);
609 wxTheApp
->m_nCmdShow
= nCmdShow
;
611 // GUI-specific initialisation. In fact on Windows we don't have any,
612 // but this call is provided for compatibility across platforms.
613 wxTheApp
->OnInitGui() ;
617 if ( wxTheApp
->OnInit() )
621 retValue
= wxTheApp
->OnRun();
624 //else: app initialization failed, so we skipped OnRun()
626 wxWindow
*topWindow
= wxTheApp
->GetTopWindow();
629 // Forcibly delete the window.
630 if ( topWindow
->IsKindOf(CLASSINFO(wxFrame
)) ||
631 topWindow
->IsKindOf(CLASSINFO(wxDialog
)) )
633 topWindow
->Close(TRUE
);
634 wxTheApp
->DeletePendingObjects();
639 wxTheApp
->SetTopWindow(NULL
);
645 // flush the logged messages if any
646 wxLog
*pLog
= wxLog::GetActiveTarget();
647 if ( pLog
!= NULL
&& pLog
->HasPendingMessages() )
655 #ifdef CATCH_PROGRAM_EXCEPTIONS
657 __except ( EXCEPTION_EXECUTE_HANDLER
) {
660 wxTheApp->OnFatalException();
663 ::ExitProcess(3); // the same exit code as abort()
667 #endif // CATCH_PROGRAM_EXCEPTIONS
670 // restore warning state
672 #pragma warning(default: 4715) // not all control paths return a value
677 //// Entry point for DLLs
679 int wxEntry(WXHINSTANCE hInstance
)
681 wxhInstance
= (HINSTANCE
) hInstance
;
684 // The app may have declared a global application object, but we recommend
685 // the IMPLEMENT_APP macro is used instead, which sets an initializer function
686 // for delayed, dynamic app object construction.
690 if (!wxApp::GetInitializerFunction())
692 MessageBox(NULL
, "No initializer - use IMPLEMENT_APP macro.", "wxWindows Error", MB_APPLMODAL
| MB_ICONSTOP
| MB_OK
);
696 wxTheApp
= (* wxApp::GetInitializerFunction()) ();
700 MessageBox(NULL
, "You have to define an instance of wxApp!", "wxWindows Error", MB_APPLMODAL
| MB_ICONSTOP
| MB_OK
);
705 wxTheApp
->argv
= NULL
;
707 wxTheApp
->OnInitGui();
711 if (wxTheApp
->GetTopWindow() && wxTheApp
->GetTopWindow()->GetHWND()) {
712 wxTheApp
->GetTopWindow()->Show(TRUE
);
719 //// Static member initialization
721 wxAppInitializerFunction
wxApp::m_appInitFn
= (wxAppInitializerFunction
) NULL
;
728 m_wantDebugOutput
= TRUE
;
733 m_printMode
= wxPRINT_WINDOWS
;
735 m_printMode
= wxPRINT_POSTSCRIPT
;
737 m_exitOnFrameDelete
= TRUE
;
743 // Delete command-line args
745 for (i
= 0; i
< argc
; i
++)
752 bool wxApp::Initialized()
760 #ifdef _WINDLL // Assume initialized if DLL (no way of telling)
766 * Get and process a message, returning FALSE if WM_QUIT
767 * received (and also set the flag telling the app to exit the main loop)
770 bool wxApp::DoMessage()
772 BOOL rc
= ::GetMessage(&s_currentMsg
, (HWND
) NULL
, 0, 0);
782 // should never happen, but let's test for it nevertheless
783 wxLogLastError("GetMessage");
788 wxASSERT_MSG( wxThread::IsMain(),
789 "only the main thread can process Windows messages" );
791 static bool s_hadGuiLock
= TRUE
;
792 static wxMsgArray s_aSavedMessages
;
794 // if a secondary thread owns is doing GUI calls, save all messages for
795 // later processing - we can't process them right now because it will
796 // lead to recursive library calls (and we're not reentrant)
797 if ( !wxGuiOwnedByMainThread() )
799 s_hadGuiLock
= FALSE
;
801 s_aSavedMessages
.Add(s_currentMsg
);
807 // have we just regained the GUI lock? if so, post all of the saved
810 // FIXME of course, it's not _exactly_ the same as processing the
811 // messages normally - expect some things to break...
816 size_t count
= s_aSavedMessages
.Count();
817 for ( size_t n
= 0; n
< count
; n
++ )
819 MSG
& msg
= s_aSavedMessages
[n
];
821 if ( !ProcessMessage((WXMSG
*)&msg
) )
823 ::TranslateMessage(&msg
);
824 ::DispatchMessage(&msg
);
828 s_aSavedMessages
.Empty();
831 #endif // wxUSE_THREADS
833 // Process the message
834 if ( !ProcessMessage((WXMSG
*)&s_currentMsg
) )
836 ::TranslateMessage(&s_currentMsg
);
837 wxApp::sm_lastMessageTime
= s_currentMsg
.time
; /* MATTHEW: timeStamp impl. */
838 ::DispatchMessage(&s_currentMsg
);
846 * Keep trying to process messages until WM_QUIT
849 * If there are messages to be processed, they will all be
850 * processed and OnIdle will not be called.
851 * When there are no more messages, OnIdle is called.
852 * If OnIdle requests more time,
853 * it will be repeatedly called so long as there are no pending messages.
854 * A 'feature' of this is that once OnIdle has decided that no more processing
855 * is required, then it won't get processing time until further messages
856 * are processed (it'll sit in DoMessage).
859 int wxApp::MainLoop()
863 while ( m_keepGoing
)
866 wxMutexGuiLeaveOrEnter();
867 #endif // wxUSE_THREADS
869 while ( !::PeekMessage(&s_currentMsg
, 0, 0, 0, PM_NOREMOVE
) &&
877 return s_currentMsg
.wParam
;
880 // Returns TRUE if more time is needed.
881 bool wxApp::ProcessIdle()
884 event
.SetEventObject(this);
887 return event
.MoreRequested();
890 void wxApp::ExitMainLoop()
895 bool wxApp::Pending()
897 return (::PeekMessage(&s_currentMsg
, 0, 0, 0, PM_NOREMOVE
) != 0) ;
900 void wxApp::Dispatch()
906 * Give all windows a chance to preprocess
907 * the message. Some may have accelerator tables, or have
910 bool wxApp::ProcessMessage(WXMSG
*Msg
)
912 MSG
*msg
= (MSG
*)Msg
;
916 // Try translations first; find the youngest window with
917 // a translation table.
918 for (hWnd
= msg
->hwnd
; hWnd
!= NULL
; hWnd
= ::GetParent(hWnd
))
920 wxWindow
*wnd
= wxFindWinFromHandle((WXHWND
) hWnd
);
923 if (wnd
->MSWTranslateMessage(Msg
))
928 // Anyone for a non-translation message? Try youngest descendants first.
929 for (hWnd
= msg
->hwnd
; hWnd
!= NULL
; hWnd
= ::GetParent(hWnd
))
931 wxWindow
*wnd
= wxFindWinFromHandle((WXHWND
) hWnd
);
934 if (wnd
->MSWProcessMessage(Msg
))
941 void wxApp::OnIdle(wxIdleEvent
& event
)
943 static bool s_inOnIdle
= FALSE
;
945 // Avoid recursion (via ProcessEvent default case)
951 // 'Garbage' collection of windows deleted with Close().
952 DeletePendingObjects();
954 // flush the logged messages if any
955 wxLog
*pLog
= wxLog::GetActiveTarget();
956 if ( pLog
!= NULL
&& pLog
->HasPendingMessages() )
959 // Send OnIdle events to all windows
960 if ( SendIdleEvents() )
962 // SendIdleEvents() returns TRUE if at least one window requested more
964 event
.RequestMore(TRUE
);
970 // Send idle event to all top-level windows
971 bool wxApp::SendIdleEvents()
973 bool needMore
= FALSE
;
974 wxNode
* node
= wxTopLevelWindows
.First();
977 wxWindow
* win
= (wxWindow
*) node
->Data();
978 if (SendIdleEvents(win
))
987 // Send idle event to window and all subwindows
988 bool wxApp::SendIdleEvents(wxWindow
* win
)
990 bool needMore
= FALSE
;
993 event
.SetEventObject(win
);
994 win
->GetEventHandler()->ProcessEvent(event
);
996 if (event
.MoreRequested())
999 wxNode
* node
= win
->GetChildren().First();
1002 wxWindow
* win
= (wxWindow
*) node
->Data();
1003 if (SendIdleEvents(win
))
1006 node
= node
->Next();
1011 void wxApp::DeletePendingObjects()
1013 wxNode
*node
= wxPendingDelete
.First();
1016 wxObject
*obj
= (wxObject
*)node
->Data();
1020 if (wxPendingDelete
.Member(obj
))
1023 // Deleting one object may have deleted other pending
1024 // objects, so start from beginning of list again.
1025 node
= wxPendingDelete
.First();
1029 void wxApp::OnEndSession(wxCloseEvent
& event
)
1032 GetTopWindow()->Close(TRUE
);
1035 // Default behaviour: close the application with prompts. The
1036 // user can veto the close, and therefore the end session.
1037 void wxApp::OnQueryEndSession(wxCloseEvent
& event
)
1041 if (!GetTopWindow()->Close(!event
.CanVeto()))
1046 wxLog
* wxApp::CreateLogTarget()
1048 return new wxLogGui
;
1051 wxWindow
* wxApp::GetTopWindow() const
1055 else if (wxTopLevelWindows
.Number() > 0)
1056 return (wxWindow
*) wxTopLevelWindows
.First()->Data();
1061 int wxApp::GetComCtl32Version() const
1063 // have we loaded COMCTL32 yet?
1064 HMODULE theModule
= ::GetModuleHandle("COMCTL32");
1067 // if so, then we can check for the version
1070 // InitCommonControlsEx is unique to 4.7 and later
1071 FARPROC theProc
= ::GetProcAddress(theModule
, "InitCommonControlsEx");
1074 { // not found, must be 4.00
1079 // The following symbol are unique to 4.71
1081 // FlatSB_EnableScrollBar FlatSB_GetScrollInfo FlatSB_GetScrollPos
1082 // FlatSB_GetScrollProp FlatSB_GetScrollRange FlatSB_SetScrollInfo
1083 // FlatSB_SetScrollPos FlatSB_SetScrollProp FlatSB_SetScrollRange
1084 // FlatSB_ShowScrollBar
1085 // _DrawIndirectImageList _DuplicateImageList
1087 // UninitializeFlatSB
1088 // we could check for any of these - I chose DllInstall
1089 FARPROC theProc
= ::GetProcAddress(theModule
, "DllInstall");
1092 // not found, must be 4.70
1096 { // found, must be 4.71
1107 FatalAppExit(0, "Fatal error: exiting");
1110 // Yield to incoming messages
1114 // We want to go back to the main message loop
1115 // if we see a WM_QUIT. (?)
1116 while (PeekMessage(&msg
, NULL
, 0, 0, PM_NOREMOVE
) && msg
.message
!= WM_QUIT
)
1118 if ( !wxTheApp
->DoMessage() )
1125 HINSTANCE
wxGetInstance()
1130 // For some reason, with MSVC++ 1.5, WinMain isn't linked in properly
1131 // if in a separate file. So include it here to ensure it's linked.
1132 #if (defined(_MSC_VER) && !defined(__WIN32__)) || defined(__GNUWIN32__)