Applied patch [ 1217859 ] Swedish translation for the internat sample
[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
9 // Licence: wxWindows license
10 /////////////////////////////////////////////////////////////////////////////
11
12 // ============================================================================
13 // declarations
14 // ============================================================================
15
16 // ----------------------------------------------------------------------------
17 // headers
18 // ----------------------------------------------------------------------------
19
20 // For compilers that support precompilation, includes "wx/wx.h".
21 #include "wx/wxprec.h"
22
23 #ifdef __BORLANDC__
24 #pragma hdrstop
25 #endif
26
27 #ifndef WX_PRECOMP
28 #include "wx/wx.h"
29 #endif
30
31 #include "wx/intl.h"
32 #include "wx/file.h"
33 #include "wx/log.h"
34
35 #if defined(__WXGTK__) || defined(__WXX11__) || defined(__WXMOTIF__) || defined(__WXMAC__) || defined(__WXMGL__)
36 #include "mondrian.xpm"
37 #endif
38
39 // ----------------------------------------------------------------------------
40 // private classes
41 // ----------------------------------------------------------------------------
42
43 // Define a new application type
44 class MyApp: public wxApp
45 {
46 public:
47 virtual bool OnInit();
48
49 protected:
50 wxLocale m_locale; // locale we'll be using
51 };
52
53 // Define a new frame type
54 class MyFrame: public wxFrame
55 {
56 public:
57 MyFrame(wxLocale& m_locale);
58
59 public:
60 void OnQuit(wxCommandEvent& event);
61 void OnAbout(wxCommandEvent& event);
62 void OnPlay(wxCommandEvent& event);
63 void OnOpen(wxCommandEvent& event);
64 void OnTest1(wxCommandEvent& event);
65 void OnTest2(wxCommandEvent& event);
66 void OnTest3(wxCommandEvent& event);
67
68 DECLARE_EVENT_TABLE()
69
70 wxLocale& m_locale;
71 };
72
73 // ----------------------------------------------------------------------------
74 // constants
75 // ----------------------------------------------------------------------------
76
77 // ID for the menu commands
78 enum
79 {
80 INTERNAT_TEXT = wxID_HIGHEST + 1,
81 INTERNAT_TEST,
82 INTERNAT_TEST_1,
83 INTERNAT_TEST_2,
84 INTERNAT_TEST_3,
85 INTERNAT_OPEN
86 };
87
88 // ----------------------------------------------------------------------------
89 // wxWidgets macros
90 // ----------------------------------------------------------------------------
91
92 BEGIN_EVENT_TABLE(MyFrame, wxFrame)
93 EVT_MENU(wxID_EXIT, MyFrame::OnQuit)
94 EVT_MENU(wxID_ABOUT, MyFrame::OnAbout)
95 EVT_MENU(INTERNAT_TEST, MyFrame::OnPlay)
96 EVT_MENU(INTERNAT_OPEN, MyFrame::OnOpen)
97 EVT_MENU(INTERNAT_TEST_1, MyFrame::OnTest1)
98 EVT_MENU(INTERNAT_TEST_2, MyFrame::OnTest2)
99 EVT_MENU(INTERNAT_TEST_3, MyFrame::OnTest3)
100 END_EVENT_TABLE()
101
102 IMPLEMENT_APP(MyApp)
103
104 // ============================================================================
105 // implementation
106 // ============================================================================
107
108 // ----------------------------------------------------------------------------
109 // MyApp
110 // ----------------------------------------------------------------------------
111
112 // `Main program' equivalent, creating windows and returning main app frame
113 bool MyApp::OnInit()
114 {
115 long lng = -1;
116
117 if ( argc == 2 )
118 {
119 // the parameter must be the lang index
120 wxString tmp(argv[1]);
121 tmp.ToLong(&lng);
122 }
123
124 static const wxLanguage langIds[] =
125 {
126 wxLANGUAGE_DEFAULT,
127 wxLANGUAGE_FRENCH,
128 wxLANGUAGE_GERMAN,
129 wxLANGUAGE_RUSSIAN,
130 wxLANGUAGE_BULGARIAN,
131 wxLANGUAGE_CZECH,
132 wxLANGUAGE_POLISH,
133 wxLANGUAGE_SWEDISH,
134 #if wxUSE_UNICODE
135 wxLANGUAGE_JAPANESE,
136 wxLANGUAGE_GEORGIAN,
137 #endif
138 wxLANGUAGE_ENGLISH,
139 wxLANGUAGE_ENGLISH_US
140 };
141
142 if ( lng == -1 )
143 {
144 // note that it makes no sense to translate these strings, they are
145 // shown before we set the locale anyhow
146 const wxString langNames[] =
147 {
148 _T("System default"),
149 _T("French"),
150 _T("German"),
151 _T("Russian"),
152 _T("Bulgarian"),
153 _T("Czech"),
154 _T("Polish"),
155 _T("Swedish"),
156 #if wxUSE_UNICODE
157 _T("Japanese"),
158 _T("Georgian"),
159 #endif
160 _T("English"),
161 _T("English (U.S.)")
162 };
163
164 // the arrays should be in sync
165 wxCOMPILE_TIME_ASSERT( WXSIZEOF(langNames) == WXSIZEOF(langIds),
166 LangArraysMismatch );
167
168 lng = wxGetSingleChoiceIndex
169 (
170 _T("Please choose language:"),
171 _T("Language"),
172 WXSIZEOF(langNames),
173 langNames
174 );
175 }
176
177 if ( lng != -1 )
178 m_locale.Init(langIds[lng]);
179
180 // normally this wouldn't be necessary as the catalog files would be found
181 // in the default locations, but under Windows then the program is not
182 // installed the catalogs are in the parent directory (because the binary
183 // is in a subdirectory of samples/internat) where we wouldn't find them by
184 // default
185 wxLocale::AddCatalogLookupPathPrefix(wxT("."));
186 wxLocale::AddCatalogLookupPathPrefix(wxT(".."));
187
188 // Initialize the catalogs we'll be using
189 m_locale.AddCatalog(wxT("internat"));
190
191 // this catalog is installed in standard location on Linux systems and
192 // shows that you may make use of the standard message catalogs as well
193 //
194 // if it's not installed on your system, it is just silently ignored
195 #ifdef __LINUX__
196 {
197 wxLogNull noLog;
198 m_locale.AddCatalog(_T("fileutils"));
199 }
200 #endif
201
202 // Create the main frame window
203 MyFrame *frame = new MyFrame(m_locale);
204
205 // Give it an icon
206 frame->SetIcon(wxICON(mondrian));
207
208 // Make a menubar
209 wxMenu *file_menu = new wxMenu;
210 file_menu->Append(wxID_ABOUT, _("&About..."));
211 file_menu->AppendSeparator();
212 file_menu->Append(wxID_EXIT, _("E&xit"));
213
214 wxMenu *test_menu = new wxMenu;
215 test_menu->Append(INTERNAT_OPEN, _("&Open bogus file"));
216 test_menu->Append(INTERNAT_TEST, _("&Play a game"));
217 test_menu->AppendSeparator();
218 test_menu->Append(INTERNAT_TEST_1, _("&1 _() (gettext)"));
219 test_menu->Append(INTERNAT_TEST_2, _("&2 _N() (ngettext)"));
220 test_menu->Append(INTERNAT_TEST_3, _("&3 wxTRANSLATE() (gettext_noop)"));
221
222 wxMenuBar *menu_bar = new wxMenuBar;
223 menu_bar->Append(file_menu, _("&File"));
224 menu_bar->Append(test_menu, _("&Test"));
225 frame->SetMenuBar(menu_bar);
226
227 // Show the frame
228 frame->Show(true);
229 SetTopWindow(frame);
230
231 return true;
232 }
233
234 // ----------------------------------------------------------------------------
235 // MyFrame
236 // ----------------------------------------------------------------------------
237
238 // main frame constructor
239 MyFrame::MyFrame(wxLocale& locale)
240 : wxFrame(NULL,
241 wxID_ANY,
242 _("International wxWidgets App")),
243 m_locale(locale)
244 {
245 // Empty
246 }
247
248 void MyFrame::OnQuit(wxCommandEvent& WXUNUSED(event) )
249 {
250 Close(true);
251 }
252
253 void MyFrame::OnAbout(wxCommandEvent& WXUNUSED(event))
254 {
255 wxString localeInfo;
256 wxString locale = m_locale.GetLocale();
257 wxString sysname = m_locale.GetSysName();
258 wxString canname = m_locale.GetCanonicalName();
259
260 localeInfo.Printf(_("Language: %s\nSystem locale name:\n%s\nCanonical locale name: %s\n"),
261 locale.c_str(), sysname.c_str(), canname.c_str() );
262
263 wxMessageDialog dlg(
264 this,
265 wxString(_("I18n sample\n(c) 1998, 1999 Vadim Zeitlin and Julian Smart"))
266 + wxT("\n\n")
267 + localeInfo,
268 _("About Internat"),
269 wxOK | wxICON_INFORMATION
270 );
271 dlg.ShowModal();
272 }
273
274 void MyFrame::OnPlay(wxCommandEvent& WXUNUSED(event))
275 {
276 wxString str = wxGetTextFromUser
277 (
278 _("Enter your number:"),
279 _("Try to guess my number!"),
280 wxEmptyString,
281 this
282 );
283
284 if ( str.empty() )
285 {
286 // cancelled
287 return;
288 }
289
290 long num;
291 if ( !str.ToLong(&num) || num < 0 )
292 {
293 str = _("You've probably entered an invalid number.");
294 }
295 else if ( num == 9 )
296 {
297 // this message is not translated (not in catalog) because we used _T()
298 // and not _() around it
299 str = _T("You've found a bug in this program!");
300 }
301 else if ( num == 17 )
302 {
303 str.clear();
304
305 // string must be split in two -- otherwise the translation would't be
306 // found
307 str << _("Congratulations! you've won. Here is the magic phrase:")
308 << _("cannot create fifo `%s'");
309 }
310 else
311 {
312 // this is a more implicit way to write _() but note that if you use it
313 // you must ensure that the strings get extracted in the message
314 // catalog as by default xgettext won't do it (it only knows of _(),
315 // not wxGetTranslation())
316 str = wxGetTranslation(_T("Bad luck! try again..."));
317 }
318
319 wxMessageBox(str, _("Result"), wxOK | wxICON_INFORMATION);
320 }
321
322 void MyFrame::OnOpen(wxCommandEvent&)
323 {
324 // open a bogus file -- the error message should be also translated if
325 // you've got wxstd.mo somewhere in the search path
326 wxFile file(wxT("NOTEXIST.ING"));
327 }
328
329 void MyFrame::OnTest1(wxCommandEvent& WXUNUSED(event))
330 {
331 const wxChar* title = _("Testing _() (gettext)");
332 wxTextEntryDialog d(this, _("Please enter text to translate"),
333 title, wxTRANSLATE("default value"));
334 if (d.ShowModal() == wxID_OK)
335 {
336 wxString v = d.GetValue();
337 wxString s(title);
338 s << _T("\n") << v << _T(" -> ")
339 << wxGetTranslation(v.c_str()) << _T("\n");
340 wxMessageBox(s);
341 }
342 }
343
344 void MyFrame::OnTest2(wxCommandEvent& WXUNUSED(event))
345 {
346 const wxChar* title = _("Testing _N() (ngettext)");
347 wxTextEntryDialog d(this,
348 _("Please enter range for plural forms of \"n files deleted\" phrase"),
349 title, _T("0-10"));
350 if (d.ShowModal() == wxID_OK)
351 {
352 int first, last;
353 wxSscanf(d.GetValue(), _T("%d-%d"), &first, &last);
354 wxString s(title);
355 s << _T("\n");
356 for (int n = first; n <= last; ++n)
357 {
358 s << n << _T(" ") <<
359 wxPLURAL("file deleted", "files deleted", n) <<
360 _T("\n");
361 }
362 wxMessageBox(s);
363 }
364 }
365
366 void MyFrame::OnTest3(wxCommandEvent& WXUNUSED(event))
367 {
368 const wxChar* lines[] =
369 {
370 wxTRANSLATE("line 1"),
371 wxTRANSLATE("line 2"),
372 wxTRANSLATE("line 3"),
373 };
374 wxString s(_("Testing wxTRANSLATE() (gettext_noop)"));
375 s << _T("\n");
376 for (size_t i = 0; i < WXSIZEOF(lines); ++i)
377 {
378 s << lines[i] << _T(" -> ") << wxGetTranslation(lines[i]) << _T("\n");
379 }
380 wxMessageBox(s);
381 }
382
383