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"
38 #include "wx/msw/private.h"
40 #include "wx/module.h"
42 #if wxUSE_WX_RESOURCES
43 #include "wx/resource.h"
49 #if defined(__WIN95__) && !defined(__GNUWIN32__)
53 // use debug CRT functions for memory leak detections in VC++
54 /* This still doesn't work for me, Vadim.
55 #if defined(__WXDEBUG__) && defined(_MSC_VER)
56 // VC++ uses this macro as debug/release mode indicator
65 extern char *wxBuffer
;
66 extern char *wxOsVersion
;
67 extern wxList
*wxWinHandleList
;
68 extern wxList wxPendingDelete
;
69 extern void wxSetKeyboardHook(bool doIt
);
70 extern wxCursor
*g_globalCursor
;
72 HINSTANCE wxhInstance
= 0;
73 static MSG s_currentMsg
;
74 wxApp
*wxTheApp
= NULL
;
76 // @@ why not const? and not static?
77 char wxFrameClassName
[] = "wxFrameClass";
78 char wxMDIFrameClassName
[] = "wxMDIFrameClass";
79 char wxMDIChildFrameClassName
[] = "wxMDIChildFrameClass";
80 char wxPanelClassName
[] = "wxPanelClass";
81 char wxCanvasClassName
[] = "wxCanvasClass";
83 HICON wxSTD_FRAME_ICON
= NULL
;
84 HICON wxSTD_MDICHILDFRAME_ICON
= NULL
;
85 HICON wxSTD_MDIPARENTFRAME_ICON
= NULL
;
87 HICON wxDEFAULT_FRAME_ICON
= NULL
;
88 HICON wxDEFAULT_MDICHILDFRAME_ICON
= NULL
;
89 HICON wxDEFAULT_MDIPARENTFRAME_ICON
= NULL
;
91 HBRUSH wxDisableButtonBrush
= 0;
93 LRESULT APIENTRY
wxWndProc(HWND
, UINT
, WPARAM
, LPARAM
);
95 #if !USE_SHARED_LIBRARY
96 IMPLEMENT_DYNAMIC_CLASS(wxApp
, wxEvtHandler
)
98 BEGIN_EVENT_TABLE(wxApp
, wxEvtHandler
)
99 EVT_IDLE(wxApp::OnIdle
)
100 EVT_END_SESSION(wxApp::OnEndSession
)
101 EVT_QUERY_END_SESSION(wxApp::OnQueryEndSession
)
105 long wxApp::sm_lastMessageTime
= 0;
108 static HINSTANCE gs_hRichEdit
= NULL
;
113 bool wxApp::Initialize()
115 wxBuffer
= new char[1500];
118 #if defined(__WXDEBUG__) && defined(_MSC_VER)
119 // do check for memory leaks on program exit
120 // (another useful flag is _CRTDBG_DELAY_FREE_MEM_DF which doesn't free
121 // deallocated memory which may be used to simulate low-memory condition)
122 _CrtSetDbgFlag(_CrtSetDbgFlag(_CRTDBG_REPORT_FLAG) | _CRTDBG_LEAK_CHECK_DF);
123 #endif // debug build under MS VC++
126 #if (WXDEBUG && wxUSE_MEMORY_TRACING) || wxUSE_DEBUG_CONTEXT
128 streambuf
* sBuf
= NULL
;
130 streambuf
* sBuf
= new wxDebugStreamBuf
;
133 ostream
* oStr
= new ostream(sBuf
) ;
134 wxDebugContext::SetStream(oStr
, sBuf
);
135 #endif // wxUSE_MEMORY_TRACING
137 wxClassInfo::InitializeClasses();
140 wxGetResource("wxWindows", "OsVersion", &wxOsVersion
);
143 wxTheColourDatabase
= new wxColourDatabase(wxKEY_STRING
);
144 wxTheColourDatabase
->Initialize();
146 wxInitializeStockLists();
147 wxInitializeStockObjects();
149 #if wxUSE_WX_RESOURCES
150 wxInitializeResourceSystem();
153 wxBitmap::InitStandardHandlers();
155 #if defined(__WIN95__)
156 InitCommonControls();
157 gs_hRichEdit
= LoadLibrary("RICHED32.DLL");
159 if (gs_hRichEdit
== NULL
)
161 wxMessageBox("Could not initialise Rich Edit DLL");
165 #if defined(WX_DRAG_DROP)
166 // we need to initialize OLE library
167 if ( FAILED(::OleInitialize(NULL
)) )
168 wxFatalError(_("Cannot initialize OLE"));
172 if (!Ctl3dRegister(wxhInstance
))
173 wxFatalError("Cannot register CTL3D");
175 Ctl3dAutoSubclass(wxhInstance
);
178 g_globalCursor
= new wxCursor
;
180 wxSTD_FRAME_ICON
= LoadIcon(wxhInstance
, "wxSTD_FRAME");
181 wxSTD_MDIPARENTFRAME_ICON
= LoadIcon(wxhInstance
, "wxSTD_MDIPARENTFRAME");
182 wxSTD_MDICHILDFRAME_ICON
= LoadIcon(wxhInstance
, "wxSTD_MDICHILDFRAME");
184 wxDEFAULT_FRAME_ICON
= LoadIcon(wxhInstance
, "wxDEFAULT_FRAME");
185 wxDEFAULT_MDIPARENTFRAME_ICON
= LoadIcon(wxhInstance
, "wxDEFAULT_MDIPARENTFRAME");
186 wxDEFAULT_MDICHILDFRAME_ICON
= LoadIcon(wxhInstance
, "wxDEFAULT_MDICHILDFRAME");
188 RegisterWindowClasses();
190 // Create the brush for disabling bitmap buttons
193 lb
.lbStyle
= BS_PATTERN
;
194 lb
.lbHatch
= (int)LoadBitmap( wxhInstance
, "wxDISABLE_BUTTON_BITMAP" ) ;
195 wxDisableButtonBrush
= ::CreateBrushIndirect( & lb
) ;
196 ::DeleteObject( (HGDIOBJ
)lb
.lbHatch
) ;
202 wxWinHandleList
= new wxList(wxKEY_INTEGER
);
204 // This is to foil optimizations in Visual C++ that
205 // throw out dummy.obj.
206 #if (_MSC_VER >= 800) && !defined(WXMAKINGDLL)
207 extern char wxDummyChar
;
208 if (wxDummyChar
) wxDummyChar
++;
211 wxSetKeyboardHook(TRUE
);
213 wxModule::RegisterModules();
214 if (!wxModule::InitializeModules())
219 //// RegisterWindowClasses
221 bool wxApp::RegisterWindowClasses()
223 ///////////////////////////////////////////////////////////////////////
224 // Register the frame window class.
225 WNDCLASS wndclass
; // Structure used to register Windows class.
227 wndclass
.style
= CS_HREDRAW
| CS_VREDRAW
;
228 wndclass
.lpfnWndProc
= (WNDPROC
)wxWndProc
;
229 wndclass
.cbClsExtra
= 0;
230 wndclass
.cbWndExtra
= sizeof( DWORD
); // was 4
231 wndclass
.hInstance
= wxhInstance
;
232 wndclass
.hIcon
= NULL
; // wxSTD_FRAME_ICON;
233 wndclass
.hCursor
= LoadCursor( NULL
, IDC_ARROW
);
234 wndclass
.hbrBackground
= (HBRUSH
)(COLOR_APPWORKSPACE
+1) ;
235 // wndclass.hbrBackground = GetStockObject( WHITE_BRUSH );
236 wndclass
.lpszMenuName
= NULL
;
237 #ifdef _MULTIPLE_INSTANCES
238 sprintf( wxFrameClassName
,"wxFrameClass%d", wxhInstance
);
240 wndclass
.lpszClassName
= wxFrameClassName
;
242 if (!RegisterClass( &wndclass
))
244 // wxFatalError("Can't register Frame Window class");
247 ///////////////////////////////////////////////////////////////////////
248 // Register the MDI frame window class.
249 WNDCLASS wndclass1
; // Structure used to register Windows class.
251 wndclass1
.style
= CS_HREDRAW
| CS_VREDRAW
;
252 wndclass1
.lpfnWndProc
= (WNDPROC
)wxWndProc
;
253 wndclass1
.cbClsExtra
= 0;
254 wndclass1
.cbWndExtra
= sizeof( DWORD
); // was 4
255 wndclass1
.hInstance
= wxhInstance
;
256 wndclass1
.hIcon
= NULL
; // wxSTD_MDIPARENTFRAME_ICON;
257 wndclass1
.hCursor
= LoadCursor( NULL
, IDC_ARROW
);
258 // wndclass1.hbrBackground = (HBRUSH)(COLOR_APPWORKSPACE+1) ;
259 wndclass1
.hbrBackground
= NULL
;
260 wndclass1
.lpszMenuName
= NULL
;
262 wndclass1
.lpszClassName
= wxMDIFrameClassName
;
263 if (!RegisterClass( &wndclass1
))
265 // wxFatalError("Can't register MDI Frame window class");
269 ///////////////////////////////////////////////////////////////////////
270 // Register the MDI child frame window class.
271 WNDCLASS wndclass4
; // Structure used to register Windows class.
273 wndclass4
.style
= CS_HREDRAW
| CS_VREDRAW
;
274 wndclass4
.lpfnWndProc
= (WNDPROC
)wxWndProc
;
275 wndclass4
.cbClsExtra
= 0;
276 wndclass4
.cbWndExtra
= sizeof( DWORD
); // was 4
277 wndclass4
.hInstance
= wxhInstance
;
278 wndclass4
.hIcon
= NULL
; // wxSTD_MDICHILDFRAME_ICON;
279 wndclass4
.hCursor
= LoadCursor( NULL
, IDC_ARROW
);
280 // TODO: perhaps this should be NULL so that Windows doesn't
281 // paint the background itself (would OnEraseBackground duplicate
283 wndclass4
.hbrBackground
= (HBRUSH
)(COLOR_WINDOW
+1) ;
284 // wndclass4.hbrBackground = NULL;
285 wndclass4
.lpszMenuName
= NULL
;
286 wndclass4
.lpszClassName
= wxMDIChildFrameClassName
;
288 if (!RegisterClass( &wndclass4
))
290 // wxFatalError("Can't register MDI child frame window class");
294 ///////////////////////////////////////////////////////////////////////
295 // Register the panel window class.
296 WNDCLASS wndclass2
; // Structure used to register Windows class.
297 memset(&wndclass2
, 0, sizeof(WNDCLASS
)); // start with NULL defaults
298 // Use CS_OWNDC to avoid messing about restoring the context
299 // for every graphic operation.
300 wndclass2
.style
= CS_HREDRAW
| CS_VREDRAW
;
301 wndclass2
.lpfnWndProc
= (WNDPROC
)wxWndProc
;
302 wndclass2
.cbClsExtra
= 0;
303 wndclass2
.cbWndExtra
= sizeof( DWORD
); // was 4
304 wndclass2
.hInstance
= wxhInstance
;
305 wndclass2
.hIcon
= NULL
;
306 wndclass2
.hCursor
= NULL
;
307 // wndclass2.hbrBackground = (HBRUSH)(COLOR_BTNFACE+1) ;
308 wndclass2
.hbrBackground
= (HBRUSH
) GetStockObject( LTGRAY_BRUSH
);
309 wndclass2
.lpszMenuName
= NULL
;
310 wndclass2
.lpszClassName
= wxPanelClassName
;
311 if (!RegisterClass( &wndclass2
))
313 // wxFatalError("Can't register Panel Window class");
317 ///////////////////////////////////////////////////////////////////////
318 // Register the canvas and textsubwindow class name
319 WNDCLASS wndclass3
; // Structure used to register Windows class.
320 memset(&wndclass3
, 0, sizeof(WNDCLASS
)); // start with NULL defaults
321 // Use CS_OWNDC to avoid messing about restoring the context
322 // for every graphic operation.
323 // wndclass3.style = CS_HREDRAW | CS_VREDRAW | CS_OWNDC | CS_DBLCLKS ;
325 wndclass3
.style
= CS_HREDRAW
| CS_VREDRAW
| CS_DBLCLKS
;
326 wndclass3
.lpfnWndProc
= (WNDPROC
)wxWndProc
;
327 wndclass3
.cbClsExtra
= 0;
328 wndclass3
.cbWndExtra
= sizeof( DWORD
); // was 4
329 wndclass3
.hInstance
= wxhInstance
;
330 wndclass3
.hIcon
= NULL
;
331 wndclass3
.hCursor
= NULL
;
332 // wndclass3.hbrBackground = (HBRUSH)(COLOR_WINDOW+1) ;
333 wndclass3
.hbrBackground
= NULL
;
334 wndclass3
.lpszMenuName
= NULL
;
335 wndclass3
.lpszClassName
= wxCanvasClassName
;
336 if (!RegisterClass( &wndclass3
))
338 // wxFatalError("Can't register Canvas class");
345 //// Convert Windows to argc, argv style
347 // FIXME this code should be rewritten (use wxArrayString instead...)
348 void wxApp::ConvertToStandardCommandArgs(char* lpCmdLine
)
350 // Split command line into tokens, as in usual main(argc, argv)
352 char *buf
= new char[strlen(lpCmdLine
) + 1];
355 /* Model independent strcpy */
357 for (i
= 0; i
<strlen(lpCmdLine
); i
++)
360 if (isspace(lpCmdLine
[i
]))
364 char **command
= new char*[para
+2];
366 // Get application name
367 char name
[260]; // 260 is MAX_PATH value from windef.h
368 ::GetModuleFileName(wxhInstance
, name
, WXSIZEOF(name
));
370 // Is it only 16-bit Borland that already copies the program name
371 // to the first argv index?
372 #if !defined(__GNUWIN32__)
373 // #if ! (defined(__BORLANDC__) && !defined(__WIN32__))
374 command
[count
++] = copystring(name
);
378 strcpy(name
, wxFileNameFromPath(name
));
379 wxStripExtension(name
);
380 wxTheApp
->SetAppName(name
);
382 /* Break up string */
383 // Treat strings enclosed in double-quotes as single arguments
388 if ( count == WXSIZEOF(command) )
390 wxFAIL_MSG("too many command line args.");
394 while ( *str
&& isspace(*str
) ) // skip whitespace
400 command
[count
++] = str
;
401 while (*str
&& *str
!= '"')
406 command
[count
++] = str
;
407 while (*str
&& !isspace(*str
))
414 wxTheApp
->argv
= new char*[count
+ 1];
415 wxTheApp
->argv
[count
] = NULL
; /* argv[] is NULL terminated list! */
416 wxTheApp
->argc
= count
;
418 for (i
= 0; i
< count
; i
++)
419 wxTheApp
->argv
[i
] = copystring(command
[i
]);
421 #if !defined(__GNUWIN32__)
422 // use copystring than delete this pointer
423 delete [] command
[0];
430 //// Cleans up any wxWindows internal structures left lying around
432 void wxApp::CleanUp()
435 wxModule::CleanUpModules();
437 #if wxUSE_WX_RESOURCES
438 wxCleanUpResourceSystem();
440 // wxDefaultResourceTable->ClearTable();
443 // Indicate that the cursor can be freed,
444 // so that cursor won't be deleted by deleting
445 // the bitmap list before g_globalCursor goes out
446 // of scope (double deletion of the cursor).
447 wxSetCursor(wxNullCursor
);
448 delete g_globalCursor
;
450 wxDeleteStockObjects() ;
452 // Destroy all GDI lists, etc.
453 wxDeleteStockLists();
455 delete wxTheColourDatabase
;
456 wxTheColourDatabase
= NULL
;
458 wxBitmap::CleanUpHandlers();
463 //// WINDOWS-SPECIFIC CLEANUP
465 wxSetKeyboardHook(FALSE
);
468 if (gs_hRichEdit
!= NULL
)
469 FreeLibrary(gs_hRichEdit
);
476 if (wxSTD_FRAME_ICON
)
477 DestroyIcon(wxSTD_FRAME_ICON
);
478 if (wxSTD_MDICHILDFRAME_ICON
)
479 DestroyIcon(wxSTD_MDICHILDFRAME_ICON
);
480 if (wxSTD_MDIPARENTFRAME_ICON
)
481 DestroyIcon(wxSTD_MDIPARENTFRAME_ICON
);
483 if (wxDEFAULT_FRAME_ICON
)
484 DestroyIcon(wxDEFAULT_FRAME_ICON
);
485 if (wxDEFAULT_MDICHILDFRAME_ICON
)
486 DestroyIcon(wxDEFAULT_MDICHILDFRAME_ICON
);
487 if (wxDEFAULT_MDIPARENTFRAME_ICON
)
488 DestroyIcon(wxDEFAULT_MDIPARENTFRAME_ICON
);
490 if ( wxDisableButtonBrush
)
491 ::DeleteObject( wxDisableButtonBrush
) ;
493 #if defined(WX_DRAG_DROP)
498 Ctl3dUnregister(wxhInstance
);
502 delete wxWinHandleList
;
504 wxClassInfo::CleanUpClasses();
506 // do it as the very last thing because everything else can log messages
507 wxLog::DontCreateOnDemand();
508 delete wxLog::SetActiveTarget(NULL
);
511 #if !defined(_WINDLL) || (defined(_WINDLL) && defined(WXMAKINGDLL))
513 //// Main wxWindows entry point
514 int wxEntry(WXHINSTANCE hInstance
,
515 WXHINSTANCE
WXUNUSED(hPrevInstance
),
520 #ifndef __WXDEBUG__ // take everything into a try-except block in release build
524 wxhInstance
= (HINSTANCE
) hInstance
;
526 if (!wxApp::Initialize())
529 // create the application object or ensure that one already exists
532 // The app may have declared a global application object, but we recommend
533 // the IMPLEMENT_APP macro is used instead, which sets an initializer
534 // function for delayed, dynamic app object construction.
535 wxCHECK_MSG( wxApp::GetInitializerFunction(), 0,
536 "No initializer - use IMPLEMENT_APP macro." );
538 wxTheApp
= (*wxApp::GetInitializerFunction()) ();
541 wxCHECK_MSG( wxTheApp
, 0, "You have to define an instance of wxApp!" );
543 // save the WinMain() parameters
544 wxTheApp
->ConvertToStandardCommandArgs(lpCmdLine
);
545 wxTheApp
->m_nCmdShow
= nCmdShow
;
547 // GUI-specific initialisation. In fact on Windows we don't have any,
548 // but this call is provided for compatibility across platforms.
549 wxTheApp
->OnInitGui() ;
553 if ( wxTheApp
->OnInit() )
557 retValue
= wxTheApp
->OnRun();
560 //else: app initialization failed, so we skipped OnRun()
562 wxWindow
*topWindow
= wxTheApp
->GetTopWindow();
565 // Forcibly delete the window.
566 if ( topWindow
->IsKindOf(CLASSINFO(wxFrame
)) ||
567 topWindow
->IsKindOf(CLASSINFO(wxDialog
)) )
569 topWindow
->Close(TRUE
);
570 wxTheApp
->DeletePendingObjects();
575 wxTheApp
->SetTopWindow(NULL
);
585 #if (WXDEBUG && wxUSE_MEMORY_TRACING) || wxUSE_DEBUG_CONTEXT
586 // At this point we want to check if there are any memory
587 // blocks that aren't part of the wxDebugContext itself,
588 // as a special case. Then when dumping we need to ignore
589 // wxDebugContext, too.
590 if (wxDebugContext::CountObjectsLeft() > 0)
592 wxTrace("There were memory leaks.\n");
593 wxDebugContext::Dump();
594 wxDebugContext::PrintStatistics();
596 wxDebugContext::SetStream(NULL
, NULL
);
600 #ifndef __WXDEBUG__ // catch exceptions only in release build
602 except ( EXCEPTION_EXECUTE_HANDLER
) {
605 wxTheApp->OnFatalException();
608 ::ExitProcess(3); // the same exit code as abort()
615 //// Entry point for DLLs
617 int wxEntry(WXHINSTANCE hInstance
)
619 wxhInstance
= (HINSTANCE
) hInstance
;
622 // The app may have declared a global application object, but we recommend
623 // the IMPLEMENT_APP macro is used instead, which sets an initializer function
624 // for delayed, dynamic app object construction.
628 if (!wxApp::GetInitializerFunction())
630 MessageBox(NULL
, "No initializer - use IMPLEMENT_APP macro.", "wxWindows Error", MB_APPLMODAL
| MB_ICONSTOP
| MB_OK
);
634 wxTheApp
= (* wxApp::GetInitializerFunction()) ();
638 MessageBox(NULL
, "You have to define an instance of wxApp!", "wxWindows Error", MB_APPLMODAL
| MB_ICONSTOP
| MB_OK
);
643 wxTheApp
->argv
= NULL
;
645 wxTheApp
->OnInitGui();
649 if (wxTheApp
->GetTopWindow() && wxTheApp
->GetTopWindow()->GetHWND()) {
650 wxTheApp
->GetTopWindow()->Show(TRUE
);
657 //// Static member initialization
659 wxAppInitializerFunction
wxApp::m_appInitFn
= (wxAppInitializerFunction
) NULL
;
666 m_wantDebugOutput
= TRUE
;
671 m_printMode
= wxPRINT_WINDOWS
;
673 m_printMode
= wxPRINT_POSTSCRIPT
;
675 m_exitOnFrameDelete
= TRUE
;
681 // Delete command-line args
683 for (i
= 0; i
< argc
; i
++)
690 bool wxApp::Initialized()
698 #ifdef _WINDLL // Assume initialized if DLL (no way of telling)
704 * Get and process a message, returning FALSE if WM_QUIT
708 bool wxApp::DoMessage()
710 if (!::GetMessage(&s_currentMsg
, (HWND
) NULL
, 0, 0))
715 // Process the message
716 if (!ProcessMessage((WXMSG
*)&s_currentMsg
))
718 ::TranslateMessage(&s_currentMsg
);
719 wxApp::sm_lastMessageTime
= s_currentMsg
.time
; /* MATTHEW: timeStamp impl. */
720 ::DispatchMessage(&s_currentMsg
);
726 * Keep trying to process messages until WM_QUIT
729 * If there are messages to be processed, they will all be
730 * processed and OnIdle will not be called.
731 * When there are no more messages, OnIdle is called.
732 * If OnIdle requests more time,
733 * it will be repeatedly called so long as there are no pending messages.
734 * A 'feature' of this is that once OnIdle has decided that no more processing
735 * is required, then it won't get processing time until further messages
736 * are processed (it'll sit in DoMessage).
739 int wxApp::MainLoop()
744 while (!::PeekMessage(&s_currentMsg
, 0, 0, 0, PM_NOREMOVE
) &&
750 return s_currentMsg
.wParam
;
753 // Returns TRUE if more time is needed.
754 bool wxApp::ProcessIdle()
757 event
.SetEventObject(this);
760 return event
.MoreRequested();
763 void wxApp::ExitMainLoop()
768 bool wxApp::Pending()
770 return (::PeekMessage(&s_currentMsg
, 0, 0, 0, PM_NOREMOVE
) != 0) ;
773 void wxApp::Dispatch()
780 * Give all windows a chance to preprocess
781 * the message. Some may have accelerator tables, or have
784 bool wxApp::ProcessMessage(WXMSG
*Msg
)
786 MSG
*msg
= (MSG
*)Msg
;
790 // Try translations first; find the youngest window with
791 // a translation table.
792 for (hWnd
= msg
->hwnd
; hWnd
!= NULL
; hWnd
= ::GetParent(hWnd
))
794 wxWindow
*wnd
= wxFindWinFromHandle((WXHWND
) hWnd
);
797 if (wnd
->MSWTranslateMessage(Msg
))
802 // Anyone for a non-translation message? Try youngest descendants first.
803 for (hWnd
= msg
->hwnd
; hWnd
!= NULL
; hWnd
= ::GetParent(hWnd
))
805 wxWindow
*wnd
= wxFindWinFromHandle((WXHWND
) hWnd
);
808 if (wnd
->MSWProcessMessage(Msg
))
815 void wxApp::OnIdle(wxIdleEvent
& event
)
817 static bool inOnIdle
= FALSE
;
819 // Avoid recursion (via ProcessEvent default case)
825 // 'Garbage' collection of windows deleted with Close().
826 DeletePendingObjects();
828 // flush the logged messages if any
829 wxLog
*pLog
= wxLog::GetActiveTarget();
830 if ( pLog
!= NULL
&& pLog
->HasPendingMessages() )
833 // Send OnIdle events to all windows
834 bool needMore
= SendIdleEvents();
835 // bool needMore = FALSE;
838 event
.RequestMore(TRUE
);
843 // Send idle event to all top-level windows
844 bool wxApp::SendIdleEvents()
846 bool needMore
= FALSE
;
847 wxNode
* node
= wxTopLevelWindows
.First();
850 wxWindow
* win
= (wxWindow
*) node
->Data();
851 if (SendIdleEvents(win
))
859 // Send idle event to window and all subwindows
860 bool wxApp::SendIdleEvents(wxWindow
* win
)
862 bool needMore
= FALSE
;
865 event
.SetEventObject(win
);
866 win
->ProcessEvent(event
);
868 if (event
.MoreRequested())
871 wxNode
* node
= win
->GetChildren()->First();
874 wxWindow
* win
= (wxWindow
*) node
->Data();
875 if (SendIdleEvents(win
))
883 void wxApp::DeletePendingObjects()
885 wxNode
*node
= wxPendingDelete
.First();
888 wxObject
*obj
= (wxObject
*)node
->Data();
892 if (wxPendingDelete
.Member(obj
))
895 // Deleting one object may have deleted other pending
896 // objects, so start from beginning of list again.
897 node
= wxPendingDelete
.First();
901 void wxApp::OnEndSession(wxCloseEvent
& event
)
904 GetTopWindow()->Close(TRUE
);
907 // Default behaviour: close the application with prompts. The
908 // user can veto the close, and therefore the end session.
909 void wxApp::OnQueryEndSession(wxCloseEvent
& event
)
913 if (!GetTopWindow()->Close(!event
.CanVeto()))
918 wxLog
* wxApp::CreateLogTarget()
923 wxWindow
* wxApp::GetTopWindow() const
927 else if (wxTopLevelWindows
.Number() > 0)
928 return (wxWindow
*) wxTopLevelWindows
.First()->Data();
933 int wxApp::GetComCtl32Version() const
935 // have we loaded COMCTL32 yet?
936 HMODULE theModule
= ::GetModuleHandle("COMCTL32");
939 // if so, then we can check for the version
942 // InitCommonControlsEx is unique to 4.7 and later
943 FARPROC theProc
= ::GetProcAddress(theModule
, "InitCommonControlsEx");
946 { // not found, must be 4.00
951 // The following symbol are unique to 4.71
953 // FlatSB_EnableScrollBar FlatSB_GetScrollInfo FlatSB_GetScrollPos
954 // FlatSB_GetScrollProp FlatSB_GetScrollRange FlatSB_SetScrollInfo
955 // FlatSB_SetScrollPos FlatSB_SetScrollProp FlatSB_SetScrollRange
956 // FlatSB_ShowScrollBar
957 // _DrawIndirectImageList _DuplicateImageList
959 // UninitializeFlatSB
960 // we could check for any of these - I chose DllInstall
961 FARPROC theProc
= ::GetProcAddress(theModule
, "DllInstall");
964 // not found, must be 4.70
968 { // found, must be 4.71
979 FatalAppExit(0, "Fatal error: exiting");
982 // Yield to incoming messages
986 // We want to go back to the main message loop
987 // if we see a WM_QUIT. (?)
988 while (PeekMessage(&msg
, NULL
, 0, 0, PM_NOREMOVE
) && msg
.message
!= WM_QUIT
)
990 if (!wxTheApp
->DoMessage())
997 HINSTANCE
wxGetInstance()
1002 // For some reason, with MSVC++ 1.5, WinMain isn't linked in properly
1003 // if in a separate file. So include it here to ensure it's linked.
1004 #if (defined(_MSC_VER) && !defined(__WIN32__)) || defined(__GNUWIN32__)