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