translate wxMessageDialog labels to the language of the current locale (closes #10962)
[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 // NOTE: don't miss the "readme.txt" file which comes with this sample!
13
14
15
16 // ============================================================================
17 // declarations
18 // ============================================================================
19
20 // ----------------------------------------------------------------------------
21 // headers
22 // ----------------------------------------------------------------------------
23
24 // For compilers that support precompilation, includes "wx/wx.h".
25 #include "wx/wxprec.h"
26
27 #ifdef __BORLANDC__
28 #pragma hdrstop
29 #endif
30
31 #ifndef WX_PRECOMP
32 #include "wx/wx.h"
33 #endif
34
35 #include "wx/intl.h"
36 #include "wx/file.h"
37 #include "wx/log.h"
38 #include "wx/cmdline.h"
39
40 #if defined(__WXGTK__) || defined(__WXX11__) || defined(__WXMOTIF__) || defined(__WXMAC__) || defined(__WXMGL__)
41 #include "mondrian.xpm"
42 #endif
43
44 // ----------------------------------------------------------------------------
45 // private classes
46 // ----------------------------------------------------------------------------
47
48 // Define a new application type
49 class MyApp: public wxApp
50 {
51 public:
52 MyApp() { m_lang = wxLANGUAGE_UNKNOWN; }
53
54 virtual void OnInitCmdLine(wxCmdLineParser& parser);
55 virtual bool OnCmdLineParsed(wxCmdLineParser& parser);
56 virtual bool OnInit();
57
58 protected:
59 wxLanguage m_lang; // language specified by user
60 wxLocale m_locale; // locale we'll be using
61 };
62
63 // Define a new frame type
64 class MyFrame: public wxFrame
65 {
66 public:
67 MyFrame(wxLocale& m_locale);
68
69 public:
70 void OnTestLocaleAvail(wxCommandEvent& event);
71 void OnAbout(wxCommandEvent& event);
72 void OnQuit(wxCommandEvent& event);
73
74 void OnPlay(wxCommandEvent& event);
75 void OnOpen(wxCommandEvent& event);
76 void OnTest1(wxCommandEvent& event);
77 void OnTest2(wxCommandEvent& event);
78 void OnTest3(wxCommandEvent& event);
79 void OnTestMsgBox(wxCommandEvent& event);
80
81 DECLARE_EVENT_TABLE()
82
83 wxLocale& m_locale;
84 };
85
86 // ----------------------------------------------------------------------------
87 // constants
88 // ----------------------------------------------------------------------------
89
90 // ID for the menu commands
91 enum
92 {
93 INTERNAT_TEST = wxID_HIGHEST + 1,
94 INTERNAT_PLAY,
95 INTERNAT_TEST_1,
96 INTERNAT_TEST_2,
97 INTERNAT_TEST_3,
98 INTERNAT_TEST_MSGBOX
99 };
100
101 // language data
102 static const wxLanguage langIds[] =
103 {
104 wxLANGUAGE_DEFAULT,
105 wxLANGUAGE_FRENCH,
106 wxLANGUAGE_ITALIAN,
107 wxLANGUAGE_GERMAN,
108 wxLANGUAGE_RUSSIAN,
109 wxLANGUAGE_BULGARIAN,
110 wxLANGUAGE_CZECH,
111 wxLANGUAGE_POLISH,
112 wxLANGUAGE_SWEDISH,
113 #if wxUSE_UNICODE || defined(__WXMOTIF__)
114 wxLANGUAGE_JAPANESE,
115 #endif
116 #if wxUSE_UNICODE
117 wxLANGUAGE_GEORGIAN,
118 wxLANGUAGE_ENGLISH,
119 wxLANGUAGE_ENGLISH_US,
120 wxLANGUAGE_ARABIC,
121 wxLANGUAGE_ARABIC_EGYPT
122 #endif
123 };
124
125 // note that it makes no sense to translate these strings, they are
126 // shown before we set the locale anyhow
127 const wxString langNames[] =
128 {
129 "System default",
130 "French",
131 "Italian",
132 "German",
133 "Russian",
134 "Bulgarian",
135 "Czech",
136 "Polish",
137 "Swedish",
138 #if wxUSE_UNICODE || defined(__WXMOTIF__)
139 "Japanese",
140 #endif
141 #if wxUSE_UNICODE
142 "Georgian",
143 "English",
144 "English (U.S.)",
145 "Arabic",
146 "Arabic (Egypt)"
147 #endif
148 };
149
150 // the arrays must be in sync
151 wxCOMPILE_TIME_ASSERT( WXSIZEOF(langNames) == WXSIZEOF(langIds),
152 LangArraysMismatch );
153
154 // ----------------------------------------------------------------------------
155 // wxWidgets macros
156 // ----------------------------------------------------------------------------
157
158 BEGIN_EVENT_TABLE(MyFrame, wxFrame)
159 EVT_MENU(INTERNAT_TEST, MyFrame::OnTestLocaleAvail)
160 EVT_MENU(wxID_ABOUT, MyFrame::OnAbout)
161 EVT_MENU(wxID_EXIT, MyFrame::OnQuit)
162
163 EVT_MENU(INTERNAT_PLAY, MyFrame::OnPlay)
164 EVT_MENU(wxID_OPEN, MyFrame::OnOpen)
165 EVT_MENU(INTERNAT_TEST_1, MyFrame::OnTest1)
166 EVT_MENU(INTERNAT_TEST_2, MyFrame::OnTest2)
167 EVT_MENU(INTERNAT_TEST_3, MyFrame::OnTest3)
168 EVT_MENU(INTERNAT_TEST_MSGBOX, MyFrame::OnTestMsgBox)
169 END_EVENT_TABLE()
170
171 IMPLEMENT_APP(MyApp)
172
173 // ============================================================================
174 // implementation
175 // ============================================================================
176
177 // ----------------------------------------------------------------------------
178 // MyApp
179 // ----------------------------------------------------------------------------
180
181 // command line arguments handling
182 void MyApp::OnInitCmdLine(wxCmdLineParser& parser)
183 {
184 parser.AddParam(_("locale"),
185 wxCMD_LINE_VAL_STRING,
186 wxCMD_LINE_PARAM_OPTIONAL);
187
188 wxApp::OnInitCmdLine(parser);
189 }
190
191 bool MyApp::OnCmdLineParsed(wxCmdLineParser& parser)
192 {
193 if ( !wxApp::OnCmdLineParsed(parser) )
194 return false;
195
196 if ( parser.GetParamCount() )
197 {
198 const wxString loc = parser.GetParam();
199 const wxLanguageInfo * const lang = wxLocale::FindLanguageInfo(loc);
200 if ( !lang )
201 {
202 wxLogError(_("Locale \"%s\" is unknown."), loc);
203 return false;
204 }
205
206 m_lang = static_cast<wxLanguage>(lang->Language);
207 }
208
209 return true;
210 }
211
212 // `Main program' equivalent, creating windows and returning main app frame
213 bool MyApp::OnInit()
214 {
215 if ( !wxApp::OnInit() )
216 return false;
217
218 if ( m_lang == wxLANGUAGE_UNKNOWN )
219 {
220 int lng = wxGetSingleChoiceIndex
221 (
222 _("Please choose language:"),
223 _("Language"),
224 WXSIZEOF(langNames),
225 langNames
226 );
227 m_lang = lng == -1 ? wxLANGUAGE_DEFAULT : langIds[lng];
228 }
229
230 // don't use wxLOCALE_LOAD_DEFAULT flag so that Init() doesn't return
231 // false just because it failed to load wxstd catalog
232 if ( !m_locale.Init(m_lang, wxLOCALE_CONV_ENCODING) )
233 {
234 wxLogWarning(_("This language is not supported by the system."));
235
236 // continue nevertheless
237 }
238
239 // normally this wouldn't be necessary as the catalog files would be found
240 // in the default locations, but when the program is not installed the
241 // catalogs are in the build directory where we wouldn't find them by
242 // default
243 wxLocale::AddCatalogLookupPathPrefix(".");
244
245 // Initialize the catalogs we'll be using
246 const wxLanguageInfo* pInfo = wxLocale::GetLanguageInfo(m_lang);
247 if (!m_locale.AddCatalog("internat"))
248 wxLogError(_("Couldn't find/load the 'internat' catalog for locale '%s'."),
249 pInfo ? pInfo->GetLocaleName() : _("unknown"));
250
251 // Now try to add wxstd.mo so that loading "NOTEXIST.ING" file will produce
252 // a localized error message:
253 m_locale.AddCatalog("wxstd.mo");
254 // NOTE: it's not an error if we couldn't find it!
255
256 // this catalog is installed in standard location on Linux systems and
257 // shows that you may make use of the standard message catalogs as well
258 //
259 // if it's not installed on your system, it is just silently ignored
260 #ifdef __LINUX__
261 {
262 wxLogNull noLog;
263 m_locale.AddCatalog("fileutils");
264 }
265 #endif
266
267 // Create the main frame window
268 MyFrame *frame = new MyFrame(m_locale);
269
270 // Show the frame
271 frame->Show(true);
272 SetTopWindow(frame);
273
274 return true;
275 }
276
277 // ----------------------------------------------------------------------------
278 // MyFrame
279 // ----------------------------------------------------------------------------
280
281 // main frame constructor
282 MyFrame::MyFrame(wxLocale& locale)
283 : wxFrame(NULL,
284 wxID_ANY,
285 _("International wxWidgets App")),
286 m_locale(locale)
287 {
288 SetIcon(wxICON(mondrian));
289
290 // Make a menubar
291 wxMenu *file_menu = new wxMenu;
292 file_menu->Append(INTERNAT_TEST, _("&Test locale availability...\tCtrl-T"));
293 file_menu->AppendSeparator();
294
295 // since wxID_ABOUT and wxID_EXIT are stock IDs they will automatically get
296 // translated help strings; nice isn't it?
297 file_menu->Append(wxID_ABOUT, _("&About..."));
298 file_menu->AppendSeparator();
299 file_menu->Append(wxID_EXIT, _("E&xit"));
300
301 wxMenu *test_menu = new wxMenu;
302 test_menu->Append(wxID_OPEN, _("&Open bogus file"), _("Shows a wxWidgets localized error message"));
303 test_menu->Append(INTERNAT_PLAY, _("&Play a game"), _("A little game; hint: 17 is a lucky number for many"));
304 test_menu->AppendSeparator();
305 test_menu->Append(INTERNAT_TEST_1, _("&1 _() (gettext)"), _("Tests the _() macro"));
306 test_menu->Append(INTERNAT_TEST_2, _("&2 _N() (ngettext)"), _("Tests the _N() macro"));
307 test_menu->Append(INTERNAT_TEST_3, _("&3 wxTRANSLATE() (gettext_noop)"), _("Tests the wxTRANSLATE() macro"));
308 test_menu->Append(INTERNAT_TEST_MSGBOX, _("&Message box test"),
309 _("Tests message box buttons labels translation"));
310
311 wxMenuBar *menu_bar = new wxMenuBar;
312 menu_bar->Append(file_menu, _("&File"));
313 menu_bar->Append(test_menu, _("&Test"));
314 SetMenuBar(menu_bar);
315
316 // this demonstrates RTL support in wxStatusBar:
317 CreateStatusBar(1);
318
319 // this demonstrates RTL layout mirroring for Arabic locales
320 wxSizer *sizer = new wxBoxSizer(wxHORIZONTAL);
321 sizer->Add(new wxStaticText(this, wxID_ANY, _("First")),
322 wxSizerFlags().Border());
323 sizer->Add(new wxStaticText(this, wxID_ANY, _("Second")),
324 wxSizerFlags().Border());
325 SetSizer(sizer);
326 }
327
328 void MyFrame::OnQuit(wxCommandEvent& WXUNUSED(event) )
329 {
330 Close(true);
331 }
332
333 void MyFrame::OnAbout(wxCommandEvent& WXUNUSED(event))
334 {
335 wxString localeInfo;
336 wxString locale = m_locale.GetLocale();
337 wxString sysname = m_locale.GetSysName();
338 wxString canname = m_locale.GetCanonicalName();
339
340 localeInfo.Printf(_("Language: %s\nSystem locale name: %s\nCanonical locale name: %s\n"),
341 locale.c_str(), sysname.c_str(), canname.c_str() );
342
343 wxMessageDialog dlg(
344 this,
345 wxString(_("I18n sample\n(c) 1998, 1999 Vadim Zeitlin and Julian Smart"))
346 + "\n\n"
347 + localeInfo,
348 _("About Internat"),
349 wxOK | wxICON_INFORMATION
350 );
351 dlg.ShowModal();
352 }
353
354 void MyFrame::OnPlay(wxCommandEvent& WXUNUSED(event))
355 {
356 wxString str = wxGetTextFromUser
357 (
358 _("Enter your number:"),
359 _("Try to guess my number!"),
360 wxEmptyString,
361 this
362 );
363
364 if ( str.empty() )
365 {
366 // cancelled
367 return;
368 }
369
370 long num;
371 if ( !str.ToLong(&num) || num < 0 )
372 {
373 str = _("You've probably entered an invalid number.");
374 }
375 else if ( num == 9 )
376 {
377 // this message is not translated (not in catalog) because we used _T()
378 // and not _() around it
379 str = _T("You've found a bug in this program!");
380 }
381 else if ( num == 17 )
382 {
383 str.clear();
384
385 // string must be split in two -- otherwise the translation would't be
386 // found
387 str << _("Congratulations! you've won. Here is the magic phrase:")
388 << _("cannot create fifo `%s'");
389 }
390 else
391 {
392 // this is a more implicit way to write _() but note that if you use it
393 // you must ensure that the strings get extracted in the message
394 // catalog as by default xgettext won't do it; it only knows of _(),
395 // not of wxTRANSLATE(). As internat's readme.txt says you should thus
396 // call xgettext with -kwxTRANSLATE.
397 str = wxGetTranslation(wxTRANSLATE("Bad luck! try again..."));
398
399 // note also that if we want 'str' to contain a localized string
400 // we need to use wxGetTranslation explicitely as wxTRANSLATE just
401 // tells xgettext to extract the string but has no effect on the
402 // runtime of the program!
403 }
404
405 wxMessageBox(str, _("Result"), wxOK | wxICON_INFORMATION);
406 }
407
408 void MyFrame::OnTestLocaleAvail(wxCommandEvent& WXUNUSED(event))
409 {
410 static wxString s_locale;
411 wxString locale = wxGetTextFromUser
412 (
413 _("Enter the locale to test"),
414 wxGetTextFromUserPromptStr,
415 s_locale,
416 this
417 );
418 if ( locale.empty() )
419 return;
420
421 s_locale = locale;
422 const wxLanguageInfo * const info = wxLocale::FindLanguageInfo(s_locale);
423 if ( !info )
424 {
425 wxLogError(_("Locale \"%s\" is unknown."), s_locale.c_str());
426 return;
427 }
428
429 if ( wxLocale::IsAvailable(info->Language) )
430 wxLogMessage(_("Locale \"%s\" is available."), s_locale.c_str());
431 else
432 wxLogWarning(_("Locale \"%s\" is not available."), s_locale.c_str());
433 }
434
435 void MyFrame::OnOpen(wxCommandEvent& WXUNUSED(event))
436 {
437 // open a bogus file -- the error message should be also translated if
438 // you've got wxstd.mo somewhere in the search path (see MyApp::OnInit)
439 wxFile file("NOTEXIST.ING");
440 }
441
442 void MyFrame::OnTest1(wxCommandEvent& WXUNUSED(event))
443 {
444 const wxString& title = _("Testing _() (gettext)");
445
446 // NOTE: using the wxTRANSLATE() macro here we won't show a localized
447 // string in the text entry dialog; we'll simply show the un-translated
448 // string; however if the user press "ok" without altering the text,
449 // since the "default value" string has been extracted by xgettext
450 // the wxGetTranslation call later will manage to return a localized
451 // string
452 wxTextEntryDialog d(this, _("Please enter text to translate"),
453 title, wxTRANSLATE("default value"));
454
455 if (d.ShowModal() == wxID_OK)
456 {
457 wxString v = d.GetValue();
458 wxString s(title);
459 s << "\n" << v << " -> "
460 << wxGetTranslation(v.c_str()) << "\n";
461 wxMessageBox(s);
462 }
463 }
464
465 void MyFrame::OnTest2(wxCommandEvent& WXUNUSED(event))
466 {
467 const wxString& title = _("Testing _N() (ngettext)");
468 wxTextEntryDialog d(this,
469 _("Please enter range for plural forms of \"n files deleted\" phrase"),
470 title, "0-10");
471
472 if (d.ShowModal() == wxID_OK)
473 {
474 int first, last;
475 wxSscanf(d.GetValue(), "%d-%d", &first, &last);
476 wxString s(title);
477 s << "\n";
478 for (int n = first; n <= last; ++n)
479 {
480 s << n << " " <<
481 wxPLURAL("file deleted", "files deleted", n) <<
482 "\n";
483 }
484 wxMessageBox(s);
485 }
486 }
487
488 void MyFrame::OnTest3(wxCommandEvent& WXUNUSED(event))
489 {
490 const char* lines[] =
491 {
492 wxTRANSLATE("line 1"),
493 wxTRANSLATE("line 2"),
494 wxTRANSLATE("line 3"),
495 };
496
497 wxString s(_("Testing wxTRANSLATE() (gettext_noop)"));
498 s << "\n";
499 for (size_t i = 0; i < WXSIZEOF(lines); ++i)
500 {
501 s << lines[i] << " -> " << wxGetTranslation(lines[i]) << "\n";
502 }
503 wxMessageBox(s);
504 }
505
506 void MyFrame::OnTestMsgBox(wxCommandEvent& WXUNUSED(event))
507 {
508 if ( wxMessageBox
509 (
510 _("Are the labels of the buttons in this message box "
511 "translated into the current locale language?"),
512 _("wxWidgets i18n sample"),
513 wxYES_NO,
514 this
515 ) != wxYES )
516 {
517 wxMessageBox(_("Please report the details of your platform to us."));
518 }
519 }