+++ /dev/null
-//----------------------------------------------------------------------------------------
-// Name: dbbrowse.cpp
-// Purpose: Through ODBC - Databases Browsen
-// Author: Mark Johnson
-// Modified by:
-// BJO : Bart A.M. JOURQUIN
-// Created: 19991127
-// Copyright: (c) Mark Johnson
-// Licence: wxWindows license
-// RCS-ID: $Id$
-//----------------------------------------------------------------------------------------
-
-// For compilers that support precompilation, includes "wx/wx.h".
-#include "wx/wxprec.h"
-//----------------------------------------------------------------------------------------
-#ifdef __BORLANDC__
-#pragma hdrstop
-#endif
-//----------------------------------------------------------------------------------------
-#ifndef WX_PRECOMP
-#include "wx/wx.h"
-#endif
-
-#include "wx/stockitem.h"
-//----------------------------------------------------------------------------------------
-#ifndef __WXMSW__
-#include "bitmaps/logo.xpm"
-#endif
-//----------------------------------------------------------------------------------------
-//-- all #includes that every .cpp needs --- 19990807.mj10777 ----------------
-//----------------------------------------------------------------------------------------
-#include "std.h" // sorgsam Pflegen !
-// #include <iostream>
-//----------------------------------------------------------------------------------------
-//-- Some Global Vars for this file ------------------------------------------------------
-//----------------------------------------------------------------------------------------
-BEGIN_EVENT_TABLE(MainFrame, wxFrame)
- EVT_MENU(wxID_EXIT, MainFrame::OnQuit) // Program End
- EVT_MENU(wxID_ABOUT, MainFrame::OnAbout) // Program Discription
- EVT_MENU(wxID_HELP, MainFrame::OnHelp) // Program Help
-END_EVENT_TABLE()
-
-//----------------------------------------------------------------------------------------
-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
-{
- wxString Temp0; // Use as needed
- //---------------------------------------------------------------------------------------
- // set the language to use // Help.?? (.std = english, .de = german etc.)
- const wxChar *language = NULL; // czech, german, french, polish
- const wxChar *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
- wxImage::AddHandler( new wxPNGHandler ); // needed for help System
-#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
-*/
-#ifdef __WXMSW__
- // wxBitmap::AddHandler( new wxXPMFileHandler ); // Attempt to use XPS instead of ico
- // wxBitmap::AddHandler( new wxXPMDataHandler ); // - Attempt failed
-#endif
- //---------------------------------------------------------------------------------------
- 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:
- case 0:
- break;
- };
- //---------------------------------------------------------------------------------------
- // Win-Registry : Workplace\HKEY_CURRENT_USERS\Software\%GetVendorName()\%GetAppName()
- //---------------------------------------------------------------------------------------
- SetVendorName(_T("mj10777")); // Needed to get Configuration Information
- SetAppName(_T("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(_T("/")); // 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(_T("/Local/langid"),&Temp0); // >const char *langid< can't be used here
- if (Temp0.empty())
- langid = _T("std"); // Standard language is "std" = english
- else
- langid = Temp0;
- }
- Temp0.Printf(_T("%s"),langid);
- //---------------------------------------------------------------------------------------
- // Support the following languages (std = english)
- if ((Temp0 == _T("a")) || (Temp0 == _T("cz")) || (Temp0 == _T("de")) ||
- (Temp0 == _T("fr")) || (Temp0 == _T("pl")))
- { // The three-letter language-string codes are only valid in Windows NT and Windows 95.
- if (Temp0 == _T("cz"))
- language = _T("czech"); // csy or czech
- if ((Temp0 == _T("de")) || (Temp0 == _T("a")))
- {
- language = _T("german"); // deu or german
- if (Temp0 == _T("a"))
- { langid = Temp0 = _T("de"); } // Austrian = german
- } // german / austrian
- if (Temp0 == _T("fr"))
- language = _T("french"); // fra or french
- if (Temp0 == _T("pl"))
- language = _T("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(_T("-E-> %s : SetLocale error : langid(%s) ; language(%s)"),GetAppName().c_str(),langid,language);
- langid = _T("std");
- language = _T("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(_T("help"));
- }
- } // Support the following languages (std = english)
- else
- {
- langid = _T("std");
- language = _T("C"); // english, english-aus , -can , -nz , -uk , -usa
- }
- s_Language.Printf(_T("%s"),language); // language is a pointer
- s_LangId.Printf(_T("%s"),langid); // langid is a pointer
- p_ProgramCfg->Write(_T("/Local/language"),s_Language);
- p_ProgramCfg->Write(_T("/Local/langid"),s_LangId);
- s_LangHelp.Printf(_T("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 = _T("NONE"); // I don't remember why I did this
- p_ProgramCfg->Write(_T("/NONE"),Temp0); // I don't remember why I did this
- p_ProgramCfg->Write(_T("/Paths/NONE"),Temp0); // I don't remember why I did this
- p_ProgramCfg->Write(_T("/MainFrame/NONE"),Temp0); // I don't remember why I did this
- //---------------------------------------------------------------------------------------
- p_ProgramCfg->Write(_T("/Paths/Work"),wxGetCwd()); // Get current Working Path
- p_ProgramCfg->SetPath(_T("/"));
- //---------------------------------------------------------------------------------------
- // restore frame position and size, if empty start Values (1,1) and (750,600)
- int x = p_ProgramCfg->Read(_T("/MainFrame/x"), 1), y = p_ProgramCfg->Read(_T("/MainFrame/y"), 1),
- w = p_ProgramCfg->Read(_T("/MainFrame/w"), 750), h = p_ProgramCfg->Read(_T("/MainFrame/h"), 600);
- //---------------------------------------------------------------------------------------
- // Create the main frame window
- Temp0.Printf(_T("%s - %s"),GetAppName().c_str(),GetVendorName().c_str());
- frame = new MainFrame((wxFrame *) NULL,(wxChar *) Temp0.c_str(),wxPoint(x,y),wxSize(w,h));
- //---------------------------------------------------------------------------------------
- // Set the Backgroundcolour (only needed if you 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(wxID_HELP, wxGetStockLabel(wxID_HELP));
- help_menu->AppendSeparator();
- help_menu->Append(wxID_ABOUT, _("&About"));
- file_menu->Append(wxID_EXIT, wxGetStockLabel(wxID_EXIT));
-
- wxMenuBar *menu_bar = new wxMenuBar;
- menu_bar->Append(file_menu, _("&File"));
- menu_bar->Append(help_menu, _("&Help"));
- frame->SetMenuBar(menu_bar);
-#if wxUSE_STATUSBAR
- frame->CreateStatusBar(1);
- Temp0.Printf(_("%s has started !"),p_ProgramCfg->GetAppName().c_str());
- frame->SetStatusText(Temp0, 0);
-#endif // wxUSE_STATUSBAR
- //---------------------------------------------------------------------------------------
- int width, height;
- frame->GetClientSize(&width, &height);
- //---------------------------------------------------------------------------------------
- frame->p_Splitter = new DocSplitterWindow(frame,wxID_ANY);
- // 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,Height) 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(_T("-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)
-
-//----------------------------------------------------------------------------------------
-// My frame constructor
-//----------------------------------------------------------------------------------------
-MainFrame::MainFrame(wxFrame *frame, wxChar *title, const wxPoint& pos, const wxSize& size):
-wxFrame(frame, wxID_ANY, title, pos, size)
-{
- p_Splitter = NULL; pDoc = NULL; p_Help = NULL; // Keep the Pointers clean !
- //--- Everything else is done in MainApp::OnInit() --------------------------------------
-}
-
-//----------------------------------------------------------------------------------------
-MainFrame::~MainFrame(void)
-{
- // 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(_T("/MainFrame/x"), (long) x);
- p_ProgramCfg->Write(_T("/MainFrame/y"), (long) y);
- p_ProgramCfg->Write(_T("/MainFrame/w"), (long) w);
- p_ProgramCfg->Write(_T("/MainFrame/h"), (long) h);
- p_ProgramCfg->Write(_T("/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)
-
-//----------------------------------------------------------------------------------------
-void MainFrame::OnQuit(wxCommandEvent& WXUNUSED(event))
-{
- Close(true);
-}
-
-//----------------------------------------------------------------------------------------
-void MainFrame::OnAbout(wxCommandEvent& WXUNUSED(event))
-{
- 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))
-{
- p_Help->Display(_T("Main page"));
-}
-//----------------------------------------------------------------------------------------