]> git.saurik.com Git - wxWidgets.git/blob - samples/internat/internat.cpp
fixed bug in generation of thumb scroll events
[wxWidgets.git] / samples / internat / internat.cpp
1 /////////////////////////////////////////////////////////////////////////////
2 // Name: internat.cpp
3 // Purpose: Demonstrates internationalisation (i18n) support
4 // Author: Vadim Zeitlin/Julian Smart
5 // Modified by:
6 // Created: 04/01/98
7 // RCS-ID: $Id$
8 // Copyright: (c) Julian Smart and Markus Holzem
9 // Licence: wxWindows license
10 /////////////////////////////////////////////////////////////////////////////
11
12 #ifdef __GNUG__
13 #pragma implementation
14 #pragma interface
15 #endif
16
17 // For compilers that support precompilation, includes "wx/wx.h".
18 #include "wx/wxprec.h"
19
20 #ifdef __BORLANDC__
21 #pragma hdrstop
22 #endif
23
24 #ifndef WX_PRECOMP
25 #include "wx/wx.h"
26 #endif
27
28 #include "wx/intl.h"
29 #include "wx/file.h"
30 #include "wx/log.h"
31
32 #if defined(__WXGTK__) || defined(__WXX11__) || defined(__WXMOTIF__) || defined(__WXMAC__) || defined(__WXMGL__)
33 #include "mondrian.xpm"
34 #endif
35
36 // Define a new application type
37 class MyApp: public wxApp
38 {
39 public:
40 virtual bool OnInit();
41
42 protected:
43 wxLocale m_locale; // locale we'll be using
44 };
45
46 // Define a new frame type
47 class MyFrame: public wxFrame
48 {
49 public:
50 MyFrame(wxFrame *frame, const wxChar *title, int x, int y, int w, int h,
51 wxLocale& m_locale);
52
53 public:
54 void OnQuit(wxCommandEvent& event);
55 void OnAbout(wxCommandEvent& event);
56 void OnPlay(wxCommandEvent& event);
57 void OnOpen(wxCommandEvent& event);
58
59 DECLARE_EVENT_TABLE()
60
61 wxLocale& m_locale;
62 };
63
64 // ID for the menu commands
65 enum
66 {
67 MINIMAL_QUIT = 1,
68 MINIMAL_TEXT,
69 MINIMAL_ABOUT,
70 MINIMAL_TEST,
71 MINIMAL_OPEN
72 };
73
74 BEGIN_EVENT_TABLE(MyFrame, wxFrame)
75 EVT_MENU(MINIMAL_QUIT, MyFrame::OnQuit)
76 EVT_MENU(MINIMAL_ABOUT, MyFrame::OnAbout)
77 EVT_MENU(MINIMAL_TEST, MyFrame::OnPlay)
78 EVT_MENU(MINIMAL_OPEN, MyFrame::OnOpen)
79 END_EVENT_TABLE()
80
81 IMPLEMENT_APP(MyApp)
82
83
84 // `Main program' equivalent, creating windows and returning main app frame
85 bool MyApp::OnInit()
86 {
87 const wxString langs[] =
88 {
89 _T("(System default)"),
90 _T("French"),
91 _T("German"),
92 _T("Russian"),
93 _T("English"),
94 _T("English (U.S.)")
95 };
96
97 SetExitOnFrameDelete(FALSE);
98 int lng = wxGetSingleChoiceIndex(_T("Please choose language:"), _T("Language"),
99 WXSIZEOF(langs), langs);
100 SetExitOnFrameDelete(TRUE);
101
102 switch (lng)
103 {
104 case 0 : m_locale.Init(wxLANGUAGE_DEFAULT); break;
105 case 1 : m_locale.Init(wxLANGUAGE_FRENCH); break;
106 case 2 : m_locale.Init(wxLANGUAGE_GERMAN); break;
107 case 3 : m_locale.Init(wxLANGUAGE_RUSSIAN); break;
108 case 4 : m_locale.Init(wxLANGUAGE_ENGLISH); break;
109 case -1:
110 case 5 : m_locale.Init(wxLANGUAGE_ENGLISH_US); break;
111 }
112
113 // Initialize the catalogs we'll be using
114 /* not needed any more, done in wxLocale ctor
115 m_locale.AddCatalog("wxstd"); // 1) for library messages
116 */
117 m_locale.AddCatalog(wxT("internat")); // 2) our private one
118 /* this catalog is installed in standard location on Linux systems,
119 it might not be installed on yours - just ignore the errrors
120 or comment out this line then */
121 #ifdef __LINUX__
122 {
123 wxLogNull noLog;
124 m_locale.AddCatalog("fileutils"); // 3) and another just for testing
125 }
126 #endif
127
128 // Create the main frame window
129 MyFrame *frame = new MyFrame((wxFrame *) NULL, _("International wxWindows App"),
130 50, 50, 350, 60, m_locale);
131
132 // Give it an icon
133 frame->SetIcon(wxICON(mondrian));
134
135 // Make a menubar
136 wxMenu *file_menu = new wxMenu;
137 file_menu->Append(MINIMAL_ABOUT, _("&About..."));
138 file_menu->AppendSeparator();
139 file_menu->Append(MINIMAL_QUIT, _("E&xit"));
140
141 wxMenu *test_menu = new wxMenu;
142 test_menu->Append(MINIMAL_OPEN, _("&Open bogus file"));
143 test_menu->Append(MINIMAL_TEST, _("&Play a game"));
144
145 wxMenuBar *menu_bar = new wxMenuBar;
146 menu_bar->Append(file_menu, _("&File"));
147 menu_bar->Append(test_menu, _("&Test"));
148 frame->SetMenuBar(menu_bar);
149
150 // Show the frame
151 frame->Show(TRUE);
152 SetTopWindow(frame);
153
154 return TRUE;
155 }
156
157 // My frame constructor
158 MyFrame::MyFrame(wxFrame *frame, const wxChar *title, int x, int y,
159 int w, int h, wxLocale& l)
160 : wxFrame(frame, -1, title, wxPoint(x, y), wxSize(w, h)),
161 m_locale(l)
162 {
163 }
164
165 void MyFrame::OnQuit(wxCommandEvent& WXUNUSED(event) )
166 {
167 Close(TRUE);
168 }
169
170 void MyFrame::OnAbout(wxCommandEvent& WXUNUSED(event))
171 {
172 wxString localeInfo;
173 localeInfo.Printf(_("Language: %s\nSystem locale name: %s\nCanonical locale name: %s\n"),
174 m_locale.GetLocale(),
175 m_locale.GetSysName().c_str(),
176 m_locale.GetCanonicalName().c_str());
177
178 wxMessageDialog(this, wxString(_("I18n sample\n(c) 1998, 1999 Vadim Zeitlin and Julian Smart"))
179 + wxT("\n\n") + localeInfo,
180 _("About Internat"), wxOK | wxICON_INFORMATION).ShowModal();
181 }
182
183 void MyFrame::OnPlay(wxCommandEvent& WXUNUSED(event))
184 {
185 wxString str = wxGetTextFromUser(_("Enter your number:"),
186 _("Try to guess my number!"),
187 "", this);
188 if ( str.IsEmpty() )
189 return;
190
191 int num;
192 wxSscanf(str, wxT("%d"), &num);
193 if ( num == 0 )
194 str = _("You've probably entered an invalid number.");
195 else if ( num == 9 ) // this message is not translated (not in catalog)
196 str = "You've found a bug in this program!";
197 else if ( num != 17 ) // a more implicit way to write _()
198 str = wxGetTranslation(wxT("Bad luck! try again..."));
199 else {
200 str.Empty();
201 // string must be split in two -- otherwise the translation won't be found
202 str << _("Congratulations! you've won. Here is the magic phrase:")
203 << _("cannot create fifo `%s'");
204 }
205
206 wxMessageBox(str, _("Result"), wxOK | wxICON_INFORMATION);
207 }
208
209 void MyFrame::OnOpen(wxCommandEvent&)
210 {
211 // open a bogus file -- the error message should be also translated if you've
212 // got wxstd.mo somewhere in the search path
213 wxFile file(wxT("NOTEXIST.ING"));
214 }