]> git.saurik.com Git - wxWidgets.git/blobdiff - demos/dbbrowse/dbbrowse.cpp
use WS_CLIPSIBLINGS for wxStaticLine as well
[wxWidgets.git] / demos / dbbrowse / dbbrowse.cpp
index a903ac029fd78a57aaa9cddec85848add7bcb280..c581096558edad97474f01874f4842f7586401b3 100644 (file)
-//------------------------------------------------------------------------------
+//----------------------------------------------------------------------------------------
 // Name:        dbbrowse.cpp
 // Purpose:     Through ODBC - Databases Browsen
 // Name:        dbbrowse.cpp
 // Purpose:     Through ODBC - Databases Browsen
-// Author:      Mark Johnson, mj10777@gmx.net
+// Author:      Mark Johnson
 // Modified by:
 // BJO        : Bart A.M. JOURQUIN
 // Created:     19991127
 // Copyright:   (c) Mark Johnson
 // Licence:     wxWindows license
 // Modified by:
 // BJO        : Bart A.M. JOURQUIN
 // Created:     19991127
 // Copyright:   (c) Mark Johnson
 // Licence:     wxWindows license
-//------------------------------------------------------------------------------
-//-- all #ifdefs that the whole Project needs. ------------------------------
-//---------------------------------------------------------------------------
+// RCS-ID:      $Id$
+//----------------------------------------------------------------------------------------
+//-- all #ifdefs that the whole Project needs. -------------------------------------------
+//----------------------------------------------------------------------------------------
 #ifdef __GNUG__
 #ifdef __GNUG__
- #pragma implementation
- #pragma interface
+#pragma implementation
+#pragma interface
 #endif
 #endif
-//---------------------------------------------------------------------------
+//----------------------------------------------------------------------------------------
 // For compilers that support precompilation, includes "wx/wx.h".
 #include "wx/wxprec.h"
 // For compilers that support precompilation, includes "wx/wx.h".
 #include "wx/wxprec.h"
-//---------------------------------------------------------------------------
+//----------------------------------------------------------------------------------------
 #ifdef __BORLANDC__
 #ifdef __BORLANDC__
- #pragma hdrstop
+#pragma hdrstop
 #endif
 #endif
-//---------------------------------------------------------------------------
+//----------------------------------------------------------------------------------------
 #ifndef WX_PRECOMP
 #ifndef WX_PRECOMP
- #include "wx/wx.h"
+#include "wx/wx.h"
 #endif
 #endif
-//---------------------------------------------------------------------------
+//----------------------------------------------------------------------------------------
 #ifndef __WXMSW__
 #ifndef __WXMSW__
+#include "bitmaps/logo.xpm"
 #endif
 #endif
- #include "bitmaps/logo.xpm"
-//---------------------------------------------------------------------------
-//-- all #includes that every .cpp needs             --- 19990807.mj10777 ---
-//---------------------------------------------------------------------------
+//----------------------------------------------------------------------------------------
+//-- all #includes that every .cpp needs             --- 19990807.mj10777 ----------------
+//----------------------------------------------------------------------------------------
 #include "std.h"    // sorgsam Pflegen !
 #include "std.h"    // sorgsam Pflegen !
-#include <iostream>
-//---------------------------------------------------------------------------
-//-- Some Global Vars for this file ----------------------------------------
-//---------------------------------------------------------------------------
-//---------------------------------------------------------------------------
-MainFrame *frame = NULL;      // The one and only MainFrame
-// wxLogNull logNo;              // No Log messages
-//---------------------------------------------------------------------------
-// verify that the item is ok and insult the user if it is not
-#define CHECK_ITEM(item)                                                \
- if (!item.IsOk())                                                      \
- {                                                                      \
-  wxMessageBox(_("Please select some item first!"),_("Tree sample error"),      \
-                 wxOK | wxICON_EXCLAMATION,this);                       \
-  return;                                                               \
- }                                                                      \
-//---------------------------------------------------------------------------
+// #include <iostream>
+//----------------------------------------------------------------------------------------
+//-- Some Global Vars for this file ------------------------------------------------------
+//----------------------------------------------------------------------------------------
 BEGIN_EVENT_TABLE(MainFrame, wxFrame)
 BEGIN_EVENT_TABLE(MainFrame, wxFrame)
