include xpm files for Mac OS after correction of wxICON macro
[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__) || defined(__WXMAC__)
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 wxLocale& m_locale);
52
53 public:
54 void OnQuit(wxCommandEvent& event);
55 void OnAbout(wxCommandEvent& event);
56 void OnPlay(wxCommandEvent& event);
57 void OnOpen(wxCommandEvent& event);
58
59 DECLARE_EVENT_TABLE()
60
61 wxLocale& m_locale;
62 };
63
64 // ID for the menu commands
65 enum
66 {
67 MINIMAL_QUIT = 1,
68 MINIMAL_TEXT,
69 MINIMAL_ABOUT,
70 MINIMAL_TEST,
71 MINIMAL_OPEN
72 };
73
74 BEGIN_EVENT_TABLE(MyFrame, wxFrame)
75 EVT_MENU(MINIMAL_QUIT, MyFrame::OnQuit)
76 EVT_MENU(MINIMAL_ABOUT, MyFrame::OnAbout)
77 EVT_MENU(MINIMAL_TEST, MyFrame::OnPlay)
78 EVT_MENU(MINIMAL_OPEN, MyFrame::OnOpen)
79 END_EVENT_TABLE()
80
81 IMPLEMENT_APP(MyApp)
82
83
84 // `Main program' equivalent, creating windows and returning main app frame
85 bool MyApp::OnInit()
86 {
87 wxString langs[] = {_T("(System default)"),
88 _T("French"),
89 _T("German"),
90 _T("English"),
91 _T("English (U.S.)")};
92 SetExitOnFrameDelete(FALSE);
93 int lng = wxGetSingleChoiceIndex(_T("Please choose language:"), _T("Language"),
94 5, langs);
95 SetExitOnFrameDelete(TRUE);
96
97 switch (lng)
98 {
99 case 0 : m_locale.Init(wxLANGUAGE_DEFAULT); break;
100 case 1 : m_locale.Init(wxLANGUAGE_FRENCH); break;
101 case 2 : m_locale.Init(wxLANGUAGE_GERMAN); break;
102 case 3 : m_locale.Init(wxLANGUAGE_ENGLISH); break;
103 case 4 : m_locale.Init(wxLANGUAGE_ENGLISH_US); break;
104 default:
105 return FALSE;
106 }
107
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, m_locale);
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 wxLocale& l)
153 : wxFrame(frame, -1, title, wxPoint(x, y), wxSize(w, h)),
154 m_locale(l)
155 {
156 }
157
158 void MyFrame::OnQuit(wxCommandEvent& WXUNUSED(event) )
159 {
160 Close(TRUE);
161 }
162
163 void MyFrame::OnAbout(wxCommandEvent& WXUNUSED(event))
164 {
165 wxString localeInfo;
166 localeInfo.Printf(_("Language: %s\n"
167 "System locale name: %s\n"
168 "Canonical locale name: %s\n"),
169 m_locale.GetLocale(),
170 m_locale.GetSysName().c_str(),
171 m_locale.GetCanonicalName().c_str());
172
173 wxMessageDialog(this, wxString(_("I18n sample\n"
174 "(c) 1998, 1999 Vadim Zeitlin and Julian Smart"))
175 + wxT("\n\n") + localeInfo,
176 _("About Internat"), wxOK | wxICON_INFORMATION).ShowModal();
177 }
178
179 void MyFrame::OnPlay(wxCommandEvent& WXUNUSED(event))
180 {
181 wxString str = wxGetTextFromUser(_("Enter your number:"),
182 _("Try to guess my number!"),
183 "", this);
184 if ( str.IsEmpty() )
185 return;
186
187 int num;
188 sscanf(str, "%d", &num);
189 if ( num == 0 )
190 str = _("You've probably entered an invalid number.");
191 else if ( num == 9 ) // this message is not translated (not in catalog)
192 str = "You've found a bug in this program!";
193 else if ( num != 17 ) // a more implicit way to write _()
194 str = wxGetTranslation("Bad luck! try again...");
195 else {
196 str.Empty();
197 // string must be split in two -- otherwise the translation won't be found
198 str << _("Congratulations! you've won. Here is the magic phrase:")
199 << _("cannot create fifo `%s'");
200 }
201
202 wxMessageBox(str, _("Result"), wxOK | wxICON_INFORMATION);
203 }
204
205 void MyFrame::OnOpen(wxCommandEvent&)
206 {
207 // open a bogus file -- the error message should be also translated if you've
208 // got wxstd.mo somewhere in the search path
209 wxFile file("NOTEXIST.ING");
210 }