demos/dbbrowse/dbbrowse.cpp

   1 //----------------------------------------------------------------------------------------
   2 // Name:        dbbrowse.cpp
   3 // Purpose:     Through ODBC - Databases Browsen
   4 // Author:      Mark Johnson, mj10777@gmx.net
   5 // Modified by:
   6 // BJO        : Bart A.M. JOURQUIN
   7 // Created:     19991127
   8 // Copyright:   (c) Mark Johnson
   9 // Licence:     wxWindows license
  10 // RCS-ID:      $Id$
  11 //----------------------------------------------------------------------------------------
  12 //-- all #ifdefs that the whole Project needs. -------------------------------------------
  13 //----------------------------------------------------------------------------------------
  14 #ifdef __GNUG__
  15  #pragma implementation
  16  #pragma interface
  17 #endif
  18 //----------------------------------------------------------------------------------------
  19 // For compilers that support precompilation, includes "wx/wx.h".
  20 #include "wx/wxprec.h"
  21 //----------------------------------------------------------------------------------------
  22 #ifdef __BORLANDC__
  23  #pragma hdrstop
  24 #endif
  25 //----------------------------------------------------------------------------------------
  26 #ifndef WX_PRECOMP
  27  #include "wx/wx.h"
  28 #endif
  29 //----------------------------------------------------------------------------------------
  30 #ifndef __WXMSW__
  31  #include "bitmaps/logo.xpm"
  32 #endif
  33 //----------------------------------------------------------------------------------------
  34 //-- all #includes that every .cpp needs             --- 19990807.mj10777 ----------------
  35 //----------------------------------------------------------------------------------------
  36 #include "std.h"    // sorgsam Pflegen !
  37 // #include <iostream>
  38 //----------------------------------------------------------------------------------------
  39 //-- Some Global Vars for this file ------------------------------------------------------
  40 //----------------------------------------------------------------------------------------
  41 BEGIN_EVENT_TABLE(MainFrame, wxFrame)
  42  EVT_MENU(QUIT, MainFrame::OnQuit)                  // Program End
  43  EVT_MENU(ABOUT, MainFrame::OnAbout)                // Program Discription
  44  EVT_MENU(HELP, MainFrame::OnHelp)                  // Program Help
  45 END_EVENT_TABLE()
  46 //----------------------------------------------------------------------------------------
  47 IMPLEMENT_APP(MainApp)      // This declares wxApp::MainApp as "the" Application
  48 //----------------------------------------------------------------------------------------
  49 // 'Main program' equivalent, creating windows and returning main app frame
  50 //----------------------------------------------------------------------------------------
  51 bool MainApp::OnInit(void)  // Does everything needed for a program start
  52 {
  53  wxString Temp0;            // Use as needed
  54  //---------------------------------------------------------------------------------------
  55  // set the language to use   // Help.??  (.std = english, .de = german etc.)
  56  const char *language = NULL; // czech, german, french, polish
  57  const char *langid   = NULL; // std = english , cz, de = german, fr = french, pl = polish
  58  wxString   s_LangHelp;       // Directory/Filename.hhp of the Help-Project file
  59  wxString   s_LangId, s_Language;
  60  s_Language.Empty(); s_LangId.Empty(); s_LangHelp.Empty();
  61  //---------------------------------------------------------------------------------------
  62  //-- Graphic File suport - use only when needed, otherwise big .exe's
  63  //---------------------------------------------------------------------------------------
  64 #if wxUSE_LIBPNG
  65  wxImage::AddHandler( new wxPNGHandler );   // needed for help System
  66 #endif
  67 /*
  68 #if wxUSE_LIBJPEG
  69  wxImage::AddHandler(new wxJPEGHandler );   // use only when needed, otherwise big .exe's
  70 #endif
  71  wxImage::AddHandler( new wxGIFHandler );   // use only when needed, otherwise big .exe's
  72  wxImage::AddHandler( new wxPCXHandler );   // use only when needed, otherwise big .exe's
  73  wxImage::AddHandler( new wxPNMHandler );   // use only when needed, otherwise big .exe's
  74 */
  75 #ifdef __WXMSW__
  76  // wxBitmap::AddHandler( new wxXPMFileHandler );   // Attempt to use XPS instead of ico
  77  // wxBitmap::AddHandler( new wxXPMDataHandler );   // - Attempt failed
  78 #endif
  79  //---------------------------------------------------------------------------------------
  80  switch ( argc )
  81  {
  82   default:
  83       // ignore the other args, fall through
  84   case 3:
  85       language = argv[2];         // czech, english, french, german , polish
  86       langid   = argv[1];         // cz, std, fr, de , pl
  87       break;
  88   case 2:
  89       langid   = argv[1];         // cz, std, fr, de , pl
  90       break;
  91   case 1:
  92       break;
  93  };
  94  //---------------------------------------------------------------------------------------
  95  // Win-Registry : Workplace\HKEY_CURRENT_USERS\Software\%GetVendorName()\%GetAppName()
  96  //---------------------------------------------------------------------------------------
  97  SetVendorName("mj10777");           // Needed to get Configuration Information
  98  SetAppName("DBBrowse");            // "" , also needed for s_LangHelp
  99  //---------------------------------------------------------------------------------------
 100  // we're using wxConfig's "create-on-demand" feature: it will create the
 101  // config object when it's used for the first time. It has a number of
 102  // advantages compared with explicitly creating our wxConfig:
 103  //  1) we don't pay for it if we don't use it
 104  //  2) there is no danger to create it twice
 105
 106  // application and vendor name are used by wxConfig to construct the name
 107  // of the config file/registry key and must be set before the first call
 108  // to Get() if you want to override the default values (the application
 109  // name is the name of the executable and the vendor name is the same)
 110  //---------------------------------------------------------------------------------------
 111  p_ProgramCfg = wxConfigBase::Get();  // Get Program Configuration from Registry
 112  // p_ProgramCfg->DeleteAll();           // This is how the Config can be erased
 113  p_ProgramCfg->SetPath("/");          // Start at root
 114  //---------------------------------------------------------------------------------------
 115  //-- Set the Language and remember it for the next time. --------------------------------
 116  //---------------------------------------------------------------------------------------
 117  if (langid == NULL) // No Parameter was given
 118  {
 119   Temp0.Empty();
 120   p_ProgramCfg->Read("/Local/langid",&Temp0); // >const char *langid< can't be used here
 121   if (Temp0 == "")
 122    langid = "std";  // Standard language is "std" = english
 123   else
 124    langid = Temp0;
 125  }
 126  Temp0.Printf("%s",langid);
 127  //---------------------------------------------------------------------------------------
 128  // Support the following languages  (std = english)
 129  if ((Temp0 == "a")  || (Temp0 == "cz") || (Temp0 == "de") ||
 130      (Temp0 == "fr") || (Temp0 == "pl"))
 131  { // The three-letter language-string codes are only valid in Windows NT and Windows 95.
 132   if (Temp0 == "cz")
 133    language = "czech";  // csy or czech
 134   if ((Temp0 == "de") || (Temp0 == "a"))
 135   {
 136    language = "german";  // deu or german
 137    if (Temp0 == "a")
 138    { langid = Temp0 = "de"; }  // Austrian = german
 139   } // german / austrian
 140   if (Temp0 == "fr")
 141    language = "french";  // fra or french
 142   if (Temp0 == "pl")
 143    language = "polish";  // plk or polish
 144   if (!m_locale.Init(language, langid, language)) // Don't do this for english (std)
 145   { // You should recieve errors here for cz and pl since there is no cz/ and pl/ directory
 146    wxLogMessage("-E-> %s : SetLocale error : langid(%s) ; language(%s)",GetAppName().c_str(),langid,language);
 147    langid = "std";
 148    language = "C";  // english, english-aus , -can , -nz , -uk , -usa
 149   }
 150   else
 151   { // Read in Foreign language's text for GetAppName() and Help
 152    Temp0 = GetAppName();
 153    Temp0 = Temp0.Lower();
 154    m_locale.AddCatalog(Temp0.c_str());
 155    m_locale.AddCatalog("help");
 156   }
 157  } // Support the following languages  (std = english)
 158  else
 159  {
 160   langid = "std";
 161   language = "C";  // english, english-aus , -can , -nz , -uk , -usa
 162  }
 163  s_Language.Printf("%s",language);                       // language is a pointer
 164  s_LangId.Printf("%s",langid);                           // langid   is a pointer
 165  p_ProgramCfg->Write("/Local/language",s_Language);
 166  p_ProgramCfg->Write("/Local/langid",s_LangId);
 167  s_LangHelp.Printf("help.%s/%s.hhp",s_LangId.c_str(),GetAppName().c_str()); // "help.std/Garantie.hhp";
 168  s_LangHelp = s_LangHelp.Lower();                       // A must for Linux
 169  //---------------------------------------------------------------------------------------
 170  Temp0 = "NONE";                               // I don't remember why I did this
 171  p_ProgramCfg->Write("/NONE",Temp0);           // I don't remember why I did this
 172  p_ProgramCfg->Write("/Paths/NONE",Temp0);     // I don't remember why I did this
 173  p_ProgramCfg->Write("/MainFrame/NONE",Temp0); // I don't remember why I did this
 174  //---------------------------------------------------------------------------------------
 175  p_ProgramCfg->Write("/Paths/Work",wxGetCwd()); // Get current Working Path
 176  p_ProgramCfg->SetPath("/");
 177  //---------------------------------------------------------------------------------------
 178  // restore frame position and size, if empty start Values (1,1) and (750,600)
 179  int x = p_ProgramCfg->Read("/MainFrame/x", 1), y = p_ProgramCfg->Read("/MainFrame/y", 1),
 180      w = p_ProgramCfg->Read("/MainFrame/w", 750), h = p_ProgramCfg->Read("/MainFrame/h", 600);
 181  //---------------------------------------------------------------------------------------
 182  // Create the main frame window
 183  Temp0.Printf("%s - %s",GetAppName().c_str(),GetVendorName().c_str());
 184  frame = new MainFrame((wxFrame *) NULL,(char *) Temp0.c_str(),wxPoint(x,y),wxSize(w,h));
 185  //---------------------------------------------------------------------------------------
 186  // Set the Backgroundcolour (only need if your are NOT using wxSYS_COLOUR_BACKGROUND)
 187  frame->SetBackgroundColour(wxSystemSettings::GetSystemColour(wxSYS_COLOUR_BACKGROUND));
 188  // frame->SetBackgroundColour(wxColour(255, 255, 255));
 189  // frame->SetBackgroundColour(* wxWHITE);
 190  //---------------------------------------------------------------------------------------
 191  // Give it an icon
 192  //---------------------------------------------------------------------------------------
 193  // 12.02.2000 - Guillermo Rodriguez Garcia :
 194  //---------------------------------------------------------------------------------------
 195  // This is different for Win9x and WinNT; one of them takes the first ico
 196  // in the .rc file, while the other takes the icon with the lowest name,
 197  // so to be sure that it always work, put your icon the first *and* give
 198  // it a name such a 'appicon' or something.
 199  //---------------------------------------------------------------------------------------
 200  // mj10777 : any special rule in Linux ?
 201  //---------------------------------------------------------------------------------------
 202  frame->SetIcon(wxICON(aLogo));    // lowest name and first entry in RC File
 203  //---------------------------------------------------------------------------------------
 204  // Make a menubar
 205  wxMenu *file_menu = new wxMenu;
 206  wxMenu *help_menu = new wxMenu;
 207
 208  help_menu->Append(HELP, _("&Help"));
 209  help_menu->AppendSeparator();
 210  help_menu->Append(ABOUT, _("&About"));
 211  file_menu->Append(QUIT, _("E&xit"));
 212
 213  wxMenuBar *menu_bar = new wxMenuBar;
 214  menu_bar->Append(file_menu, _("&File"));
 215  menu_bar->Append(help_menu, _("&Help"));
 216  frame->SetMenuBar(menu_bar);
 217  frame->CreateStatusBar(1);
 218  Temp0.Printf(_("%s has started !"),p_ProgramCfg->GetAppName().c_str());
 219  frame->SetStatusText(Temp0, 0);
 220  //---------------------------------------------------------------------------------------
 221  int width, height;
 222  frame->GetClientSize(&width, &height);
 223  //---------------------------------------------------------------------------------------
 224  frame->p_Splitter = new DocSplitterWindow(frame,-1);
 225  // p_Splitter->SetCursor(wxCursor(wxCURSOR_PENCIL));
 226  frame->pDoc                       = new MainDoc();
 227  frame->pDoc->p_MainFrame          = frame;
 228  frame->pDoc->p_Splitter           = frame->p_Splitter;
 229  frame->pDoc->p_Splitter->pDoc     = frame->pDoc;       // ControlBase: saving the Sash
 230  //---------------------------------------------------------------------------------------
 231  //-- Problem : GetClientSize(Width,Hight) are not the same as the values given in the ---
 232  //--            construction of the Frame.                                            ---
 233  //-- Solved  : GetClientSize is called here and the difference is noted. When the     ---
 234  //--           Window is closed the diff. is added to the result of GetClientSize.    ---
 235  //---------------------------------------------------------------------------------------
 236  frame->GetClientSize(&frame->DiffW, &frame->DiffH); frame->DiffW-=w; frame->DiffH-=h;
 237  //----------------------------------------------------------------------------
 238  //-- Help    : Load the help.%langid/%GetAppName().hhp (help.std/dbbrowse.hhp) file                                                                       ---
 239  //----------------------------------------------------------------------------
 240  frame->p_Help = new wxHtmlHelpController();   // construct the Help System
 241  frame->p_Help->UseConfig(p_ProgramCfg);       // Don't rember what this was for
 242  // You should recieve errors here for fr since there is no help.fr/ directory
 243  if (!frame->p_Help->AddBook(s_LangHelp))      // Use the language set
 244  { // You should recieve errors here for fr since there is no help.fr/ but a fr/ directory
 245   wxLogMessage("-E-> %s : AddBook error : s_LangHelp(%s)",GetAppName().c_str(),s_LangHelp.c_str());
 246  }
 247  frame->pDoc->p_Help = frame->p_Help;          // Save the information to the document
 248  //---------------------------------------------------------------------------------------
 249  frame->Show(TRUE);                            // Show the frame
 250  SetTopWindow(frame);                          // At this point the frame can be seen
 251  //---------------------------------------------------------------------------------------
 252  // If you need a "Splash Screen" because of a long OnNewDocument, do it here
 253  if (!frame->pDoc->OnNewDocument())
 254   frame->Close(TRUE);
 255  // Kill a "Splash Screen" because OnNewDocument, if you have one
 256  //---------------------------------------------------------------------------------------
 257  p_ProgramCfg->Flush(TRUE);        // save the configuration
 258  return TRUE;
 259 } // bool MainApp::OnInit(void)
 260 //----------------------------------------------------------------------------------------
 261 // My frame constructor
 262 //----------------------------------------------------------------------------------------
 263 MainFrame::MainFrame(wxFrame *frame, char *title,  const wxPoint& pos, const wxSize& size):
 264   wxFrame(frame, -1, title,  pos, size)
 265 {
 266  p_Splitter = NULL; pDoc = NULL; p_Help = NULL;    // Keep the Pointers clean !
 267  //--- Everything else is done in MainApp::OnInit() --------------------------------------
 268 }
 269 //----------------------------------------------------------------------------------------
 270 MainFrame::~MainFrame(void)
 271 {
 272  // Close the help frame; this will cause the config data to get written.
 273  if (p_Help->GetFrame()) // returns NULL if no help frame active
 274   p_Help->GetFrame()->Close(TRUE);
 275  delete p_Help;  // Memory Leak
 276  p_Help = NULL;
 277  // save the control's values to the config
 278  if (p_ProgramCfg == NULL)
 279    return;
 280  // save the frame position before it is destroyed
 281  int x, y, w, h;
 282  GetPosition(&x, &y);
 283  GetClientSize(&w, &h); w -= DiffW; h -= DiffH;
 284  p_ProgramCfg->Write("/MainFrame/x", (long) x);
 285  p_ProgramCfg->Write("/MainFrame/y", (long) y);
 286  p_ProgramCfg->Write("/MainFrame/w", (long) w);
 287  p_ProgramCfg->Write("/MainFrame/h", (long) h);
 288  p_ProgramCfg->Write("/MainFrame/Sash", (long) pDoc->Sash);
 289  // clean up: Set() returns the active config object as Get() does, but unlike
 290  // Get() it doesn't try to create one if there is none (definitely not what
 291  // we want here!)
 292  // delete wxConfigBase::Set((wxConfigBase *) NULL);
 293  p_ProgramCfg->Flush(TRUE);        // saves   Objekt
 294  if (pDoc)                         // If we have a Valid Document
 295   delete pDoc;                     // Cleanup (MainDoc::~MainDoc)
 296 } // MainFrame::~MainFrame(void)
 297 //----------------------------------------------------------------------------------------
 298 void MainFrame::OnQuit(wxCommandEvent& WXUNUSED(event))
 299 {
 300  Close(TRUE);
 301 }
 302 //----------------------------------------------------------------------------------------
 303 void MainFrame::OnAbout(wxCommandEvent& WXUNUSED(event))
 304 {
 305  wxString Temp0, Temp1;
 306  Temp0.Printf(_("%s\nMark Johnson\nBerlin, Germany\nmj10777@gmx.net\n (c) 2000"),p_ProgramCfg->GetAppName().c_str());
 307  Temp1.Printf(_("About %s"),p_ProgramCfg->GetAppName().c_str());
 308  wxMessageDialog dialog(this, Temp0,Temp1,wxOK|wxCANCEL);
 309  dialog.ShowModal();
 310 }
 311 //----------------------------------------------------------------------------------------
 312 void MainFrame::OnHelp(wxCommandEvent& WXUNUSED(event))
 313 {
 314  p_Help->Display("Main page");
 315 }
 316 //----------------------------------------------------------------------------------------