- EVT_MENU(QUIT, MainFrame::OnQuit)
- EVT_MENU(ABOUT, MainFrame::OnAbout)
- EVT_MENU(HELP, MainFrame::OnHelp)
- EVT_SIZE(MainFrame::OnSize)
+    EVT_MENU(QUIT, MainFrame::OnQuit)                  // Program End
+    EVT_MENU(ABOUT, MainFrame::OnAbout)                // Program Discription
+    EVT_MENU(HELP, MainFrame::OnHelp)                  // Program Help
 END_EVENT_TABLE()
 END_EVENT_TABLE()
-//---------------------------------------------------------------------------
-IMPLEMENT_APP(MyApp)
-//---------------------------------------------------------------------------
-// `Main program' equivalent, creating windows and returning main app frame
-//---------------------------------------------------------------------------
-bool MyApp::OnInit(void)
+
+//----------------------------------------------------------------------------------------
+IMPLEMENT_APP(MainApp)      // This declares wxApp::MainApp as "the" Application
+
+//----------------------------------------------------------------------------------------
+// 'Main program' equivalent, creating windows and returning main app frame
+//----------------------------------------------------------------------------------------
+bool MainApp::OnInit(void)  // Does everything needed for a program start
 {
 {
- //---------------------------------------------------------------------------------------
- // set the language to use
- const char *langhelp = NULL;
- const char *language = NULL;
- const char *langid   = NULL;
- //---------------------------------------------------------------------------------------
+    wxString Temp0;            // Use as needed
+    //---------------------------------------------------------------------------------------
+    // set the language to use   // Help.??  (.std = english, .de = german etc.)
+    const char *language = NULL; // czech, german, french, polish
+    const char *langid   = NULL; // std = english , cz, de = german, fr = french, pl = polish
+    wxString   s_LangHelp;       // Directory/Filename.hhp of the Help-Project file
+    wxString   s_LangId, s_Language;
+    s_Language.Empty(); s_LangId.Empty(); s_LangHelp.Empty();
+    //---------------------------------------------------------------------------------------
+    //-- Graphic File suport - use only when needed, otherwise big .exe's
+    //---------------------------------------------------------------------------------------
 #if wxUSE_LIBPNG
 #if wxUSE_LIBPNG
- wxImage::AddHandler( new wxPNGHandler );   // use only when needed, otherwise big .exe's
+    wxImage::AddHandler( new wxPNGHandler );   // needed for help System
 #endif
 /*
 #endif
 /*
-#if wxUSE_LIBJPEG
- wxImage::AddHandler(new wxJPEGHandler );   // use only when needed, otherwise big .exe's
-#endif
- wxImage::AddHandler( new wxGIFHandler );   // use only when needed, otherwise big .exe's
- wxImage::AddHandler( new wxPCXHandler );   // use only when needed, otherwise big .exe's
- wxImage::AddHandler( new wxPNMHandler );   // use only when needed, otherwise big .exe's
+    #if wxUSE_LIBJPEG
   wxImage::AddHandler(new wxJPEGHandler );   // use only when needed, otherwise big .exe's
+    #endif
   wxImage::AddHandler( new wxGIFHandler );   // use only when needed, otherwise big .exe's
   wxImage::AddHandler( new wxPCXHandler );   // use only when needed, otherwise big .exe's
   wxImage::AddHandler( new wxPNMHandler );   // use only when needed, otherwise big .exe's
 */
 #ifdef __WXMSW__
 */
 #ifdef __WXMSW__
- // wxBitmap::AddHandler( new wxXPMFileHandler );   // use only when needed, otherwise big .exe's
- // wxBitmap::AddHandler( new wxXPMDataHandler );   // use only when needed, otherwise big .exe's
+    // wxBitmap::AddHandler( new wxXPMFileHandler );   // Attempt to use XPS instead of ico
+    // wxBitmap::AddHandler( new wxXPMDataHandler );   // - Attempt failed
 #endif
 #endif
- //---------------------------------------------------------------------------------------
- langid = "std"; // BJO20000125 instead of ""
- switch ( argc )
- {
-  default:
-      // ignore the other args, fall through
-  case 3:
-      language = argv[2];
-      langid   = argv[1];
-      break;
-  case 2:
-      langid = argv[1];
-      break;
-  case 1:
-      break;
- };
- //---------------------------------------------------------------------------------------
- // we're using wxConfig's "create-on-demand" feature: it will create the
- // config object when it's used for the first time. It has a number of
- // advantages compared with explicitly creating our wxConfig:
- //  1) we don't pay for it if we don't use it
- //  2) there is no danger to create it twice
-
- // application and vendor name are used by wxConfig to construct the name
- // of the config file/registry key and must be set before the first call
- // to Get() if you want to override the default values (the application
- // name is the name of the executable and the vendor name is the same)
- //---------------------------------------------------------------------------------------
- SetVendorName("mj10777");
- SetAppName("DBBrowser"); // not needed, it's the default value
- p_ProgramCfg = wxConfigBase::Get();
- // p_ProgramCfg->DeleteAll();
- p_ProgramCfg->SetPath("/");
- wxString Temp0, Temp1;
- Temp0.Empty();
-
- //---------------------------------------------------------------------------------------
- //-- Set the Language and remember it for the next time. --------------------------------
- //---------------------------------------------------------------------------------------
- langhelp = "help.std/dbbrowse.hhp";
- if (langid == "std")
- {
-  p_ProgramCfg->Read("/Local/langid",&Temp0); // >const char *langid< can't be used here
-  if (Temp0 == "")
-   langid = "std";
-  else
-   langid = Temp0;
- }
- Temp0 = langid;
- p_ProgramCfg->Write("/Local/langid",Temp0); // >const char *langid< can't be used here
- //---------------------------------------------------------------------------------------
- // Support the following languages
- if (Temp0 != "std")
- {
-  if (Temp0 == "cz")
-  {
-   language = "czech";  // csy or czech
-   langhelp = "help.cz/dbbrowse.hhp";
-  }
-  if ((Temp0 == "de") || (Temp0 == "a"))
-  {
-   language = "german";  // deu or german
-   langhelp = "help.de/dbbrowse.hhp";
-  }
-  if (Temp0 == "fr")
-  {
-   language = "french";  // fra or french
-   langhelp = "help.fr/dbbrowse.hhp";
-  }
-  if (Temp0 == "pl")
-  {
-   language = "polish";  // plk or polish
-   langhelp = "help.pl/dbbrowse.hhp";
-  }
-  if (!m_locale.Init(language, langid, language))      // setlocale(LC_ALL,""); does not work
-   wxMessageBox("SetLocale error");
-  m_locale.AddCatalog("PgmText");
-  m_locale.AddCatalog("Help");
-  Temp0 = language;
-  p_ProgramCfg->Write("/Local/language",Temp0);
- }
- else
- {
-  Temp0 = "english";
-  p_ProgramCfg->Write("/Local/language",Temp0);
-  Temp0 = "std";    // allways english if not german or french (at the moment austrian)
- }
-
- Temp0 = "NONE";
- p_ProgramCfg->Write("/NONE",Temp0);
- p_ProgramCfg->Write("/Paths/NONE",Temp0);
- p_ProgramCfg->Write("/MainFrame/NONE",Temp0);
- //-----------------------------------------------------------------------------
- p_ProgramCfg->Write("/Paths/Work",wxGetCwd());
- p_ProgramCfg->SetPath("/");
- //-----------------------------------------------------------------------------
- // or you could also write something like this:
- //  wxFileConfig *p_ProgramCfg = new wxFileConfig("conftest");
- //  wxConfigBase::Set(p_ProgramCfg);
- // where you can also specify the file names explicitly if you wish.
- // Of course, calling Set() is optional and you only must do it if
- // you want to later retrieve this pointer with Get().
- //----------------------------------------------------------------------------
- // SetPath() understands ".."
- // restore frame position and size
- int x = p_ProgramCfg->Read("/MainFrame/x", 1), y = p_ProgramCfg->Read("/MainFrame/y", 1),
-     w = p_ProgramCfg->Read("/MainFrame/w", 600), h = p_ProgramCfg->Read("/MainFrame/h", 450);
- //---------------------------------------------------------------------------------------
- // Create the main frame window
- frame = new MainFrame((wxFrame *) NULL, (char *) _("DBBrowser - mj10777"),x,y,w,h);
- //---------------------------------------------------------------------------------------
- // This reduces flicker effects - even better would be to define OnEraseBackground
- // to do Temp0. When the list control's scrollbars are show or hidden, the
- // frame is sent a background erase event.
- //---------------------------------------------------------------------------------------
- frame->SetBackgroundColour( *wxWHITE );
- // frame->SetBackgroundColour(wxColour(255, 255, 255));
-
- //---------------------------------------------------------------------------------------
- // Make a menubar
- wxMenu *file_menu = new wxMenu;
- wxMenu *help_menu = new wxMenu;
-
- help_menu->Append(HELP, _("&Help"));
- help_menu->AppendSeparator();
- help_menu->Append(ABOUT, _("&About"));
- file_menu->Append(QUIT, _("E&xit"));
-
- wxMenuBar *menu_bar = new wxMenuBar;
- menu_bar->Append(file_menu, _("&File"));
- menu_bar->Append(help_menu, _("&Help"));
- frame->SetMenuBar(menu_bar);
- frame->CreateStatusBar(1);
- Temp0.Printf(_("%s has started !"),p_ProgramCfg->GetAppName().c_str());
- frame->SetStatusText(Temp0, 0);
- //---------------------------------------------------------------------------------------
- int width, height;
- frame->GetClientSize(&width, &height);
-
- frame->p_Splitter = new DocSplitterWindow(frame, SPLITTER_WINDOW);
-
- // p_Splitter->SetCursor(wxCursor(wxCURSOR_PENCIL));
- frame->pDoc                       = new mjDoc();
- frame->pDoc->p_MainFrame          = frame;
- frame->pDoc->p_Splitter           = frame->p_Splitter;
- frame->pDoc->p_Splitter->pDoc     = frame->pDoc;       // ControlBase: saving the Sash
- if (!frame->pDoc->OnNewDocument())
-  frame->Close(TRUE);
- // frame->Maximize();
- // frame->SetSize(-1,-1);               // the wxSplitter does not show correctly without this !
- frame->SetClientSize(width, height);    // the wxSplitter does not show correctly without this !
- //---------------------------------------------------------------------------------------
- //-- Problem : GetClientSize(Width,Hight) are not the same as the values given in the ---
- //--            construction of the Frame.                                            ---
- //-- Solved  : GetClientSize is called here and the difference is noted. When the     ---
- //--           Window is closed the diff. is added to the result of GetClientSize.    ---
- //---------------------------------------------------------------------------------------
- frame->GetClientSize(&frame->DiffW, &frame->DiffH); frame->DiffW-=w; frame->DiffH-=h;
- //----------------------------------------------------------------------------
- //-- Help    :                                                                        ---
- //----------------------------------------------------------------------------
-
- frame->help.UseConfig(p_ProgramCfg);
- frame->help.AddBook(langhelp);
- /*
- if (!frame->help.AddBook("helpfiles/dbbrowse.hhp"))
-  wxMessageBox("Failed adding book helpfiles/dbbrowse.hhp");
- if (!frame->help.AddBook("helpfiles/testing.hhp"))
-  wxMessageBox("Failed adding book helpfiles/testing.hhp");
- if (!frame->help.AddBook("helpfiles/another.hhp"))
-   wxMessageBox("Failed adding book helpfiles/another.hhp");
- */
-
-
- //---------------------------------------------------------------------------------------
- p_ProgramCfg->Flush(TRUE);        // sicher Objekt
+    //---------------------------------------------------------------------------------------
+    switch ( argc )
+    {
+    default:
+        // ignore the other args, fall through
+    case 3:
+        language = argv[2];         // czech, english, french, german , polish
+        langid   = argv[1];         // cz, std, fr, de , pl
+        break;
+    case 2:
+        langid   = argv[1];         // cz, std, fr, de , pl
+        break;
+    case 1:
+        break;
+    };
+    //---------------------------------------------------------------------------------------
+    // Win-Registry : Workplace\HKEY_CURRENT_USERS\Software\%GetVendorName()\%GetAppName()
+    //---------------------------------------------------------------------------------------
+    SetVendorName("mj10777");           // Needed to get Configuration Information
+    SetAppName("DBBrowse");            // "" , also needed for s_LangHelp
+    //---------------------------------------------------------------------------------------
+    // we're using wxConfig's "create-on-demand" feature: it will create the
+    // config object when it's used for the first time. It has a number of
+    // advantages compared with explicitly creating our wxConfig:
+    //  1) we don't pay for it if we don't use it
+    //  2) there is no danger to create it twice
+    
+    // application and vendor name are used by wxConfig to construct the name
+    // of the config file/registry key and must be set before the first call
+    // to Get() if you want to override the default values (the application
+    // name is the name of the executable and the vendor name is the same)
+    //---------------------------------------------------------------------------------------
+    p_ProgramCfg = wxConfigBase::Get();  // Get Program Configuration from Registry
+    // p_ProgramCfg->DeleteAll();           // This is how the Config can be erased
+    p_ProgramCfg->SetPath("/");          // Start at root
+    //---------------------------------------------------------------------------------------
+    //-- Set the Language and remember it for the next time. --------------------------------
+    //---------------------------------------------------------------------------------------
+    if (langid == NULL) // No Parameter was given
+    {
+        Temp0.Empty();
+        p_ProgramCfg->Read("/Local/langid",&Temp0); // >const char *langid< can't be used here
+        if (Temp0 == "")
+            langid = "std";  // Standard language is "std" = english
+        else
+            langid = Temp0;
+    }
+    Temp0.Printf("%s",langid);
+    //---------------------------------------------------------------------------------------
+    // Support the following languages  (std = english)
+    if ((Temp0 == "a")  || (Temp0 == "cz") || (Temp0 == "de") ||
+        (Temp0 == "fr") || (Temp0 == "pl"))
+    { // The three-letter language-string codes are only valid in Windows NT and Windows 95.
+        if (Temp0 == "cz")
+            language = "czech";  // csy or czech
+        if ((Temp0 == "de") || (Temp0 == "a"))
+        {
+            language = "german";  // deu or german
+            if (Temp0 == "a")
+            { langid = Temp0 = "de"; }  // Austrian = german
+        } // german / austrian
+        if (Temp0 == "fr")
+            language = "french";  // fra or french
+        if (Temp0 == "pl")
+            language = "polish";  // plk or polish
+        if (!m_locale.Init(language, langid, language)) // Don't do this for english (std)
+        { // You should recieve errors here for cz and pl since there is no cz/ and pl/ directory
+            wxLogMessage("-E-> %s : SetLocale error : langid(%s) ; language(%s)",GetAppName().c_str(),langid,language);
+            langid = "std";
+            language = "C";  // english, english-aus , -can , -nz , -uk , -usa
+        }
+        else
+        { // Read in Foreign language's text for GetAppName() and Help
+            Temp0 = GetAppName();
+            Temp0 = Temp0.Lower();
+            m_locale.AddCatalog(Temp0.c_str());
+            m_locale.AddCatalog("help");
+        }
+    } // Support the following languages  (std = english)
+    else
+    {
+        langid = "std";
+        language = "C";  // english, english-aus , -can , -nz , -uk , -usa
+    }
+    s_Language.Printf("%s",language);                       // language is a pointer
+    s_LangId.Printf("%s",langid);                           // langid   is a pointer
+    p_ProgramCfg->Write("/Local/language",s_Language);
+    p_ProgramCfg->Write("/Local/langid",s_LangId);
+    s_LangHelp.Printf("help.%s/%s.hhp",s_LangId.c_str(),GetAppName().c_str()); // "help.std/Garantie.hhp";
+    s_LangHelp = s_LangHelp.Lower();                       // A must for Linux
+    //---------------------------------------------------------------------------------------
+    Temp0 = "NONE";                               // I don't remember why I did this
+    p_ProgramCfg->Write("/NONE",Temp0);           // I don't remember why I did this
+    p_ProgramCfg->Write("/Paths/NONE",Temp0);     // I don't remember why I did this
+    p_ProgramCfg->Write("/MainFrame/NONE",Temp0); // I don't remember why I did this
+    //---------------------------------------------------------------------------------------
+    p_ProgramCfg->Write("/Paths/Work",wxGetCwd()); // Get current Working Path
+    p_ProgramCfg->SetPath("/");
+    //---------------------------------------------------------------------------------------
+    // restore frame position and size, if empty start Values (1,1) and (750,600)
+    int x = p_ProgramCfg->Read("/MainFrame/x", 1), y = p_ProgramCfg->Read("/MainFrame/y", 1),
+        w = p_ProgramCfg->Read("/MainFrame/w", 750), h = p_ProgramCfg->Read("/MainFrame/h", 600);
+    //---------------------------------------------------------------------------------------
+    // Create the main frame window
+    Temp0.Printf("%s - %s",GetAppName().c_str(),GetVendorName().c_str());
+    frame = new MainFrame((wxFrame *) NULL,(char *) Temp0.c_str(),wxPoint(x,y),wxSize(w,h));
+    //---------------------------------------------------------------------------------------
+    // Set the Backgroundcolour (only need if your are NOT using wxSYS_COLOUR_BACKGROUND)
+    frame->SetBackgroundColour(wxSystemSettings::GetColour(wxSYS_COLOUR_BACKGROUND));
+    // frame->SetBackgroundColour(wxColour(255, 255, 255));
+    // frame->SetBackgroundColour(* wxWHITE);
+    //---------------------------------------------------------------------------------------
+    // Give it an icon
+    //---------------------------------------------------------------------------------------
+    // 12.02.2000 - Guillermo Rodriguez Garcia :
+    //---------------------------------------------------------------------------------------
+    // This is different for Win9x and WinNT; one of them takes the first ico
+    // in the .rc file, while the other takes the icon with the lowest name,
+    // so to be sure that it always work, put your icon the first *and* give
+    // it a name such a 'appicon' or something.
+    //---------------------------------------------------------------------------------------
+    // mj10777 : any special rule in Linux ?
+    //---------------------------------------------------------------------------------------
+    frame->SetIcon(wxICON(aLogo));    // lowest name and first entry in RC File
+    //---------------------------------------------------------------------------------------
+    // Make a menubar
+    wxMenu *file_menu = new wxMenu;
+    wxMenu *help_menu = new wxMenu;
+    
+    help_menu->Append(HELP, _("&Help"));
+    help_menu->AppendSeparator();
+    help_menu->Append(ABOUT, _("&About"));
+    file_menu->Append(QUIT, _("E&xit"));
+    
+    wxMenuBar *menu_bar = new wxMenuBar;
+    menu_bar->Append(file_menu, _("&File"));
+    menu_bar->Append(help_menu, _("&Help"));
+    frame->SetMenuBar(menu_bar);
+    frame->CreateStatusBar(1);
+    Temp0.Printf(_("%s has started !"),p_ProgramCfg->GetAppName().c_str());
+    frame->SetStatusText(Temp0, 0);
+    //---------------------------------------------------------------------------------------
+    int width, height;
+    frame->GetClientSize(&width, &height);
+    //---------------------------------------------------------------------------------------
+    frame->p_Splitter = new DocSplitterWindow(frame,-1);
+    // p_Splitter->SetCursor(wxCursor(wxCURSOR_PENCIL));
+    frame->pDoc                       = new MainDoc();
+    frame->pDoc->p_MainFrame          = frame;
+    frame->pDoc->p_Splitter           = frame->p_Splitter;
+    frame->pDoc->p_Splitter->pDoc     = frame->pDoc;       // ControlBase: saving the Sash
+    //---------------------------------------------------------------------------------------
+    //-- Problem : GetClientSize(Width,Hight) are not the same as the values given in the ---
+    //--            construction of the Frame.                                            ---
+    //-- Solved  : GetClientSize is called here and the difference is noted. When the     ---
+    //--           Window is closed the diff. is added to the result of GetClientSize.    ---
+    //---------------------------------------------------------------------------------------
+    frame->GetClientSize(&frame->DiffW, &frame->DiffH); frame->DiffW-=w; frame->DiffH-=h;
+    //----------------------------------------------------------------------------
+    //-- Help    : Load the help.%langid/%GetAppName().hhp (help.std/dbbrowse.hhp) file                                                                       ---
+    //----------------------------------------------------------------------------
+    frame->p_Help = new wxHtmlHelpController();   // construct the Help System
+    frame->p_Help->UseConfig(p_ProgramCfg);       // Don't rember what this was for
+    // You should recieve errors here for fr since there is no help.fr/ directory
+    if (!frame->p_Help->AddBook(s_LangHelp))      // Use the language set
+    { // You should recieve errors here for fr since there is no help.fr/ but a fr/ directory
+        wxLogMessage("-E-> %s : AddBook error : s_LangHelp(%s)",GetAppName().c_str(),s_LangHelp.c_str());
+    }
+    frame->pDoc->p_Help = frame->p_Help;          // Save the information to the document
+    //---------------------------------------------------------------------------------------
+    frame->Show(TRUE);                            // Show the frame
+    SetTopWindow(frame);                          // At this point the frame can be seen
+    //---------------------------------------------------------------------------------------
+    // If you need a "Splash Screen" because of a long OnNewDocument, do it here
+    if (!frame->pDoc->OnNewDocument())
+        frame->Close(TRUE);
+    // Kill a "Splash Screen" because OnNewDocument, if you have one
+    //---------------------------------------------------------------------------------------
+    p_ProgramCfg->Flush(TRUE);        // save the configuration
+    return TRUE;
+} // bool MainApp::OnInit(void)
 
 
- //---------------------------------------------------------------------------------------
- // Show the frame
- frame->Show(TRUE);
- SetTopWindow(frame);
-
-
-
- return TRUE;
-}
-//---------------------------------------------------------------------------
+//----------------------------------------------------------------------------------------
 // My frame constructor
 // My frame constructor
