// Author: Vaclav Slavik
// based on GTK and MSW implementations
// Id: $Id$
-// Copyright: (c) 2001 SciTech Software, Inc. (www.scitechsoft.com)
+// Copyright: (c) 2001-2002 SciTech Software, Inc. (www.scitechsoft.com)
// Licence: wxWindows licence
/////////////////////////////////////////////////////////////////////////////
#include "wx/dialog.h"
#include "wx/log.h"
#include "wx/intl.h"
- #include "wx/resource.h"
#endif
#include "wx/app.h"
while (wxEventLoop::GetActive()->Pending())
wxEventLoop::GetActive()->Dispatch();
}
-
+
/* it's necessary to call ProcessIdle() to update the frames sizes which
might have been changed (it also will update other things set from
OnUpdateUI() which is a nice (and desired) side effect) */
wxMutexGuiEnter();
#endif
- while (wxTheApp->ProcessIdle()) {}
+ while (wxTheApp->ProcessIdle()) {}
#if wxUSE_THREADS
if (!wxThread::IsMain())
~wxRootWindow()
{
// we don't want to delete MGL_WM's rootWnd
- m_wnd = NULL;
+ m_wnd = NULL;
}
- virtual bool AcceptsFocus() { return FALSE; }
+ virtual bool AcceptsFocus() const { return FALSE; }
+
+ DECLARE_DYNAMIC_CLASS(wxRootWindow)
};
+IMPLEMENT_DYNAMIC_CLASS(wxRootWindow, wxWindow)
+
static wxRootWindow *gs_rootWindow = NULL;
//-----------------------------------------------------------------------------
{
int mode;
int refresh = MGL_DEFAULT_REFRESH;
-
+
#if wxUSE_SYSTEM_OPTIONS
if ( wxSystemOptions::HasOption(wxT("mgl.screen-refresh")) )
refresh = wxSystemOptions::GetOptionInt(wxT("mgl.screen-refresh"));
#endif
-
- mode = MGL_findMode(displayMode.GetWidth(),
- displayMode.GetHeight(),
+
+ mode = MGL_findMode(displayMode.GetWidth(),
+ displayMode.GetHeight(),
displayMode.GetDepth());
if ( mode == -1 )
{
- wxLogError(_("Mode %ix%i-%i not available."),
+ wxLogError(_("Mode %ix%i-%i not available."),
displayMode.GetWidth(),
displayMode.GetHeight(),
displayMode.GetDepth());
g_displayDC = NULL;
return FALSE;
}
-
+
g_winMng = MGL_wmCreate(g_displayDC->getDC());
if (!g_winMng)
return FALSE;
wxString mode;
unsigned w, h, bpp;
- if ( !wxGetEnv(wxT("WXMODE"), &mode) ||
+ if ( !wxGetEnv(wxT("WXMODE"), &mode) ||
(wxSscanf(mode.c_str(), _T("%ux%u-%u"), &w, &h, &bpp) != 3) )
{
w = 640, h = 480, bpp = 16;
#ifdef __WXDEBUG__
// MGL redirects stdout and stderr to physical console, so lets redirect
// it to file. Do it only when WXDEBUG environment variable is set
- if ( wxGetEnv(wxT("WXDEBUG"), NULL) )
- freopen("output.err", "wt", stderr);
+ wxString redirect;
+ if ( wxGetEnv(wxT("WXSTDERR"), &redirect) )
+ freopen(redirect.mb_str(), "wt", stderr);
#endif
wxLog *oldLog = wxLog::SetActiveTarget(new wxLogGui);
bool wxApp::Initialize()
{
if ( MGL_init(".", NULL) == 0 )
+ {
+ wxLogError(_("Cannot initialize SciTech MGL!"));
return FALSE;
-
- wxBuffer = new wxChar[BUFSIZ + 512];
+ }
wxClassInfo::InitializeClasses();
wxTheColourDatabase = new wxColourDatabase(wxKEY_STRING);
wxTheColourDatabase->Initialize();
-
+
// Can't do this in wxModule, because fonts are needed by stock lists
wxTheFontsManager = new wxFontsManager;
wxInitializeStockLists();
wxInitializeStockObjects();
-#if wxUSE_WX_RESOURCES
- wxInitializeResourceSystem();
-#endif
-
wxModule::RegisterModules();
if (!wxModule::InitializeModules()) return FALSE;
return TRUE;
}
-wxIcon wxApp::GetStdIcon(int which) const
-{
- return wxTheme::Get()->GetRenderer()->GetStdIcon(which);
-}
-
void wxApp::CleanUp()
{
#if wxUSE_LOG
wxModule::CleanUpModules();
-#if wxUSE_WX_RESOURCES
- wxCleanUpResourceSystem();
-#endif
-
if (wxTheColourDatabase)
delete wxTheColourDatabase;
delete wxTheFontsManager;
wxTheFontsManager = (wxFontsManager*) NULL;
- delete[] wxBuffer;
-
// check for memory leaks
#if (defined(__WXDEBUG__) && wxUSE_MEMORY_TRACING) || wxUSE_DEBUG_CONTEXT
if (wxDebugContext::CountObjectsLeft(TRUE) > 0)
int wxEntry(int argc, char *argv[])
{
+#ifdef __DJGPP__
+ // VS: disable long filenames under DJGPP as the very first thing,
+ // since SciTech MGL doesn't like them much...
+ wxSetEnv(wxT("LFN"), wxT("N"));
+#endif
+
#if (defined(__WXDEBUG__) && wxUSE_MEMORY_TRACING) || wxUSE_DEBUG_CONTEXT
// This seems to be necessary since there are 'rogue'
// objects present at this point (perhaps global objects?)