1 /////////////////////////////////////////////////////////////////////////////
3 // Purpose: Demonstrates internationalisation (i18n) support
4 // Author: Vadim Zeitlin/Julian Smart
8 // Copyright: (c) Julian Smart and Markus Holzem
9 // Licence: wxWindows license
10 /////////////////////////////////////////////////////////////////////////////
13 #pragma implementation
17 // For compilers that support precompilation, includes "wx/wx.h".
18 #include "wx/wxprec.h"
32 #if defined(__WXGTK__) || defined(__WXMOTIF__)
33 #include "mondrian.xpm"
36 // Define a new application type
37 class MyApp
: public wxApp
40 virtual bool OnInit();
43 wxLocale m_locale
; // locale we'll be using
46 // Define a new frame type
47 class MyFrame
: public wxFrame
50 MyFrame(wxFrame
*frame
, const char *title
, int x
, int y
, int w
, int h
,
54 void OnQuit(wxCommandEvent
& event
);
55 void OnAbout(wxCommandEvent
& event
);
56 void OnPlay(wxCommandEvent
& event
);
57 void OnOpen(wxCommandEvent
& event
);
64 // ID for the menu commands
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
)
84 // `Main program' equivalent, creating windows and returning main app frame
87 wxString langs
[] = {"(System default)","French","German"};
88 SetExitOnFrameDelete(FALSE
);
89 int lng
= wxGetSingleChoiceIndex("Please choose language:", "Language",
91 SetExitOnFrameDelete(TRUE
);
95 case 0 : m_locale
.Init(wxLANGUAGE_DEFAULT
); break;
96 case 1 : m_locale
.Init(wxLANGUAGE_FRENCH
); break;
97 case 2 : m_locale
.Init(wxLANGUAGE_GERMAN
); break;
103 // Initialize the catalogs we'll be using
104 /* not needed any more, done in wxLocale ctor
105 m_locale.AddCatalog("wxstd"); // 1) for library messages
107 m_locale
.AddCatalog("internat"); // 2) our private one
108 /* this catalog is installed in standard location on Linux systems,
109 it might not be installed on yours - just ignore the errrors
110 or comment out this line then */
112 //m_locale.AddCatalog("fileutils"); // 3) and another just for testing
115 // Create the main frame window
116 MyFrame
*frame
= new MyFrame((wxFrame
*) NULL
, _("International wxWindows App"),
117 50, 50, 350, 60, m_locale
);
120 frame
->SetIcon(wxICON(mondrian
));
123 wxMenu
*file_menu
= new wxMenu
;
124 file_menu
->Append(MINIMAL_ABOUT
, _("&About..."));
125 file_menu
->AppendSeparator();
126 file_menu
->Append(MINIMAL_QUIT
, _("E&xit"));
128 wxMenu
*test_menu
= new wxMenu
;
129 test_menu
->Append(MINIMAL_OPEN
, _("&Open bogus file"));
130 test_menu
->Append(MINIMAL_TEST
, _("&Play a game"));
132 wxMenuBar
*menu_bar
= new wxMenuBar
;
133 menu_bar
->Append(file_menu
, _("&File"));
134 menu_bar
->Append(test_menu
, _("&Test"));
135 frame
->SetMenuBar(menu_bar
);
144 // My frame constructor
145 MyFrame
::MyFrame(wxFrame
*frame
, const char *title
, int x
, int y
, int w
, int h
,
147 : wxFrame(frame
, -1, title
, wxPoint(x
, y
), wxSize(w
, h
)),
152 void MyFrame
::OnQuit(wxCommandEvent
& WXUNUSED(event
) )
157 void MyFrame
::OnAbout(wxCommandEvent
& WXUNUSED(event
))
160 localeInfo
.Printf(_("Language: %s\n"
161 "System locale name: %s\n"
162 "Canonical locale name: %s\n"),
163 m_locale
.GetLocale(),
164 m_locale
.GetSysName().c_str(),
165 m_locale
.GetCanonicalName().c_str());
167 wxMessageDialog(this, wxString(_("I18n sample\n"
168 "(c) 1998, 1999 Vadim Zeitlin and Julian Smart"))
169 + wxT("\n\n") + localeInfo
,
170 _("About Internat"), wxOK
| wxICON_INFORMATION
).ShowModal();
173 void MyFrame
::OnPlay(wxCommandEvent
& WXUNUSED(event
))
175 wxString str
= wxGetTextFromUser(_("Enter your number:"),
176 _("Try to guess my number!"),
182 sscanf(str
, "%d", &num
);
184 str
= _("You've probably entered an invalid number.");
185 else if ( num
== 9 ) // this message is not translated (not in catalog)
186 str
= "You've found a bug in this program!";
187 else if ( num
!= 17 ) // a more implicit way to write _()
188 str
= wxGetTranslation("Bad luck! try again...");
191 // string must be split in two -- otherwise the translation won't be found
192 str
<< _("Congratulations! you've won. Here is the magic phrase:")
193 << _("cannot create fifo `%s'");
196 wxMessageBox(str
, _("Result"), wxOK
| wxICON_INFORMATION
);
199 void MyFrame
::OnOpen(wxCommandEvent
&)
201 // open a bogus file -- the error message should be also translated if you've
202 // got wxstd.mo somewhere in the search path
203 wxFile
file("NOTEXIST.ING");