-//---------------------------------------------------------------------------
-MainFrame::MainFrame(wxFrame *frame, char *title, int x, int y, int w, int h):
-  wxFrame(frame, SPLITTER_FRAME, title, wxPoint(x, y), wxSize(w, h))
+//----------------------------------------------------------------------------------------
+MainFrame::MainFrame(wxFrame *frame, char *title,  const wxPoint& pos, const wxSize& size):
+wxFrame(frame, -1, title,  pos, size)
 {
 {
- InitializeMenu();
- // This reduces flicker effects - even better would be to define OnEraseBackground
- // to do Temp0. When the list control's scrollbars are show or hidden, the
- // frame is sent a background erase event.
- SetBackgroundColour( *wxWHITE );
- // frame->SetBackgroundColour(wxColour(255, 255, 255));
- //---------------------------------------------------------------------------------------
- // Give it an icon
- SetIcon( wxICON(Logo) );
- //---------------------------------------------------------------------------------------
+    p_Splitter = NULL; pDoc = NULL; p_Help = NULL;    // Keep the Pointers clean !
+    //--- Everything else is done in MainApp::OnInit() --------------------------------------
 }
 }
-//---------------------------------------------------------------------------
+
+//----------------------------------------------------------------------------------------
 MainFrame::~MainFrame(void)
 {
 MainFrame::~MainFrame(void)
 {
- // save the control's values to the config
- if ( p_ProgramCfg == NULL )
-   return;
- // save the frame position
- int x, y, w, h;
- GetPosition(&x, &y);
- GetClientSize(&w, &h); w -= DiffW; h -= DiffH;
- p_ProgramCfg->Write("/MainFrame/x", (long) x);
- p_ProgramCfg->Write("/MainFrame/y", (long) y);
- p_ProgramCfg->Write("/MainFrame/w", (long) w);
- p_ProgramCfg->Write("/MainFrame/h", (long) h);
- p_ProgramCfg->Write("/MainFrame/Sash", (long) pDoc->Sash);
- // clean up: Set() returns the active config object as Get() does, but unlike
- // Get() it doesn't try to create one if there is none (definitely not what
- // we want here!)
- // delete wxConfigBase::Set((wxConfigBase *) NULL);
- p_ProgramCfg->Flush(TRUE);        // sichert Objekt
- delete frame->pDoc;
-}
-//--------------------------------------------------------------------------------------
-void MainFrame::InitializeMenu()
-{
- //---------------------------------------------------------------------------------------
- // Make a menubar
- //---------------------------------------------------------------------------------------
- wxMenu *file_menu = new wxMenu;
+    // Close the help frame; this will cause the config data to get written.
+    if (p_Help->GetFrame()) // returns NULL if no help frame active
+        p_Help->GetFrame()->Close(TRUE);
+    delete p_Help;  // Memory Leak
+    p_Help = NULL;
+    // save the control's values to the config
+    if (p_ProgramCfg == NULL)
+        return;
+    // save the frame position before it is destroyed
+    int x, y, w, h;
+    GetPosition(&x, &y);
+    GetClientSize(&w, &h); w -= DiffW; h -= DiffH;
+    p_ProgramCfg->Write("/MainFrame/x", (long) x);
+    p_ProgramCfg->Write("/MainFrame/y", (long) y);
+    p_ProgramCfg->Write("/MainFrame/w", (long) w);
+    p_ProgramCfg->Write("/MainFrame/h", (long) h);
+    p_ProgramCfg->Write("/MainFrame/Sash", (long) pDoc->Sash);
+    // clean up: Set() returns the active config object as Get() does, but unlike
+    // Get() it doesn't try to create one if there is none (definitely not what
+    // we want here!)
+    // delete wxConfigBase::Set((wxConfigBase *) NULL);
+    p_ProgramCfg->Flush(TRUE);        // saves   Objekt
+    if (pDoc)                         // If we have a Valid Document
+        delete pDoc;                     // Cleanup (MainDoc::~MainDoc)
+} // MainFrame::~MainFrame(void)
 
 
- file_menu->Append(ABOUT, _("&About"));
- file_menu->AppendSeparator();
- file_menu->Append(QUIT, _("E&xit"));
-
-
- wxMenuBar *menu_bar = new wxMenuBar;
- menu_bar->Append(file_menu, _("&File"));
- SetMenuBar(menu_bar);
-}
-//---------------------------------------------------------------------------
+//----------------------------------------------------------------------------------------
 void MainFrame::OnQuit(wxCommandEvent& WXUNUSED(event))
 {
 void MainFrame::OnQuit(wxCommandEvent& WXUNUSED(event))
 {
- // Close the help frame; this will cause the config data to
- // get written.
- if (help.GetFrame()) // returns NULL if no help frame active
-  help.GetFrame()->Close(TRUE);
- Close(TRUE);
+    Close(TRUE);
 }
 }
