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     void OnTest1(wxCommandEvent& event);
  65     void OnTest2(wxCommandEvent& event);
  66     void OnTest3(wxCommandEvent& event);
  67
  68     DECLARE_EVENT_TABLE()
  69
  70     wxLocale& m_locale;
  71 };
  72
  73 // ----------------------------------------------------------------------------
  74 // constants
  75 // ----------------------------------------------------------------------------
  76
  77 // ID for the menu commands
  78 enum
  79 {
  80     INTERNAT_TEXT = wxID_HIGHEST + 1,
  81     INTERNAT_TEST,
  82     INTERNAT_TEST_1,
  83     INTERNAT_TEST_2,
  84     INTERNAT_TEST_3,
  85     INTERNAT_OPEN
  86 };
  87
  88 // ----------------------------------------------------------------------------
  89 // wxWidgets macros
  90 // ----------------------------------------------------------------------------
  91
  92 BEGIN_EVENT_TABLE(MyFrame, wxFrame)
  93     EVT_MENU(wxID_EXIT, MyFrame::OnQuit)
  94     EVT_MENU(wxID_ABOUT, MyFrame::OnAbout)
  95     EVT_MENU(INTERNAT_TEST, MyFrame::OnPlay)
  96     EVT_MENU(INTERNAT_OPEN, MyFrame::OnOpen)
  97     EVT_MENU(INTERNAT_TEST_1, MyFrame::OnTest1)
  98     EVT_MENU(INTERNAT_TEST_2, MyFrame::OnTest2)
  99     EVT_MENU(INTERNAT_TEST_3, MyFrame::OnTest3)
 100 END_EVENT_TABLE()
 101
 102 IMPLEMENT_APP(MyApp)
 103
 104 // ============================================================================
 105 // implementation
 106 // ============================================================================
 107
 108 // ----------------------------------------------------------------------------
 109 // MyApp
 110 // ----------------------------------------------------------------------------
 111
 112 // `Main program' equivalent, creating windows and returning main app frame
 113 bool MyApp::OnInit()
 114 {
 115     long lng = -1;
 116
 117     if ( argc == 2 )
 118     {
 119         // the parameter must be the lang index
 120         wxString tmp(argv[1]);
 121         tmp.ToLong(&lng);
 122     }
 123
 124     static const wxLanguage langIds[] =
 125     {
 126         wxLANGUAGE_DEFAULT,
 127         wxLANGUAGE_FRENCH,
 128         wxLANGUAGE_GERMAN,
 129         wxLANGUAGE_RUSSIAN,
 130         wxLANGUAGE_BULGARIAN,
 131         wxLANGUAGE_CZECH,
 132         wxLANGUAGE_POLISH,
 133 #if wxUSE_UNICODE
 134         wxLANGUAGE_JAPANESE,
 135         wxLANGUAGE_GEORGIAN,
 136 #endif
 137         wxLANGUAGE_ENGLISH,
 138         wxLANGUAGE_ENGLISH_US
 139     };
 140
 141     if ( lng == -1 )
 142     {
 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[] =
 146         {
 147             _T("System default"),
 148             _T("French"),
 149             _T("German"),
 150             _T("Russian"),
 151             _T("Bulgarian"),
 152             _T("Czech"),
 153             _T("Polish"),
 154 #if wxUSE_UNICODE
 155             _T("Japanese"),
 156             _T("Georgian"),
 157 #endif
 158             _T("English"),
 159             _T("English (U.S.)")
 160         };
 161
 162         // the arrays should be in sync
 163         wxCOMPILE_TIME_ASSERT( WXSIZEOF(langNames) == WXSIZEOF(langIds),
 164                                LangArraysMismatch );
 165
 166         lng = wxGetSingleChoiceIndex
 167               (
 168                 _T("Please choose language:"),
 169                 _T("Language"),
 170                 WXSIZEOF(langNames),
 171                 langNames
 172               );
 173     }
 174
 175     if ( lng != -1 )
 176         m_locale.Init(langIds[lng]);
 177
 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(".."));
 185
 186     // Initialize the catalogs we'll be using
 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
 193 #ifdef __LINUX__
 194     {
 195         wxLogNull noLog;
 196         m_locale.AddCatalog(_T("fileutils"));
 197     }
 198 #endif
 199
 200     // Create the main frame window
 201     MyFrame *frame = new MyFrame(m_locale);
 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();
 210     file_menu->Append(wxID_EXIT, _("E&xit"));
 211
 212     wxMenu *test_menu = new wxMenu;
 213     test_menu->Append(INTERNAT_OPEN, _("&Open bogus file"));
 214     test_menu->Append(INTERNAT_TEST, _("&Play a game"));
 215     test_menu->AppendSeparator();
 216     test_menu->Append(INTERNAT_TEST_1, _("&1 _() (gettext)"));
 217     test_menu->Append(INTERNAT_TEST_2, _("&2 _N() (ngettext)"));
 218     test_menu->Append(INTERNAT_TEST_3, _("&3 wxTRANSLATE() (gettext_noop)"));
 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
 226     frame->Show(true);
 227     SetTopWindow(frame);
 228
 229     return true;
 230 }
 231
 232 // ----------------------------------------------------------------------------
 233 // MyFrame
 234 // ----------------------------------------------------------------------------
 235
 236 // main frame constructor
 237 MyFrame::MyFrame(wxLocale& locale)
 238        : wxFrame(NULL,
 239                  wxID_ANY,
 240                  _("International wxWidgets App")),
 241          m_locale(locale)
 242 {
 243     // Empty
 244 }
 245
 246 void MyFrame::OnQuit(wxCommandEvent& WXUNUSED(event) )
 247 {
 248     Close(true);
 249 }
 250
 251 void MyFrame::OnAbout(wxCommandEvent& WXUNUSED(event))
 252 {
 253     wxString localeInfo;
 254     wxString locale = m_locale.GetLocale();
 255     wxString sysname = m_locale.GetSysName();
 256     wxString canname = m_locale.GetCanonicalName();
 257
 258     localeInfo.Printf(_("Language: %s\nSystem locale name:\n%s\nCanonical locale name: %s\n"),
 259         locale.c_str(), sysname.c_str(), canname.c_str() );
 260
 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();
 270 }
 271
 272 void MyFrame::OnPlay(wxCommandEvent& WXUNUSED(event))
 273 {
 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     }
 287
 288     long num;
 289     if ( !str.ToLong(&num) || num < 0 )
 290     {
 291         str = _("You've probably entered an invalid number.");
 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
 297         str = _T("You've found a bug in this program!");
 298     }
 299     else if ( num == 17 )
 300     {
 301         str.clear();
 302
 303         // string must be split in two -- otherwise the translation would't be
 304         // found
 305         str << _("Congratulations! you've won. Here is the magic phrase:")
 306             << _("cannot create fifo `%s'");
 307     }
 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     }
 316
 317     wxMessageBox(str, _("Result"), wxOK | wxICON_INFORMATION);
 318 }
 319
 320 void MyFrame::OnOpen(wxCommandEvent&)
 321 {
 322     // open a bogus file -- the error message should be also translated if
 323     // you've got wxstd.mo somewhere in the search path
 324     wxFile file(wxT("NOTEXIST.ING"));
 325 }
 326
 327 void MyFrame::OnTest1(wxCommandEvent& WXUNUSED(event))
 328 {
 329     const wxChar* title = _("Testing _() (gettext)");
 330     wxTextEntryDialog d(this, _("Please enter text to translate"),
 331         title, wxTRANSLATE("default value"));
 332     if (d.ShowModal() == wxID_OK)
 333     {
 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);
 339     }
 340 }
 341
 342 void MyFrame::OnTest2(wxCommandEvent& WXUNUSED(event))
 343 {
 344     const wxChar* title = _("Testing _N() (ngettext)");
 345     wxTextEntryDialog d(this,
 346         _("Please enter range for plural forms of \"n files deleted\" phrase"),
 347         title, _T("0-10"));
 348     if (d.ShowModal() == wxID_OK)
 349     {
 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)
 355         {
 356             s << n << _T(" ") <<
 357                 wxPLURAL("file deleted", "files deleted", n) <<
 358                 _T("\n");
 359         }
 360         wxMessageBox(s);
 361     }
 362 }
 363
 364 void MyFrame::OnTest3(wxCommandEvent& WXUNUSED(event))
 365 {
 366     const wxChar* lines[] =
 367     {
 368         wxTRANSLATE("line 1"),
 369         wxTRANSLATE("line 2"),
 370         wxTRANSLATE("line 3"),
 371     };
 372     wxString s(_("Testing wxTRANSLATE() (gettext_noop)"));
 373     s << _T("\n");
 374     for (size_t i = 0; i < WXSIZEOF(lines); ++i)
 375     {
 376         s << lines[i] << _T(" -> ") << wxGetTranslation(lines[i]) << _T("\n");
 377     }
 378     wxMessageBox(s);
 379 }
 380
 381