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    m_locale.AddCatalog(GetAppName().c_str());
 153    m_locale.AddCatalog("help");
 154   }
 155  } // Support the following languages  (std = english)
 156  else
 157  {
 158   langid = "std";
 159   language = "C";  // english, english-aus , -can , -nz , -uk , -usa
 160  }
 161  s_Language.Printf("%s",language);                       // language is a pointer
 162  s_LangId.Printf("%s",langid);                           // langid   is a pointer
 163  p_ProgramCfg->Write("/Local/language",s_Language);
 164  p_ProgramCfg->Write("/Local/langid",s_LangId);
 165  s_LangHelp.Printf("help.%s/%s.hhp",s_LangId.c_str(),GetAppName().c_str()); // "help.std/Garantie.hhp";
 166  s_LangHelp = s_LangHelp.Lower();                       // A must for Linux
 167  //---------------------------------------------------------------------------------------
 168  Temp0 = "NONE";                               // I don't remember why I did this
 169  p_ProgramCfg->Write("/NONE",Temp0);           // I don't remember why I did this
 170  p_ProgramCfg->Write("/Paths/NONE",Temp0);     // I don't remember why I did this
 171  p_ProgramCfg->Write("/MainFrame/NONE",Temp0); // I don't remember why I did this
 172  //---------------------------------------------------------------------------------------
 173  p_ProgramCfg->Write("/Paths/Work",wxGetCwd()); // Get current Working Path
 174  p_ProgramCfg->SetPath("/");
 175  //---------------------------------------------------------------------------------------
 176  // restore frame position and size, if empty start Values (1,1) and (750,600)
 177  int x = p_ProgramCfg->Read("/MainFrame/x", 1), y = p_ProgramCfg->Read("/MainFrame/y", 1),
 178      w = p_ProgramCfg->Read("/MainFrame/w", 750), h = p_ProgramCfg->Read("/MainFrame/h", 600);
 179  //---------------------------------------------------------------------------------------
 180  // Create the main frame window
 181  Temp0.Printf("%s - %s",GetAppName().c_str(),GetVendorName().c_str());
 182  frame = new MainFrame((wxFrame *) NULL,(char *) Temp0.c_str(),wxPoint(x,y),wxSize(w,h));
 183  //---------------------------------------------------------------------------------------
 184  // Set the Backgroundcolour (only need if your are NOT using wxSYS_COLOUR_BACKGROUND)
 185  frame->SetBackgroundColour(wxSystemSettings::GetSystemColour(wxSYS_COLOUR_BACKGROUND));
 186  // frame->SetBackgroundColour(wxColour(255, 255, 255));
 187  // frame->SetBackgroundColour(* wxWHITE);
 188  //---------------------------------------------------------------------------------------
 189  // Give it an icon
 190  //---------------------------------------------------------------------------------------
 191  // 12.02.2000 - Guillermo Rodriguez Garcia :
 192  //---------------------------------------------------------------------------------------
 193  // This is different for Win9x and WinNT; one of them takes the first ico
 194  // in the .rc file, while the other takes the icon with the lowest name,
 195  // so to be sure that it always work, put your icon the first *and* give
 196  // it a name such a 'appicon' or something.
 197  //---------------------------------------------------------------------------------------
 198  // mj10777 : any special rule in Linux ?
 199  //---------------------------------------------------------------------------------------
 200  frame->SetIcon(wxICON(aLogo));    // lowest name and first entry in RC File
 201  //---------------------------------------------------------------------------------------
 202  // Make a menubar
 203  wxMenu *file_menu = new wxMenu;
 204  wxMenu *help_menu = new wxMenu;
 205
 206  help_menu->Append(HELP, _("&Help"));
 207  help_menu->AppendSeparator();
 208  help_menu->Append(ABOUT, _("&About"));
 209  file_menu->Append(QUIT, _("E&xit"));
 210
 211  wxMenuBar *menu_bar = new wxMenuBar;
 212  menu_bar->Append(file_menu, _("&File"));
 213  menu_bar->Append(help_menu, _("&Help"));
 214  frame->SetMenuBar(menu_bar);
 215  frame->CreateStatusBar(1);
 216  Temp0.Printf(_("%s has started !"),p_ProgramCfg->GetAppName().c_str());
 217  frame->SetStatusText(Temp0, 0);
 218  //---------------------------------------------------------------------------------------
 219  int width, height;
 220  frame->GetClientSize(&width, &height);
 221  //---------------------------------------------------------------------------------------
 222  frame->p_Splitter = new DocSplitterWindow(frame,-1);
 223  // p_Splitter->SetCursor(wxCursor(wxCURSOR_PENCIL));
 224  frame->pDoc                       = new MainDoc();
 225  frame->pDoc->p_MainFrame          = frame;
 226  frame->pDoc->p_Splitter           = frame->p_Splitter;
 227  frame->pDoc->p_Splitter->pDoc     = frame->pDoc;       // ControlBase: saving the Sash
 228  //---------------------------------------------------------------------------------------
 229  //-- Problem : GetClientSize(Width,Hight) are not the same as the values given in the ---
 230  //--            construction of the Frame.                                            ---
 231  //-- Solved  : GetClientSize is called here and the difference is noted. When the     ---
 232  //--           Window is closed the diff. is added to the result of GetClientSize.    ---
 233  //---------------------------------------------------------------------------------------
 234  frame->GetClientSize(&frame->DiffW, &frame->DiffH); frame->DiffW-=w; frame->DiffH-=h;
 235  //----------------------------------------------------------------------------
 236  //-- Help    : Load the help.%langid/%GetAppName().hhp (help.std/dbbrowse.hhp) file                                                                       ---
 237  //----------------------------------------------------------------------------
 238  frame->p_Help = new wxHtmlHelpController();   // construct the Help System
 239  frame->p_Help->UseConfig(p_ProgramCfg);       // Don't rember what this was for
 240  // You should recieve errors here for fr since there is no help.fr/ directory
 241  if (!frame->p_Help->AddBook(s_LangHelp))      // Use the language set
 242  { // You should recieve errors here for fr since there is no help.fr/ but a fr/ directory
 243   wxLogMessage("-E-> %s : AddBook error : s_LangHelp(%s)",GetAppName().c_str(),s_LangHelp.c_str());
 244  }
 245  frame->pDoc->p_Help = frame->p_Help;          // Save the information to the document
 246  //---------------------------------------------------------------------------------------
 247  frame->Show(TRUE);                            // Show the frame
 248  SetTopWindow(frame);                          // At this point the frame can be seen
 249  //---------------------------------------------------------------------------------------
 250  // If you need a "Splash Screen" because of a long OnNewDocument, do it here
 251  if (!frame->pDoc->OnNewDocument())
 252   frame->Close(TRUE);
 253  // Kill a "Splash Screen" because OnNewDocument, if you have one
 254  //---------------------------------------------------------------------------------------
 255  p_ProgramCfg->Flush(TRUE);        // save the configuration
 256  return TRUE;
 257 } // bool MainApp::OnInit(void)
 258 //----------------------------------------------------------------------------------------
 259 // My frame constructor
 260 //----------------------------------------------------------------------------------------
 261 MainFrame::MainFrame(wxFrame *frame, char *title,  const wxPoint& pos, const wxSize& size):
 262   wxFrame(frame, -1, title,  pos, size)
 263 {
 264  p_Splitter = NULL; pDoc = NULL; p_Help = NULL;    // Keep the Pointers clean !
 265  //--- Everything else is done in MainApp::OnInit() --------------------------------------
 266 }
 267 //----------------------------------------------------------------------------------------
 268 MainFrame::~MainFrame(void)
 269 {
 270  // save the control's values to the config
 271  if (p_ProgramCfg == NULL)
 272    return;
 273  // save the frame position before it is destroyed
 274  int x, y, w, h;
 275  GetPosition(&x, &y);
 276  GetClientSize(&w, &h); w -= DiffW; h -= DiffH;
 277  p_ProgramCfg->Write("/MainFrame/x", (long) x);
 278  p_ProgramCfg->Write("/MainFrame/y", (long) y);
 279  p_ProgramCfg->Write("/MainFrame/w", (long) w);
 280  p_ProgramCfg->Write("/MainFrame/h", (long) h);
 281  p_ProgramCfg->Write("/MainFrame/Sash", (long) pDoc->Sash);
 282  // clean up: Set() returns the active config object as Get() does, but unlike
 283  // Get() it doesn't try to create one if there is none (definitely not what
 284  // we want here!)
 285  // delete wxConfigBase::Set((wxConfigBase *) NULL);
 286  p_ProgramCfg->Flush(TRUE);        // saves   Objekt
 287  if (pDoc)                         // If we have a Valid Document
 288   delete pDoc;                     // Cleanup (MainDoc::~MainDoc)
 289 } // MainFrame::~MainFrame(void)
 290 //----------------------------------------------------------------------------------------
 291 void MainFrame::OnQuit(wxCommandEvent& WXUNUSED(event))
 292 {
 293  // Close the help frame; this will cause the config data to get written.
 294  if (p_Help->GetFrame()) // returns NULL if no help frame active
 295   p_Help->GetFrame()->Close(TRUE);
 296  Close(TRUE);
 297 }
 298 //----------------------------------------------------------------------------------------
 299 void MainFrame::OnAbout(wxCommandEvent& WXUNUSED(event))
 300 {
 301  wxString Temp0, Temp1;
 302  Temp0.Printf(_("%s\nMark Johnson\nBerlin, Germany\nmj10777@gmx.net\n (c) 2000"),p_ProgramCfg->GetAppName().c_str());
 303  Temp1.Printf(_("About %s"),p_ProgramCfg->GetAppName().c_str());
 304  wxMessageDialog dialog(this, Temp0,Temp1,wxOK|wxCANCEL);
 305  dialog.ShowModal();
 306 }
 307 //----------------------------------------------------------------------------------------
 308 void MainFrame::OnHelp(wxCommandEvent& WXUNUSED(event))
 309 {
 310  p_Help->Display("Main page");
 311 }
 312 //----------------------------------------------------------------------------------------