]> git.saurik.com Git - wxWidgets.git/blob - samples/internat/internat.cpp
added Mingw makefiles
[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
65 DECLARE_EVENT_TABLE()
66
67 wxLocale& m_locale;
68 };
69
70 // ----------------------------------------------------------------------------
71 // constants
72 // ----------------------------------------------------------------------------
73
74 // ID for the menu commands
75 enum
76 {
77 INTERNAT_QUIT = 1,
78 INTERNAT_TEXT,
79 INTERNAT_TEST,
80 INTERNAT_OPEN
81 };
82
83 // ----------------------------------------------------------------------------
84 // wxWindows macros
85 // ----------------------------------------------------------------------------
86
87 BEGIN_EVENT_TABLE(MyFrame, wxFrame)
88 EVT_MENU(INTERNAT_QUIT, MyFrame::OnQuit)
89 EVT_MENU(wxID_ABOUT, MyFrame::OnAbout)
90 EVT_MENU(INTERNAT_TEST, MyFrame::OnPlay)
91 EVT_MENU(INTERNAT_OPEN, MyFrame::OnOpen)
92 END_EVENT_TABLE()
93
94 IMPLEMENT_APP(MyApp)
95
96 // ============================================================================
97 // implementation
98 // ============================================================================
99
100 // ----------------------------------------------------------------------------
101 // MyApp
102 // ----------------------------------------------------------------------------
103
104 // `Main program' equivalent, creating windows and returning main app frame
105 bool MyApp::OnInit()
106 {
107 long lng = -1;
108
109 if ( argc == 2 )
110 {
111 // the parameter must be the lang index
112 wxString tmp(argv[1]);
113 tmp.ToLong(&lng);
114 }
115
116 static const wxLanguage langIds[] =
117 {
118 wxLANGUAGE_DEFAULT,
119 wxLANGUAGE_FRENCH,
120 wxLANGUAGE_GERMAN,
121 wxLANGUAGE_RUSSIAN,
122 wxLANGUAGE_BULGARIAN,
123 #if wxUSE_UNICODE
124 wxLANGUAGE_JAPANESE,
125 wxLANGUAGE_GEORGIAN,
126 #endif
127 wxLANGUAGE_ENGLISH,
128 wxLANGUAGE_ENGLISH_US
129 };
130
131 if ( lng == -1 )
132 {
133 // note that it makes no sense to translate these strings, they are
134 // shown before we set the locale anyhow
135 const wxString langNames[] =
136 {
137 _T("System default"),
138 _T("French"),
139 _T("German"),
140 _T("Russian"),
141 _T("Bulgarian"),
142 #if wxUSE_UNICODE
143 _T("Japanese"),
144 _T("Georgian"),
145 #endif
146 _T("English"),
147 _T("English (U.S.)")
148 };
149
150 // the arrays should be in sync
151 wxCOMPILE_TIME_ASSERT( WXSIZEOF(langNames) == WXSIZEOF(langIds),
152 LangArraysMismatch );
153
154 lng = wxGetSingleChoiceIndex
155 (
156 _T("Please choose language:"),
157 _T("Language"),
158 WXSIZEOF(langNames),
159 langNames
160 );
161 }
162
163 if ( lng != -1 )
164 m_locale.Init(langIds[lng]);
165
166
167 // Initialize the catalogs we'll be using
168 m_locale.AddCatalog(wxT("internat"));
169
170 // this catalog is installed in standard location on Linux systems and
171 // shows that you may make use of the standard message catalogs as well
172 //
173 // if it's not installed on your system, it is just silently ignored
174 #ifdef __LINUX__
175 {
176 wxLogNull noLog;
177 m_locale.AddCatalog(_T("fileutils"));
178 }
179 #endif
180
181 // Create the main frame window
182 MyFrame *frame = new MyFrame(m_locale);
183
184 // Give it an icon
185 frame->SetIcon(wxICON(mondrian));
186
187 // Make a menubar
188 wxMenu *file_menu = new wxMenu;
189 file_menu->Append(wxID_ABOUT, _("&About..."));
190 file_menu->AppendSeparator();
191 file_menu->Append(INTERNAT_QUIT, _("E&xit"));
192
193 wxMenu *test_menu = new wxMenu;
194 test_menu->Append(INTERNAT_OPEN, _("&Open bogus file"));
195 test_menu->Append(INTERNAT_TEST, _("&Play a game"));
196
197 wxMenuBar *menu_bar = new wxMenuBar;
198 menu_bar->Append(file_menu, _("&File"));
199 menu_bar->Append(test_menu, _("&Test"));
200 frame->SetMenuBar(menu_bar);
201
202 // Show the frame
203 frame->Show(TRUE);
204 SetTopWindow(frame);
205
206 return TRUE;
207 }
208
209 // ----------------------------------------------------------------------------
210 // MyFrame
211 // ----------------------------------------------------------------------------
212
213 // main frame constructor
214 MyFrame::MyFrame(wxLocale& locale)
215 : wxFrame(NULL,
216 -1,
217 _("International wxWindows App"),
218 wxPoint(50, 50),
219 wxSize(350, 60)),
220 m_locale(locale)
221 {
222 // Empty
223 }
224
225 void MyFrame::OnQuit(wxCommandEvent& WXUNUSED(event) )
226 {
227 Close(TRUE);
228 }
229
230 void MyFrame::OnAbout(wxCommandEvent& WXUNUSED(event))
231 {
232 wxString localeInfo;
233 wxString locale = m_locale.GetLocale();
234 wxString sysname = m_locale.GetSysName();
235 wxString canname = m_locale.GetCanonicalName();
236
237 localeInfo.Printf(_("Language: %s\nSystem locale name: %s\nCanonical locale name: %s\n"),
238 locale.c_str(), sysname.c_str(), canname.c_str() );
239
240 wxMessageDialog
241 (
242 this,
243 wxString(_("I18n sample\n(c) 1998, 1999 Vadim Zeitlin and Julian Smart"))
244 + wxT("\n\n")
245 + localeInfo,
246 _("About Internat"),
247 wxOK | wxICON_INFORMATION
248 ).ShowModal();
249 }
250
251 void MyFrame::OnPlay(wxCommandEvent& WXUNUSED(event))
252 {
253 wxString str = wxGetTextFromUser
254 (
255 _("Enter your number:"),
256 _("Try to guess my number!"),
257 wxEmptyString,
258 this
259 );
260
261 if ( str.empty() )
262 {
263 // cancelled
264 return;
265 }
266
267 long num;
268 if ( !str.ToLong(&num) || num < 0 )
269 {
270 str = _("You've probably entered an invalid number.");
271 }
272 else if ( num == 9 )
273 {
274 // this message is not translated (not in catalog) because we used _T()
275 // and not _() around it
276 str = _T("You've found a bug in this program!");
277 }
278 else if ( num == 17 )
279 {
280 str.clear();
281
282 // string must be split in two -- otherwise the translation would't be
283 // found
284 str << _("Congratulations! you've won. Here is the magic phrase:")
285 << _("cannot create fifo `%s'");
286 }
287 else
288 {
289 // this is a more implicit way to write _() but note that if you use it
290 // you must ensure that the strings get extracted in the message
291 // catalog as by default xgettext won't do it (it only knows of _(),
292 // not wxGetTranslation())
293 str = wxGetTranslation(_T("Bad luck! try again..."));
294 }
295
296 wxMessageBox(str, _("Result"), wxOK | wxICON_INFORMATION);
297 }
298
299 void MyFrame::OnOpen(wxCommandEvent&)
300 {
301 // open a bogus file -- the error message should be also translated if you've
302 // got wxstd.mo somewhere in the search path
303 wxFile file(wxT("NOTEXIST.ING"));
304 }
305