samples/typetest/typetest.cpp

   1 /////////////////////////////////////////////////////////////////////////////
   2 // Name:        typetest.cpp
   3 // Purpose:     Types wxWidgets sample
   4 // Author:      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 #ifdef __GNUG__
  13 #pragma implementation "typetest.h"
  14 #endif
  15
  16 // For compilers that support precompilation, includes "wx/wx.h".
  17 #include "wx/wxprec.h"
  18
  19 #ifdef __BORLANDC__
  20 #pragma hdrstop
  21 #endif
  22
  23 #ifndef WX_PRECOMP
  24 #include "wx/wx.h"
  25 #endif
  26
  27 #include "wx/variant.h"
  28 #include "wx/mimetype.h"
  29
  30 #include "typetest.h"
  31
  32 #if defined(__WXGTK__) || defined(__WXX11__) || defined(__WXMOTIF__) || defined(__WXMAC__) || defined(__WXMGL__)
  33 #include "mondrian.xpm"
  34 #endif
  35
  36 #ifdef new
  37 #undef new
  38 #endif
  39
  40 #include "wx/ioswrap.h"
  41
  42 #if wxUSE_IOSTREAMH
  43     #include <fstream.h>
  44 #else
  45     #include <fstream>
  46 #endif
  47
  48 #include "wx/wfstream.h"
  49 #include "wx/datstrm.h"
  50 #include "wx/txtstrm.h"
  51 #include "wx/mstream.h"
  52
  53 // Create a new application object
  54 IMPLEMENT_APP    (MyApp)
  55
  56 IMPLEMENT_DYNAMIC_CLASS    (MyApp, wxApp)
  57
  58 BEGIN_EVENT_TABLE(MyApp, wxApp)
  59     EVT_MENU(TYPES_VARIANT,   MyApp::DoVariantDemo)
  60     EVT_MENU(TYPES_BYTEORDER, MyApp::DoByteOrderDemo)
  61 #if wxUSE_UNICODE
  62     EVT_MENU(TYPES_UNICODE,   MyApp::DoUnicodeDemo)
  63 #endif // wxUSE_UNICODE
  64     EVT_MENU(TYPES_STREAM, MyApp::DoStreamDemo)
  65     EVT_MENU(TYPES_STREAM2, MyApp::DoStreamDemo2)
  66     EVT_MENU(TYPES_STREAM3, MyApp::DoStreamDemo3)
  67     EVT_MENU(TYPES_STREAM4, MyApp::DoStreamDemo4)
  68     EVT_MENU(TYPES_STREAM5, MyApp::DoStreamDemo5)
  69     EVT_MENU(TYPES_STREAM6, MyApp::DoStreamDemo6)
  70     EVT_MENU(TYPES_STREAM7, MyApp::DoStreamDemo7)
  71     EVT_MENU(TYPES_MIME, MyApp::DoMIMEDemo)
  72 END_EVENT_TABLE()
  73
  74 wxString file_name = _T("test_wx.dat");
  75 wxString file_name2 = wxString(_T("test_wx2.dat"));
  76
  77 bool MyApp::OnInit()
  78 {
  79     // Create the main frame window
  80     MyFrame *frame = new MyFrame((wxFrame *) NULL, _T("wxWidgets Types Demo"),
  81                                  wxPoint(50, 50), wxSize(450, 340));
  82
  83     // Give it an icon
  84     frame->SetIcon(wxICON(mondrian));
  85
  86     // Make a menubar
  87     wxMenu *file_menu = new wxMenu;
  88
  89     file_menu->Append(TYPES_ABOUT, _T("&About"));
  90     file_menu->AppendSeparator();
  91     file_menu->Append(TYPES_QUIT, _T("E&xit\tAlt-X"));
  92
  93     wxMenu *test_menu = new wxMenu;
  94     test_menu->Append(TYPES_VARIANT, _T("&Variant test"));
  95     test_menu->Append(TYPES_BYTEORDER, _T("&Byteorder test"));
  96 #if wxUSE_UNICODE
  97     test_menu->Append(TYPES_UNICODE, _T("&Unicode test"));
  98 #endif // wxUSE_UNICODE
  99     test_menu->Append(TYPES_STREAM, _T("&Stream test"));
 100     test_menu->Append(TYPES_STREAM2, _T("&Stream seek test"));
 101     test_menu->Append(TYPES_STREAM3, _T("&Stream error test"));
 102     test_menu->Append(TYPES_STREAM4, _T("&Stream buffer test"));
 103     test_menu->Append(TYPES_STREAM5, _T("&Stream peek test"));
 104     test_menu->Append(TYPES_STREAM6, _T("&Stream ungetch test"));
 105     test_menu->Append(TYPES_STREAM7, _T("&Stream ungetch test for a buffered stream"));
 106     test_menu->AppendSeparator();
 107     test_menu->Append(TYPES_MIME, _T("&MIME database test"));
 108
 109     wxMenuBar *menu_bar = new wxMenuBar;
 110     menu_bar->Append(file_menu, _T("&File"));
 111     menu_bar->Append(test_menu, _T("&Tests"));
 112     frame->SetMenuBar(menu_bar);
 113
 114     m_textCtrl = new wxTextCtrl(frame, wxID_ANY, wxEmptyString,
 115         wxDefaultPosition, wxDefaultSize, wxTE_MULTILINE);
 116
 117     // Show the frame
 118     frame->Show(true);
 119
 120     SetTopWindow(frame);
 121
 122     return true;
 123 }
 124
 125 void MyApp::DoStreamDemo(wxCommandEvent& WXUNUSED(event))
 126 {
 127     wxTextCtrl& textCtrl = * GetTextCtrl();
 128
 129     textCtrl.Clear();
 130     textCtrl << _T("\nTest fstream vs. wxFileStream:\n\n");
 131
 132     textCtrl.WriteText( _T("Writing to ofstream and wxFileOutputStream:\n") );
 133
 134     wxSTD ofstream std_file_output( "test_std.dat" );
 135     wxFileOutputStream file_output( file_name );
 136     wxBufferedOutputStream buf_output( file_output );
 137     wxTextOutputStream text_output( buf_output );
 138
 139     wxString tmp;
 140     signed int si = 0xFFFFFFFF;
 141     tmp.Printf( _T("Signed int: %d\n"), si );
 142     textCtrl.WriteText( tmp );
 143     text_output << si << _T("\n");
 144     std_file_output << si << "\n";
 145
 146     unsigned int ui = 0xFFFFFFFF;
 147     tmp.Printf( _T("Unsigned int: %u\n"), ui );
 148     textCtrl.WriteText( tmp );
 149     text_output << ui << _T("\n");
 150     std_file_output << ui << "\n";
 151
 152     double d = 2.01234567890123456789;
 153     tmp.Printf( _T("Double: %f\n"), d );
 154     textCtrl.WriteText( tmp );
 155     text_output << d << _T("\n");
 156     std_file_output << d << "\n";
 157
 158     float f = (float)0.00001;
 159     tmp.Printf( _T("Float: %f\n"), f );
 160     textCtrl.WriteText( tmp );
 161     text_output << f << _T("\n");
 162     std_file_output << f << "\n";
 163
 164     wxString str( _T("Hello!") );
 165     tmp.Printf( _T("String: %s\n"), str.c_str() );
 166     textCtrl.WriteText( tmp );
 167     text_output << str << _T("\n");
 168     std_file_output << str.ToAscii() << "\n";
 169
 170     textCtrl.WriteText( _T("\nReading from ifstream:\n") );
 171
 172     wxSTD ifstream std_file_input( "test_std.dat" );
 173
 174     std_file_input >> si;
 175     tmp.Printf( _T("Signed int: %d\n"), si );
 176     textCtrl.WriteText( tmp );
 177
 178     std_file_input >> ui;
 179     tmp.Printf( _T("Unsigned int: %u\n"), ui );
 180     textCtrl.WriteText( tmp );
 181
 182     std_file_input >> d;
 183     tmp.Printf( _T("Double: %f\n"), d );
 184     textCtrl.WriteText( tmp );
 185
 186     std_file_input >> f;
 187     tmp.Printf( _T("Float: %f\n"), f );
 188     textCtrl.WriteText( tmp );
 189
 190     char std_buf[200];
 191     std_file_input >> std_buf;
 192     str = wxString::FromAscii(std_buf);
 193     tmp.Printf( _T("String: %s\n"), str.c_str() );
 194     textCtrl.WriteText( tmp );
 195
 196     textCtrl.WriteText( _T("\nReading from wxFileInputStream:\n") );
 197
 198     buf_output.Sync();
 199
 200     wxFileInputStream file_input( file_name );
 201     wxBufferedInputStream buf_input( file_input );
 202     wxTextInputStream text_input( file_input );
 203
 204     text_input >> si;
 205     tmp.Printf( _T("Signed int: %d\n"), si );
 206     textCtrl.WriteText( tmp );
 207
 208     text_input >> ui;
 209     tmp.Printf( _T("Unsigned int: %u\n"), ui );
 210     textCtrl.WriteText( tmp );
 211
 212     text_input >> d;
 213     tmp.Printf( _T("Double: %f\n"), d );
 214     textCtrl.WriteText( tmp );
 215
 216     text_input >> f;
 217     tmp.Printf( _T("Float: %f\n"), f );
 218     textCtrl.WriteText( tmp );
 219
 220     text_input >> str;
 221     tmp.Printf( _T("String: %s\n"), str.c_str() );
 222     textCtrl.WriteText( tmp );
 223
 224
 225
 226     textCtrl << _T("\nTest for wxDataStream:\n\n");
 227
 228     textCtrl.WriteText( _T("Writing to wxDataOutputStream:\n") );
 229
 230     file_output.SeekO( 0 );
 231     wxDataOutputStream data_output( buf_output );
 232
 233     wxInt16 i16 = (unsigned short)0xFFFF;
 234     tmp.Printf( _T("Signed int16: %d\n"), (int)i16 );
 235     textCtrl.WriteText( tmp );
 236     data_output.Write16( i16 );
 237
 238     wxUint16 ui16 = 0xFFFF;
 239     tmp.Printf( _T("Unsigned int16: %u\n"), (unsigned int) ui16 );
 240     textCtrl.WriteText( tmp );
 241     data_output.Write16( ui16 );
 242
 243     d = 2.01234567890123456789;
 244     tmp.Printf( _T("Double: %f\n"), d );
 245     textCtrl.WriteText( tmp );
 246     data_output.WriteDouble( d );
 247
 248     str = _T("Hello!");
 249     tmp.Printf( _T("String: %s\n"), str.c_str() );
 250     textCtrl.WriteText( tmp );
 251     data_output.WriteString( str );
 252
 253     buf_output.Sync();
 254
 255     textCtrl.WriteText( _T("\nReading from wxDataInputStream:\n") );
 256
 257     file_input.SeekI( 0 );
 258     wxDataInputStream data_input( buf_input );
 259
 260     i16 = data_input.Read16();
 261     tmp.Printf( _T("Signed int16: %d\n"), (int)i16 );
 262     textCtrl.WriteText( tmp );
 263
 264     ui16 = data_input.Read16();
 265     tmp.Printf( _T("Unsigned int16: %u\n"), (unsigned int) ui16 );
 266     textCtrl.WriteText( tmp );
 267
 268     d = data_input.ReadDouble();
 269     tmp.Printf( _T("Double: %f\n"), d );
 270     textCtrl.WriteText( tmp );
 271
 272     str = data_input.ReadString();
 273     tmp.Printf( _T("String: %s\n"), str.c_str() );
 274     textCtrl.WriteText( tmp );
 275 }
 276
 277 void MyApp::DoStreamDemo2(wxCommandEvent& WXUNUSED(event))
 278 {
 279     wxTextCtrl& textCtrl = * GetTextCtrl();
 280
 281     textCtrl.Clear();
 282     textCtrl << _T("\nTesting wxBufferedStream:\n\n");
 283
 284     char ch,ch2;
 285
 286     textCtrl.WriteText( _T("Writing number 0 to 9 to buffered wxFileOutputStream:\n\n") );
 287
 288     wxFileOutputStream file_output( file_name );
 289     wxBufferedOutputStream buf_output( file_output );
 290     for (ch = 0; ch < 10; ch++)
 291         buf_output.Write( &ch, 1 );
 292     buf_output.Sync();
 293
 294     wxFileInputStream file_input( file_name );
 295     for (ch2 = 0; ch2 < 10; ch2++)
 296     {
 297         file_input.Read( &ch, 1 );
 298         textCtrl.WriteText( (wxChar)(ch + _T('0')) );
 299     }
 300     textCtrl.WriteText( _T("\n\n\n") );
 301
 302     textCtrl.WriteText( _T("Writing number 0 to 9 to buffered wxFileOutputStream, then\n") );
 303     textCtrl.WriteText( _T("seeking back to #3 and writing 0:\n\n") );
 304
 305     wxFileOutputStream file_output2( file_name2 );
 306     wxBufferedOutputStream buf_output2( file_output2 );
 307     for (ch = 0; ch < 10; ch++)
 308         buf_output2.Write( &ch, 1 );
 309     buf_output2.SeekO( 3 );
 310     ch = 0;
 311     buf_output2.Write( &ch, 1 );
 312     buf_output2.Sync();
 313
 314     wxFileInputStream file_input2( file_name2 );
 315     for (ch2 = 0; ch2 < 10; ch2++)
 316     {
 317         file_input2.Read( &ch, 1 );
 318         textCtrl.WriteText( (wxChar)(ch + _T('0')) );
 319     }
 320     textCtrl.WriteText( _T("\n\n\n") );
 321
 322     // now append 2000 bytes to file (bigger than buffer)
 323     buf_output2.SeekO( 0, wxFromEnd );
 324     ch = 1;
 325     for (int i = 0; i < 2000; i++)
 326        buf_output2.Write( &ch, 1 );
 327     buf_output2.Sync();
 328
 329     textCtrl.WriteText( _T("Reading number 0 to 9 from buffered wxFileInputStream, then\n") );
 330     textCtrl.WriteText( _T("seeking back to #3 and reading the 0:\n\n") );
 331
 332     wxFileInputStream file_input3( file_name2 );
 333     wxBufferedInputStream buf_input3( file_input3 );
 334     for (ch2 = 0; ch2 < 10; ch2++)
 335     {
 336         buf_input3.Read( &ch, 1 );
 337         textCtrl.WriteText( (wxChar)(ch + _T('0')) );
 338     }
 339     for (int j = 0; j < 2000; j++)
 340        buf_input3.Read( &ch, 1 );
 341     textCtrl.WriteText( _T("\n") );
 342     buf_input3.SeekI( 3 );
 343     buf_input3.Read( &ch, 1 );
 344     textCtrl.WriteText( (wxChar)(ch + _T('0')) );
 345     textCtrl.WriteText( _T("\n\n\n") );
 346
 347 }
 348
 349 void MyApp::DoStreamDemo3(wxCommandEvent& WXUNUSED(event))
 350 {
 351     wxTextCtrl& textCtrl = * GetTextCtrl();
 352
 353     textCtrl.Clear();
 354     textCtrl << _T("\nTesting wxFileInputStream's and wxFFileInputStream's error handling:\n\n");
 355
 356     char ch,ch2;
 357
 358     textCtrl.WriteText( _T("Writing number 0 to 9 to wxFileOutputStream:\n\n") );
 359
 360     wxFileOutputStream file_output( file_name );
 361     for (ch = 0; ch < 10; ch++)
 362         file_output.Write( &ch, 1 );
 363
 364     // Testing wxFileInputStream
 365
 366     textCtrl.WriteText( _T("Reading 0 to 10 to wxFileInputStream:\n\n") );
 367
 368     wxFileInputStream file_input( file_name );
 369     for (ch2 = 0; ch2 < 11; ch2++)
 370     {
 371         file_input.Read( &ch, 1 );
 372         textCtrl.WriteText( _T("Value read: ") );
 373         textCtrl.WriteText( (wxChar)(ch + '0') );
 374         textCtrl.WriteText( _T(";  stream.GetLastError() returns: ") );
 375         switch (file_input.GetLastError())
 376         {
 377             case wxSTREAM_NO_ERROR:      textCtrl.WriteText( _T("wxSTREAM_NO_ERROR\n") ); break;
 378             case wxSTREAM_EOF:          textCtrl.WriteText( _T("wxSTREAM_EOF\n") ); break;
 379             case wxSTREAM_READ_ERROR:   textCtrl.WriteText( _T("wxSTREAM_READ_ERROR\n") ); break;
 380             case wxSTREAM_WRITE_ERROR:  textCtrl.WriteText( _T("wxSTREAM_WRITE_ERROR\n") ); break;
 381             default: textCtrl.WriteText( _T("Huh?\n") ); break;
 382         }
 383     }
 384     textCtrl.WriteText( _T("\n") );
 385
 386     textCtrl.WriteText( _T("Seeking to 0;  stream.GetLastError() returns: ") );
 387     file_input.SeekI( 0 );
 388     switch (file_input.GetLastError())
 389     {
 390         case wxSTREAM_NO_ERROR:      textCtrl.WriteText( _T("wxSTREAM_NO_ERROR\n") ); break;
 391         case wxSTREAM_EOF:          textCtrl.WriteText( _T("wxSTREAM_EOF\n") ); break;
 392         case wxSTREAM_READ_ERROR:   textCtrl.WriteText( _T("wxSTREAM_READ_ERROR\n") ); break;
 393         case wxSTREAM_WRITE_ERROR:  textCtrl.WriteText( _T("wxSTREAM_WRITE_ERROR\n") ); break;
 394         default: textCtrl.WriteText( _T("Huh?\n") ); break;
 395     }
 396     textCtrl.WriteText( _T("\n") );
 397
 398     file_input.Read( &ch, 1 );
 399     textCtrl.WriteText( _T("Value read: ") );
 400     textCtrl.WriteText( (wxChar)(ch + _T('0')) );
 401     textCtrl.WriteText( _T(";  stream.GetLastError() returns: ") );
 402     switch (file_input.GetLastError())
 403     {
 404         case wxSTREAM_NO_ERROR:      textCtrl.WriteText( _T("wxSTREAM_NO_ERROR\n") ); break;
 405         case wxSTREAM_EOF:          textCtrl.WriteText( _T("wxSTREAM_EOF\n") ); break;
 406         case wxSTREAM_READ_ERROR:   textCtrl.WriteText( _T("wxSTREAM_READ_ERROR\n") ); break;
 407         case wxSTREAM_WRITE_ERROR:  textCtrl.WriteText( _T("wxSTREAM_WRITE_ERROR\n") ); break;
 408         default: textCtrl.WriteText( _T("Huh?\n") ); break;
 409     }
 410     textCtrl.WriteText( _T("\n\n") );
 411
 412
 413     // Testing wxFFileInputStream
 414
 415     textCtrl.WriteText( _T("Reading 0 to 10 to wxFFileInputStream:\n\n") );
 416
 417     wxFFileInputStream ffile_input( file_name );
 418     for (ch2 = 0; ch2 < 11; ch2++)
 419     {
 420         ffile_input.Read( &ch, 1 );
 421         textCtrl.WriteText( _T("Value read: ") );
 422         textCtrl.WriteText( (wxChar)(ch + '0') );
 423         textCtrl.WriteText( _T(";  stream.GetLastError() returns: ") );
 424         switch (ffile_input.GetLastError())
 425         {
 426             case wxSTREAM_NO_ERROR:      textCtrl.WriteText( _T("wxSTREAM_NO_ERROR\n") ); break;
 427             case wxSTREAM_EOF:          textCtrl.WriteText( _T("wxSTREAM_EOF\n") ); break;
 428             case wxSTREAM_READ_ERROR:   textCtrl.WriteText( _T("wxSTREAM_READ_ERROR\n") ); break;
 429             case wxSTREAM_WRITE_ERROR:  textCtrl.WriteText( _T("wxSTREAM_WRITE_ERROR\n") ); break;
 430             default: textCtrl.WriteText( _T("Huh?\n") ); break;
 431         }
 432     }
 433     textCtrl.WriteText( _T("\n") );
 434
 435     textCtrl.WriteText( _T("Seeking to 0;  stream.GetLastError() returns: ") );
 436     ffile_input.SeekI( 0 );
 437     switch (ffile_input.GetLastError())
 438     {
 439         case wxSTREAM_NO_ERROR:      textCtrl.WriteText( _T("wxSTREAM_NO_ERROR\n") ); break;
 440         case wxSTREAM_EOF:          textCtrl.WriteText( _T("wxSTREAM_EOF\n") ); break;
 441         case wxSTREAM_READ_ERROR:   textCtrl.WriteText( _T("wxSTREAM_READ_ERROR\n") ); break;
 442         case wxSTREAM_WRITE_ERROR:  textCtrl.WriteText( _T("wxSTREAM_WRITE_ERROR\n") ); break;
 443         default: textCtrl.WriteText( _T("Huh?\n") ); break;
 444     }
 445     textCtrl.WriteText( _T("\n") );
 446
 447     ffile_input.Read( &ch, 1 );
 448     textCtrl.WriteText( _T("Value read: ") );
 449     textCtrl.WriteText( (wxChar)(ch + '0') );
 450     textCtrl.WriteText( _T(";  stream.GetLastError() returns: ") );
 451     switch (ffile_input.GetLastError())
 452     {
 453         case wxSTREAM_NO_ERROR:      textCtrl.WriteText( _T("wxSTREAM_NO_ERROR\n") ); break;
 454         case wxSTREAM_EOF:          textCtrl.WriteText( _T("wxSTREAM_EOF\n") ); break;
 455         case wxSTREAM_READ_ERROR:   textCtrl.WriteText( _T("wxSTREAM_READ_ERROR\n") ); break;
 456         case wxSTREAM_WRITE_ERROR:  textCtrl.WriteText( _T("wxSTREAM_WRITE_ERROR\n") ); break;
 457         default: textCtrl.WriteText( _T("Huh?\n") ); break;
 458     }
 459     textCtrl.WriteText( _T("\n\n") );
 460
 461     // Testing wxFFileInputStream
 462
 463     textCtrl.WriteText( _T("Reading 0 to 10 to buffered wxFFileInputStream:\n\n") );
 464
 465     wxFFileInputStream ffile_input2( file_name );
 466     wxBufferedInputStream buf_input( ffile_input2 );
 467     for (ch2 = 0; ch2 < 11; ch2++)
 468     {
 469         buf_input.Read( &ch, 1 );
 470         textCtrl.WriteText( _T("Value read: ") );
 471         textCtrl.WriteText( (wxChar)(ch + '0') );
 472         textCtrl.WriteText( _T(";  stream.GetLastError() returns: ") );
 473         switch (buf_input.GetLastError())
 474         {
 475             case wxSTREAM_NO_ERROR:      textCtrl.WriteText( _T("wxSTREAM_NO_ERROR\n") ); break;
 476             case wxSTREAM_EOF:          textCtrl.WriteText( _T("wxSTREAM_EOF\n") ); break;
 477             case wxSTREAM_READ_ERROR:   textCtrl.WriteText( _T("wxSTREAM_READ_ERROR\n") ); break;
 478             case wxSTREAM_WRITE_ERROR:  textCtrl.WriteText( _T("wxSTREAM_WRITE_ERROR\n") ); break;
 479             default: textCtrl.WriteText( _T("Huh?\n") ); break;
 480         }
 481     }
 482     textCtrl.WriteText( _T("\n") );
 483
 484     textCtrl.WriteText( _T("Seeking to 0;  stream.GetLastError() returns: ") );
 485     buf_input.SeekI( 0 );
 486     switch (buf_input.GetLastError())
 487     {
 488         case wxSTREAM_NO_ERROR:      textCtrl.WriteText( _T("wxSTREAM_NO_ERROR\n") ); break;
 489         case wxSTREAM_EOF:          textCtrl.WriteText( _T("wxSTREAM_EOF\n") ); break;
 490         case wxSTREAM_READ_ERROR:   textCtrl.WriteText( _T("wxSTREAM_READ_ERROR\n") ); break;
 491         case wxSTREAM_WRITE_ERROR:  textCtrl.WriteText( _T("wxSTREAM_WRITE_ERROR\n") ); break;
 492         default: textCtrl.WriteText( _T("Huh?\n") ); break;
 493     }
 494     textCtrl.WriteText( _T("\n") );
 495
 496     buf_input.Read( &ch, 1 );
 497     textCtrl.WriteText( _T("Value read: ") );
 498     textCtrl.WriteText( (wxChar)(ch + '0') );
 499     textCtrl.WriteText( _T(";  stream.GetLastError() returns: ") );
 500     switch (buf_input.GetLastError())
 501     {
 502         case wxSTREAM_NO_ERROR:      textCtrl.WriteText( _T("wxSTREAM_NO_ERROR\n") ); break;
 503         case wxSTREAM_EOF:          textCtrl.WriteText( _T("wxSTREAM_EOF\n") ); break;
 504         case wxSTREAM_READ_ERROR:   textCtrl.WriteText( _T("wxSTREAM_READ_ERROR\n") ); break;
 505         case wxSTREAM_WRITE_ERROR:  textCtrl.WriteText( _T("wxSTREAM_WRITE_ERROR\n") ); break;
 506         default: textCtrl.WriteText( _T("Huh?\n") ); break;
 507     }
 508 }
 509
 510 void MyApp::DoStreamDemo4(wxCommandEvent& WXUNUSED(event))
 511 {
 512     wxTextCtrl& textCtrl = * GetTextCtrl();
 513
 514     wxString msg;
 515
 516     textCtrl.Clear();
 517     textCtrl << _T("\nTesting wxStreamBuffer:\n\n");
 518
 519     // bigger than buffer
 520     textCtrl.WriteText( _T("Writing 2000x 1 to wxFileOutputStream.\n\n") );
 521
 522     wxFileOutputStream file_output( file_name );
 523     for (int i = 0; i < 2000; i++)
 524     {
 525         char ch = 1;
 526         file_output.Write( &ch, 1 );
 527     }
 528
 529     textCtrl.WriteText( _T("Opening with a buffered wxFileInputStream:\n\n") );
 530
 531     wxFileInputStream file_input( file_name );
 532     wxBufferedInputStream buf_input( file_input );
 533
 534     textCtrl.WriteText( _T("wxBufferedInputStream.GetLastError() returns: ") );
 535     switch (buf_input.GetLastError())
 536     {
 537         case wxSTREAM_NO_ERROR:      textCtrl.WriteText( _T("wxSTREAM_NO_ERROR\n") ); break;
 538         case wxSTREAM_EOF:          textCtrl.WriteText( _T("wxSTREAM_EOF\n") ); break;
 539         case wxSTREAM_READ_ERROR:   textCtrl.WriteText( _T("wxSTREAM_READ_ERROR\n") ); break;
 540         case wxSTREAM_WRITE_ERROR:  textCtrl.WriteText( _T("wxSTREAM_WRITE_ERROR\n") ); break;
 541         default: textCtrl.WriteText( _T("Huh?\n") ); break;
 542     }
 543     msg.Printf( wxT("wxBufferedInputStream.LastRead() returns: %d\n"), (int)buf_input.LastRead() );
 544     textCtrl.WriteText( msg );
 545     msg.Printf( wxT("wxBufferedInputStream.TellI() returns: %d\n"), (int)buf_input.TellI() );
 546     textCtrl.WriteText( msg );
 547     textCtrl.WriteText( _T("\n\n") );
 548
 549
 550     textCtrl.WriteText( _T("Seeking to position 300:\n\n") );
 551
 552     buf_input.SeekI( 300 );
 553
 554     textCtrl.WriteText( _T("wxBufferedInputStream.GetLastError() returns: ") );
 555     switch (buf_input.GetLastError())
 556     {
 557         case wxSTREAM_NO_ERROR:      textCtrl.WriteText( _T("wxSTREAM_NO_ERROR\n") ); break;
 558         case wxSTREAM_EOF:          textCtrl.WriteText( _T("wxSTREAM_EOF\n") ); break;
 559         case wxSTREAM_READ_ERROR:   textCtrl.WriteText( _T("wxSTREAM_READ_ERROR\n") ); break;
 560         case wxSTREAM_WRITE_ERROR:  textCtrl.WriteText( _T("wxSTREAM_WRITE_ERROR\n") ); break;
 561         default: textCtrl.WriteText( _T("Huh?\n") ); break;
 562     }
 563     msg.Printf( wxT("wxBufferedInputStream.LastRead() returns: %d\n"), (int)buf_input.LastRead() );
 564     textCtrl.WriteText( msg );
 565     msg.Printf( wxT("wxBufferedInputStream.TellI() returns: %d\n"), (int)buf_input.TellI() );
 566     textCtrl.WriteText( msg );
 567     textCtrl.WriteText( _T("\n\n") );
 568
 569
 570     char buf[2000];
 571
 572     textCtrl.WriteText( _T("Reading 500 bytes:\n\n") );
 573
 574     buf_input.Read( buf, 500 );
 575
 576     textCtrl.WriteText( _T("wxBufferedInputStream.GetLastError() returns: ") );
 577     switch (buf_input.GetLastError())
 578     {
 579         case wxSTREAM_NO_ERROR:      textCtrl.WriteText( _T("wxSTREAM_NO_ERROR\n") ); break;
 580         case wxSTREAM_EOF:          textCtrl.WriteText( _T("wxSTREAM_EOF\n") ); break;
 581         case wxSTREAM_READ_ERROR:   textCtrl.WriteText( _T("wxSTREAM_READ_ERROR\n") ); break;
 582         case wxSTREAM_WRITE_ERROR:  textCtrl.WriteText( _T("wxSTREAM_WRITE_ERROR\n") ); break;
 583         default: textCtrl.WriteText( _T("Huh?\n") ); break;
 584     }
 585     msg.Printf( wxT("wxBufferedInputStream.LastRead() returns: %d\n"), (int)buf_input.LastRead() );
 586     textCtrl.WriteText( msg );
 587     msg.Printf( wxT("wxBufferedInputStream.TellI() returns: %d\n"), (int)buf_input.TellI() );
 588     textCtrl.WriteText( msg );
 589     textCtrl.WriteText( _T("\n\n") );
 590
 591     textCtrl.WriteText( _T("Reading another 500 bytes:\n\n") );
 592
 593     buf_input.Read( buf, 500 );
 594
 595     textCtrl.WriteText( _T("wxBufferedInputStream.GetLastError() returns: ") );
 596     switch (buf_input.GetLastError())
 597     {
 598         case wxSTREAM_NO_ERROR:      textCtrl.WriteText( _T("wxSTREAM_NO_ERROR\n") ); break;
 599         case wxSTREAM_EOF:          textCtrl.WriteText( _T("wxSTREAM_EOF\n") ); break;
 600         case wxSTREAM_READ_ERROR:   textCtrl.WriteText( _T("wxSTREAM_READ_ERROR\n") ); break;
 601         case wxSTREAM_WRITE_ERROR:  textCtrl.WriteText( _T("wxSTREAM_WRITE_ERROR\n") ); break;
 602         default: textCtrl.WriteText( _T("Huh?\n") ); break;
 603     }
 604     msg.Printf( wxT("wxBufferedInputStream.LastRead() returns: %d\n"), (int)buf_input.LastRead() );
 605     textCtrl.WriteText( msg );
 606     msg.Printf( wxT("wxBufferedInputStream.TellI() returns: %d\n"), (int)buf_input.TellI() );
 607     textCtrl.WriteText( msg );
 608     textCtrl.WriteText( _T("\n\n") );
 609
 610     textCtrl.WriteText( _T("Reading another 500 bytes:\n\n") );
 611
 612     buf_input.Read( buf, 500 );
 613
 614     textCtrl.WriteText( _T("wxBufferedInputStream.GetLastError() returns: ") );
 615     switch (buf_input.GetLastError())
 616     {
 617         case wxSTREAM_NO_ERROR:      textCtrl.WriteText( _T("wxSTREAM_NO_ERROR\n") ); break;
 618         case wxSTREAM_EOF:          textCtrl.WriteText( _T("wxSTREAM_EOF\n") ); break;
 619         case wxSTREAM_READ_ERROR:   textCtrl.WriteText( _T("wxSTREAM_READ_ERROR\n") ); break;
 620         case wxSTREAM_WRITE_ERROR:  textCtrl.WriteText( _T("wxSTREAM_WRITE_ERROR\n") ); break;
 621         default: textCtrl.WriteText( _T("Huh?\n") ); break;
 622     }
 623     msg.Printf( wxT("wxBufferedInputStream.LastRead() returns: %d\n"), (int)buf_input.LastRead() );
 624     textCtrl.WriteText( msg );
 625     msg.Printf( wxT("wxBufferedInputStream.TellI() returns: %d\n"), (int)buf_input.TellI() );
 626     textCtrl.WriteText( msg );
 627     textCtrl.WriteText( _T("\n\n") );
 628
 629     textCtrl.WriteText( _T("Reading another 500 bytes:\n\n") );
 630
 631     buf_input.Read( buf, 500 );
 632
 633     textCtrl.WriteText( _T("wxBufferedInputStream.GetLastError() returns: ") );
 634     switch (buf_input.GetLastError())
 635     {
 636         case wxSTREAM_NO_ERROR:      textCtrl.WriteText( _T("wxSTREAM_NO_ERROR\n") ); break;
 637         case wxSTREAM_EOF:          textCtrl.WriteText( _T("wxSTREAM_EOF\n") ); break;
 638         case wxSTREAM_READ_ERROR:   textCtrl.WriteText( _T("wxSTREAM_READ_ERROR\n") ); break;
 639         case wxSTREAM_WRITE_ERROR:  textCtrl.WriteText( _T("wxSTREAM_WRITE_ERROR\n") ); break;
 640         default: textCtrl.WriteText( _T("Huh?\n") ); break;
 641     }
 642     msg.Printf( wxT("wxBufferedInputStream.LastRead() returns: %d\n"), (int)buf_input.LastRead() );
 643     textCtrl.WriteText( msg );
 644     msg.Printf( wxT("wxBufferedInputStream.TellI() returns: %d\n"), (int)buf_input.TellI() );
 645     textCtrl.WriteText( msg );
 646     textCtrl.WriteText( _T("\n\n") );
 647 }
 648
 649 void MyApp::DoStreamDemo5(wxCommandEvent& WXUNUSED(event))
 650 {
 651     wxTextCtrl& textCtrl = * GetTextCtrl();
 652
 653     textCtrl.Clear();
 654     textCtrl << _T("\nTesting wxFileInputStream's Peek():\n\n");
 655
 656     char ch;
 657     wxString str;
 658
 659     textCtrl.WriteText( _T("Writing number 0 to 9 to wxFileOutputStream:\n\n") );
 660
 661     wxFileOutputStream file_output( file_name );
 662     for (ch = 0; ch < 10; ch++)
 663         file_output.Write( &ch, 1 );
 664
 665     file_output.Sync();
 666
 667     wxFileInputStream file_input( file_name );
 668
 669     ch = file_input.Peek();
 670     str.Printf( wxT("First char peeked: %d\n"), (int) ch );
 671     textCtrl.WriteText( str );
 672
 673     ch = file_input.GetC();
 674     str.Printf( wxT("First char read: %d\n"), (int) ch );
 675     textCtrl.WriteText( str );
 676
 677     ch = file_input.Peek();
 678     str.Printf( wxT("Second char peeked: %d\n"), (int) ch );
 679     textCtrl.WriteText( str );
 680
 681     ch = file_input.GetC();
 682     str.Printf( wxT("Second char read: %d\n"), (int) ch );
 683     textCtrl.WriteText( str );
 684
 685     ch = file_input.Peek();
 686     str.Printf( wxT("Third char peeked: %d\n"), (int) ch );
 687     textCtrl.WriteText( str );
 688
 689     ch = file_input.GetC();
 690     str.Printf( wxT("Third char read: %d\n"), (int) ch );
 691     textCtrl.WriteText( str );
 692
 693
 694     textCtrl << _T("\n\n\nTesting wxMemoryInputStream's Peek():\n\n");
 695
 696     char buf[] = { 0,1,2,3,4,5,6,7,8,9,10 };
 697     wxMemoryInputStream input( buf, 10 );
 698
 699     ch = input.Peek();
 700     str.Printf( wxT("First char peeked: %d\n"), (int) ch );
 701     textCtrl.WriteText( str );
 702
 703     ch = input.GetC();
 704     str.Printf( wxT("First char read: %d\n"), (int) ch );
 705     textCtrl.WriteText( str );
 706
 707     ch = input.Peek();
 708     str.Printf( wxT("Second char peeked: %d\n"), (int) ch );
 709     textCtrl.WriteText( str );
 710
 711     ch = input.GetC();
 712     str.Printf( wxT("Second char read: %d\n"), (int) ch );
 713     textCtrl.WriteText( str );
 714
 715     ch = input.Peek();
 716     str.Printf( wxT("Third char peeked: %d\n"), (int) ch );
 717     textCtrl.WriteText( str );
 718
 719     ch = input.GetC();
 720     str.Printf( wxT("Third char read: %d\n"), (int) ch );
 721     textCtrl.WriteText( str );
 722 }
 723
 724 void MyApp::DoStreamDemo6(wxCommandEvent& WXUNUSED(event))
 725 {
 726     wxTextCtrl& textCtrl = * GetTextCtrl();
 727
 728     textCtrl.Clear();
 729     textCtrl.WriteText( _T("\nTesting Ungetch():\n\n") );
 730
 731     char ch = 0;
 732     wxString str;
 733
 734     textCtrl.WriteText( _T("Writing number 0 to 9 to wxFileOutputStream...\n\n") );
 735
 736     wxFileOutputStream file_output( file_name );
 737     for (ch = 0; ch < 10; ch++)
 738         file_output.Write( &ch, 1 );
 739
 740     file_output.Sync();
 741
 742     textCtrl.WriteText( _T("Reading char from wxFileInputStream:\n\n") );
 743
 744     wxFileInputStream file_input( file_name );
 745
 746     ch = file_input.GetC();
 747     size_t pos = (size_t)file_input.TellI();
 748     str.Printf( wxT("Read char: %d. Now at position %d\n\n"), (int) ch, (int) pos );
 749     textCtrl.WriteText( str );
 750
 751     textCtrl.WriteText( _T("Reading another char from wxFileInputStream:\n\n") );
 752
 753     ch = file_input.GetC();
 754     pos = (size_t)file_input.TellI();
 755     str.Printf( wxT("Read char: %d. Now at position %d\n\n"), (int) ch, (int) pos );
 756     textCtrl.WriteText( str );
 757
 758     textCtrl.WriteText( _T("Reading yet another char from wxFileInputStream:\n\n") );
 759
 760     ch = file_input.GetC();
 761     pos = (size_t)file_input.TellI();
 762     str.Printf( wxT("Read char: %d. Now at position %d\n\n"), (int) ch, (int) pos );
 763     textCtrl.WriteText( str );
 764
 765     textCtrl.WriteText( _T("Now calling Ungetch( 5 ) from wxFileInputStream...\n\n") );
 766
 767     file_input.Ungetch( 5 );
 768     pos = (size_t)file_input.TellI();
 769     str.Printf( wxT("Now at position %d\n\n"), (int) pos );
 770     textCtrl.WriteText( str );
 771
 772     textCtrl.WriteText( _T("Reading char from wxFileInputStream:\n\n") );
 773
 774     ch = file_input.GetC();
 775     pos = (size_t)file_input.TellI();
 776     str.Printf( wxT("Read char: %d. Now at position %d\n\n"), (int) ch, (int) pos );
 777     textCtrl.WriteText( str );
 778
 779     textCtrl.WriteText( _T("Reading another char from wxFileInputStream:\n\n") );
 780
 781     ch = file_input.GetC();
 782     pos = (size_t)file_input.TellI();
 783     str.Printf( wxT("Read char: %d. Now at position %d\n\n"), (int) ch, (int) pos );
 784     textCtrl.WriteText( str );
 785
 786     textCtrl.WriteText( _T("Now calling Ungetch( 5 ) from wxFileInputStream again...\n\n") );
 787
 788     file_input.Ungetch( 5 );
 789     pos = (size_t)file_input.TellI();
 790     str.Printf( wxT("Now at position %d\n\n"), (int) pos );
 791     textCtrl.WriteText( str );
 792
 793     textCtrl.WriteText( _T("Seeking to pos 3 in wxFileInputStream. This invalidates the writeback buffer.\n\n") );
 794
 795     file_input.SeekI( 3 );
 796
 797     ch = file_input.GetC();
 798     pos = (size_t)file_input.TellI();
 799     str.Printf( wxT("Read char: %d. Now at position %d\n\n"), (int) ch, (int) pos );
 800     textCtrl.WriteText( str );
 801 }
 802
 803 void MyApp::DoStreamDemo7(wxCommandEvent& WXUNUSED(event))
 804 {
 805     wxTextCtrl& textCtrl = * GetTextCtrl();
 806
 807     textCtrl.Clear();
 808     textCtrl.WriteText( _T("\nTesting Ungetch() in buffered input stream:\n\n") );
 809
 810     char ch = 0;
 811     wxString str;
 812
 813     textCtrl.WriteText( _T("Writing number 0 to 9 to wxFileOutputStream...\n\n") );
 814
 815     wxFileOutputStream file_output( file_name );
 816     for (ch = 0; ch < 10; ch++)
 817         file_output.Write( &ch, 1 );
 818
 819     file_output.Sync();
 820
 821     textCtrl.WriteText( _T("Reading char from wxBufferedInputStream via wxFileInputStream:\n\n") );
 822
 823     wxFileInputStream file_input( file_name );
 824     wxBufferedInputStream buf_input( file_input );
 825
 826     ch = buf_input.GetC();
 827     size_t pos = (size_t)buf_input.TellI();
 828     str.Printf( wxT("Read char: %d. Now at position %d\n\n"), (int) ch, (int) pos );
 829     textCtrl.WriteText( str );
 830
 831     textCtrl.WriteText( _T("Reading another char from wxBufferedInputStream:\n\n") );
 832
 833     ch = buf_input.GetC();
 834     pos = (size_t)buf_input.TellI();
 835     str.Printf( wxT("Read char: %d. Now at position %d\n\n"), (int) ch, (int) pos );
 836     textCtrl.WriteText( str );
 837
 838     textCtrl.WriteText( _T("Reading yet another char from wxBufferedInputStream:\n\n") );
 839
 840     ch = buf_input.GetC();
 841     pos = (size_t)buf_input.TellI();
 842     str.Printf( wxT("Read char: %d. Now at position %d\n\n"), (int) ch, (int) pos );
 843     textCtrl.WriteText( str );
 844
 845     textCtrl.WriteText( _T("Now calling Ungetch( 5 ) from wxBufferedInputStream...\n\n") );
 846
 847     buf_input.Ungetch( 5 );
 848     pos = (size_t)buf_input.TellI();
 849     str.Printf( wxT("Now at position %d\n\n"), (int) pos );
 850     textCtrl.WriteText( str );
 851
 852     textCtrl.WriteText( _T("Reading char from wxBufferedInputStream:\n\n") );
 853
 854     ch = buf_input.GetC();
 855     pos = (size_t)buf_input.TellI();
 856     str.Printf( wxT("Read char: %d. Now at position %d\n\n"), (int) ch, (int) pos );
 857     textCtrl.WriteText( str );
 858
 859     textCtrl.WriteText( _T("Reading another char from wxBufferedInputStream:\n\n") );
 860
 861     ch = buf_input.GetC();
 862     pos = (size_t)buf_input.TellI();
 863     str.Printf( wxT("Read char: %d. Now at position %d\n\n"), (int) ch, (int) pos );
 864     textCtrl.WriteText( str );
 865
 866     textCtrl.WriteText( _T("Now calling Ungetch( 5 ) from wxBufferedInputStream again...\n\n") );
 867
 868     buf_input.Ungetch( 5 );
 869     pos = (size_t)buf_input.TellI();
 870     str.Printf( wxT("Now at position %d\n\n"), (int) pos );
 871     textCtrl.WriteText( str );
 872
 873     textCtrl.WriteText( _T("Seeking to pos 3 in wxBufferedInputStream. This invalidates the writeback buffer.\n\n") );
 874
 875     buf_input.SeekI( 3 );
 876
 877     ch = buf_input.GetC();
 878     pos = (size_t)buf_input.TellI();
 879     str.Printf( wxT("Read char: %d. Now at position %d\n\n"), (int) ch, (int) pos );
 880     textCtrl.WriteText( str );
 881 }
 882
 883 #if wxUSE_UNICODE
 884 void MyApp::DoUnicodeDemo(wxCommandEvent& WXUNUSED(event))
 885 {
 886     wxTextCtrl& textCtrl = * GetTextCtrl();
 887
 888     textCtrl.Clear();
 889     textCtrl << _T("\nTest wchar_t to char (Unicode to ANSI/Multibyte) converions:");
 890
 891     wxString str;
 892     str = _T("Robert Röbling\n");
 893
 894     printf( "\n\nConversion with wxConvLocal:\n" );
 895     wxConvCurrent = &wxConvLocal;
 896     printf( (const char*) str.mbc_str() );
 897     printf( "\n\nConversion with wxConvLibc:\n" );
 898     wxConvCurrent = &wxConvLibc;
 899     printf( (const char*) str.mbc_str() );
 900
 901 }
 902 #endif
 903
 904 void MyApp::DoMIMEDemo(wxCommandEvent& WXUNUSED(event))
 905 {
 906     static wxString s_defaultExt = _T("xyz");
 907
 908     wxString ext = wxGetTextFromUser(_T("Enter a file extension: "),
 909                                      _T("MIME database test"),
 910                                      s_defaultExt);
 911     if ( !!ext )
 912     {
 913         s_defaultExt = ext;
 914
 915         // init MIME database if not done yet
 916         if ( !m_mimeDatabase )
 917         {
 918             m_mimeDatabase = new wxMimeTypesManager;
 919
 920             static const wxFileTypeInfo fallbacks[] =
 921             {
 922                 wxFileTypeInfo(_T("application/xyz"),
 923                                _T("XyZ %s"),
 924                                _T("XyZ -p %s"),
 925                                _T("The one and only XYZ format file"),
 926                                _T("xyz"), _T("123"), NULL),
 927                 wxFileTypeInfo(_T("text/html"),
 928                                _T("lynx %s"),
 929                                _T("lynx -dump %s | lpr"),
 930                                _T("HTML document (from fallback)"),
 931                                _T("htm"), _T("html"), NULL),
 932
 933                 // must terminate the table with this!
 934                 wxFileTypeInfo()
 935             };
 936
 937             m_mimeDatabase->AddFallbacks(fallbacks);
 938         }
 939
 940         wxTextCtrl& textCtrl = * GetTextCtrl();
 941
 942         wxFileType *filetype = m_mimeDatabase->GetFileTypeFromExtension(ext);
 943         if ( !filetype )
 944         {
 945             textCtrl << _T("Unknown extension '") << ext << _T("'\n");
 946         }
 947         else
 948         {
 949             wxString type, desc, open;
 950             filetype->GetMimeType(&type);
 951             filetype->GetDescription(&desc);
 952
 953             wxString filename = _T("filename");
 954             filename << _T(".") << ext;
 955             wxFileType::MessageParameters params(filename, type);
 956             filetype->GetOpenCommand(&open, params);
 957
 958             textCtrl << _T("MIME information about extension '") << ext << _T('\n')
 959                      << _T("\tMIME type: ") << ( !type ? wxT("unknown")
 960                                                    : type.c_str() ) << _T('\n')
 961                      << _T("\tDescription: ") << ( !desc ? wxEmptyString : desc.c_str() )
 962                         << _T('\n')
 963                      << _T("\tCommand to open: ") << ( !open ? wxT("no") : open.c_str() )
 964                         << _T('\n');
 965
 966             delete filetype;
 967         }
 968     }
 969     //else: cancelled by user
 970 }
 971
 972 void MyApp::DoByteOrderDemo(wxCommandEvent& WXUNUSED(event))
 973 {
 974     wxTextCtrl& textCtrl = * GetTextCtrl();
 975
 976     textCtrl.Clear();
 977     textCtrl << _T("\nTest byte order macros:\n\n");
 978
 979     #if wxBYTE_ORDER == wxLITTLE_ENDIAN
 980         textCtrl << _T("This is a little endian system.\n\n");
 981     #else
 982         textCtrl << _T("This is a big endian system.\n\n");
 983     #endif
 984
 985     wxString text;
 986
 987     wxInt32 var = 0xF1F2F3F4;
 988     text = wxEmptyString;
 989     text.Printf( _T("Value of wxInt32 is now: %#x.\n\n"), var );
 990     textCtrl.WriteText( text );
 991
 992     text = wxEmptyString;
 993     text.Printf( _T("Value of swapped wxInt32 is: %#x.\n\n"), wxINT32_SWAP_ALWAYS( var ) );
 994     textCtrl.WriteText( text );
 995
 996     text = wxEmptyString;
 997     text.Printf( _T("Value of wxInt32 swapped on little endian is: %#x.\n\n"), wxINT32_SWAP_ON_LE( var ) );
 998     textCtrl.WriteText( text );
 999
1000     text = wxEmptyString;
1001     text.Printf( _T("Value of wxInt32 swapped on big endian is: %#x.\n\n"), wxINT32_SWAP_ON_BE( var ) );
1002     textCtrl.WriteText( text );
1003 }
1004
1005 void MyApp::DoVariantDemo(wxCommandEvent& WXUNUSED(event) )
1006 {
1007     wxTextCtrl& textCtrl = * GetTextCtrl();
1008
1009     wxVariant var1 = _T("String value");
1010     textCtrl << _T("var1 = ") << var1.MakeString() << _T("\n");
1011
1012     // Conversion
1013     wxString str = var1.MakeString();
1014
1015     var1 = 123.456;
1016     textCtrl << _T("var1 = ") << var1.GetReal() << _T("\n");
1017
1018     // Implicit conversion
1019     double v = var1;
1020
1021     var1 = 9876L;
1022     textCtrl << _T("var1 = ") << var1.GetLong() << _T("\n");
1023
1024     // Implicit conversion
1025     long l = var1;
1026
1027     // suppress compile warnings about unused variables
1028     wxUnusedVar(l);
1029     wxUnusedVar(v);
1030
1031     wxArrayString stringArray;
1032     stringArray.Add(_T("one")); stringArray.Add(_T("two")); stringArray.Add(_T("three"));
1033     var1 = stringArray;
1034     textCtrl << _T("var1 = ") << var1.MakeString() << _T("\n");
1035
1036     var1.ClearList();
1037     var1.Append(wxVariant(1.2345));
1038     var1.Append(wxVariant(_T("hello")));
1039     var1.Append(wxVariant(54321L));
1040
1041     textCtrl << _T("var1 = ") << var1.MakeString() << _T("\n");
1042
1043     size_t n = var1.GetCount();
1044     size_t i;
1045     for (i = (size_t) 0; i < n; i++)
1046     {
1047         textCtrl << _T("var1[") << (int) i << _T("] (type ") << var1[i].GetType() << _T(") = ") << var1[i].MakeString() << _T("\n");
1048     }
1049
1050     var1 = wxVariant(new wxFont(wxSystemSettings::GetFont(wxSYS_OEM_FIXED_FONT)));
1051     textCtrl << _T("var1 = (wxfont)\"");
1052     wxFont* font = wxGetVariantCast(var1,wxFont);
1053     if (font)
1054     {
1055         textCtrl << font->GetNativeFontInfoDesc() << _T("\"\n");
1056     }
1057     else
1058     {
1059         textCtrl << _T("(null)\"\n");
1060     }
1061 }
1062
1063 BEGIN_EVENT_TABLE(MyFrame, wxFrame)
1064     EVT_MENU(TYPES_QUIT, MyFrame::OnQuit)
1065     EVT_MENU(TYPES_ABOUT, MyFrame::OnAbout)
1066 END_EVENT_TABLE()
1067
1068 // My frame constructor
1069 MyFrame::MyFrame(wxFrame *parent, const wxString& title,
1070     const wxPoint& pos, const wxSize& size)
1071     : wxFrame(parent, wxID_ANY, title, pos, size)
1072 {}
1073
1074 void MyFrame::OnQuit(wxCommandEvent& WXUNUSED(event) )
1075 {
1076     Close(true);
1077 }
1078
1079 void MyFrame::OnAbout(wxCommandEvent& WXUNUSED(event) )
1080 {
1081     wxMessageDialog dialog(this, _T("Tests various wxWidgets types"),
1082         _T("About Types"), wxYES_NO|wxCANCEL);
1083
1084     dialog.ShowModal();
1085 }
1086
1087