1. aapplied patch for bcc makefiles from Ricky Gonzales
[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(__WXMOTIF__)
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 char *title, int x, int y, int w, int h);
51
52 public:
53 void OnQuit(wxCommandEvent& event);
54 void OnAbout(wxCommandEvent& event);
55 void OnPlay(wxCommandEvent& event);
56 void OnOpen(wxCommandEvent& event);
57
58 DECLARE_EVENT_TABLE()
59 };
60
61 // ID for the menu commands
62 enum
63 {
64 MINIMAL_QUIT = 1,
65 MINIMAL_TEXT,
66 MINIMAL_ABOUT,
67 MINIMAL_TEST,
68 MINIMAL_OPEN
69 };
70
71 BEGIN_EVENT_TABLE(MyFrame, wxFrame)
72 EVT_MENU(MINIMAL_QUIT, MyFrame::OnQuit)
73 EVT_MENU(MINIMAL_ABOUT, MyFrame::OnAbout)
74 EVT_MENU(MINIMAL_TEST, MyFrame::OnPlay)
75 EVT_MENU(MINIMAL_OPEN, MyFrame::OnOpen)
76 END_EVENT_TABLE()
77
78 IMPLEMENT_APP(MyApp)
79
80
81 // `Main program' equivalent, creating windows and returning main app frame
82 bool MyApp::OnInit()
83 {
84 // set the language to use
85 const char *language = NULL;
86 const char *langid = NULL;
87 switch ( argc )
88 {
89 default:
90 // ignore the other args, fall through
91
92 case 3:
93 language = argv[1];
94 langid = argv[2];
95 break;
96
97 case 2:
98 language = argv[1];
99 break;
100
101 case 1:
102 language = "french";
103 langid = "fr";
104 };
105
106 // there are very few systems right now which support locales other than "C"
107 m_locale.Init(language, langid, "C");
108
109 // Initialize the catalogs we'll be using
110 /* not needed any more, done in wxLocale ctor
111 m_locale.AddCatalog("wxstd"); // 1) for library messages
112 */
113 m_locale.AddCatalog("internat"); // 2) our private one
114 /* this catalog is installed in standard location on Linux systems,
115 it might not be installed on yours - just ignore the errrors
116 or comment out this line then */
117 #ifdef __LINUX__
118 m_locale.AddCatalog("fileutils"); // 3) and another just for testing
119 #endif
120
121 // Create the main frame window
122 MyFrame *frame = new MyFrame((wxFrame *) NULL, _("International wxWindows App"),
123 50, 50, 350, 60);
124
125 // Give it an icon
126 frame->SetIcon(wxICON(mondrian));
127
128 // Make a menubar
129 wxMenu *file_menu = new wxMenu;
130 file_menu->Append(MINIMAL_ABOUT, _("&About..."));
131 file_menu->AppendSeparator();
132 file_menu->Append(MINIMAL_QUIT, _("E&xit"));
133
134 wxMenu *test_menu = new wxMenu;
135 test_menu->Append(MINIMAL_OPEN, _("&Open bogus file"));
136 test_menu->Append(MINIMAL_TEST, _("&Play a game"));
137
138 wxMenuBar *menu_bar = new wxMenuBar;
139 menu_bar->Append(file_menu, _("&File"));
140 menu_bar->Append(test_menu, _("&Test"));
141 frame->SetMenuBar(menu_bar);
142
143 // Show the frame
144 frame->Show(TRUE);
145 SetTopWindow(frame);
146
147 return TRUE;
148 }
149
150 // My frame constructor
151 MyFrame::MyFrame(wxFrame *frame, const char *title, int x, int y, int w, int h)
152 : wxFrame(frame, -1, title, wxPoint(x, y), wxSize(w, h))
153 {
154 }
155
156 void MyFrame::OnQuit(wxCommandEvent& WXUNUSED(event) )
157 {
158 Close(TRUE);
159 }
160
161 void MyFrame::OnAbout(wxCommandEvent& WXUNUSED(event))
162 {
163 wxMessageDialog(this, _("I18n sample\n"
164 "© 1998, 1999 Vadim Zeitlin and Julian Smart"),
165 _("About Internat"), wxOK | wxICON_INFORMATION).ShowModal();
166 }
167
168 void MyFrame::OnPlay(wxCommandEvent& WXUNUSED(event))
169 {
170 wxString str = wxGetTextFromUser(_("Enter your number:"),
171 _("Try to guess my number!"),
172 "", this);
173 if ( str.IsEmpty() )
174 return;
175
176 int num;
177 sscanf(str, "%d", &num);
178 if ( num == 0 )
179 str = _("You've probably entered an invalid number.");
180 else if ( num == 9 ) // this message is not translated (not in catalog)
181 str = "You've found a bug in this program!";
182 else if ( num != 17 ) // a more implicit way to write _()
183 str = wxGetTranslation("Bad luck! try again...");
184 else {
185 str.Empty();
186 // string must be split in two -- otherwise the translation won't be found
187 str << _("Congratulations! you've won. Here is the magic phrase:")
188 << _("cannot create fifo `%s'");
189 }
190
191 wxMessageBox(str, _("Result"), wxOK | wxICON_INFORMATION);
192 }
193
194 void MyFrame::OnOpen(wxCommandEvent&)
195 {
196 // open a bogus file -- the error message should be also translated if you've
197 // got wxstd.mo somewhere in the search path
198 wxFile file("NOTEXIST.ING");
199 }