- //---------------------------------------------------------------------------------------
- langid = "std"; // Standard language is "std" = english
- 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");
- 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 (std = english)
- 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("/");
- //---------------------------------------------------------------------------------------
- // 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
- frame = new MainFrame((wxFrame *) NULL, (char *) _("DBBrowser - mj10777"),wxPoint(x,y),wxSize(w,h));
- //---------------------------------------------------------------------------------------
- // Set the Backgroundcolour (only need if your are NOT using wxSYS_COLOUR_BACKGROUND)
- frame->SetBackgroundColour(wxSystemSettings::GetSystemColour(wxSYS_COLOUR_BACKGROUND));
- // frame->SetBackgroundColour(wxColour(255, 255, 255));
- // frame->SetBackgroundColour(* wxWHITE);
- //---------------------------------------------------------------------------------------
- // Give it an icon
- frame->SetIcon(wxICON(aLogo)); // Programm Icon = lowest name 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 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->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->p_Help = new wxHtmlHelpController(); // construct the Help System
- frame->p_Help->UseConfig(p_ProgramCfg); // Don't rember what this was for
- frame->p_Help->AddBook(langhelp); // Use the language set
- frame->pDoc->p_Help = frame->p_Help; // Save the information to the document
- //---------------------------------------------------------------------------------------
- // Show the frame
- frame->Show(TRUE);
- SetTopWindow(frame);
- //---------------------------------------------------------------------------------------
- p_ProgramCfg->Flush(TRUE); // sicher Objekt
- return TRUE;
+ //---------------------------------------------------------------------------------------
+ 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(_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 == _T(""))
+ 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 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(_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;
projects / wxWidgets.git / blobdiff