-//---------------------------------------------------------------------------
+
+//----------------------------------------------------------------------------------------
 void MainFrame::OnAbout(wxCommandEvent& WXUNUSED(event))
 {
 void MainFrame::OnAbout(wxCommandEvent& WXUNUSED(event))
 {
- wxMessageDialog dialog(this, _("DBBrowser\nMark Johnson\nBerlin, Germany\nmj10777@gmx.net\n (c) 1999"),
-      _("About DBBrowser"), wxOK|wxCANCEL);
-
- dialog.ShowModal();
+    wxString Temp0, Temp1;
+    Temp0.Printf(_("%s\nMark Johnson\nBerlin, Germany\nwxWindows@mj10777.de\n (c) 2000"),p_ProgramCfg->GetAppName().c_str());
+    Temp1.Printf(_("About %s"),p_ProgramCfg->GetAppName().c_str());
+    wxMessageDialog dialog(this, Temp0,Temp1,wxOK|wxCANCEL);
+    dialog.ShowModal();
 }
 }
-//---------------------------------------------------------------------------
+
+//----------------------------------------------------------------------------------------
 void MainFrame::OnHelp(wxCommandEvent& WXUNUSED(event))
 {
 void MainFrame::OnHelp(wxCommandEvent& WXUNUSED(event))
 {
help.Display("Main page");
   p_Help->Display("Main page");
 }
 }
-//---------------------------------------------------------------------------
+//----------------------------------------------------------------------------------------