samples/typetest/typetest.cpp

   1 /////////////////////////////////////////////////////////////////////////////
   2 // Name:        typetest.cpp
   3 // Purpose:     Types wxWindows sample
   4 // Author:      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 "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/time.h"
  28 #include "wx/date.h"
  29 #include "wx/variant.h"
  30 #include "wx/mimetype.h"
  31
  32 #include "typetest.h"
  33
  34 #if defined(__WXGTK__) || defined(__WXMOTIF__) || defined(__WXMAC__)
  35 #include "mondrian.xpm"
  36 #endif
  37
  38 #ifdef new
  39 #undef new
  40 #endif
  41
  42 #include "wx/ioswrap.h"
  43
  44 #if wxUSE_IOSTREAMH
  45     #include <fstream.h>
  46 #else
  47     #include <fstream>
  48 #endif
  49
  50 #include "wx/wfstream.h"
  51 #include "wx/datstrm.h"
  52 #include "wx/txtstrm.h"
  53 #include "wx/mstream.h"
  54
  55 // Create a new application object
  56 IMPLEMENT_APP    (MyApp)
  57
  58 IMPLEMENT_DYNAMIC_CLASS    (MyApp, wxApp)
  59
  60 BEGIN_EVENT_TABLE(MyApp, wxApp)
  61     EVT_MENU(TYPES_DATE,      MyApp::DoDateDemo)
  62     EVT_MENU(TYPES_TIME,      MyApp::DoTimeDemo)
  63     EVT_MENU(TYPES_VARIANT,   MyApp::DoVariantDemo)
  64     EVT_MENU(TYPES_BYTEORDER, MyApp::DoByteOrderDemo)
  65 #if wxUSE_UNICODE
  66     EVT_MENU(TYPES_UNICODE,   MyApp::DoUnicodeDemo)
  67 #endif
  68     EVT_MENU(TYPES_STREAM, MyApp::DoStreamDemo)
  69     EVT_MENU(TYPES_STREAM2, MyApp::DoStreamDemo2)
  70     EVT_MENU(TYPES_STREAM3, MyApp::DoStreamDemo3)
  71     EVT_MENU(TYPES_STREAM4, MyApp::DoStreamDemo4)
  72     EVT_MENU(TYPES_STREAM5, MyApp::DoStreamDemo5)
  73     EVT_MENU(TYPES_MIME, MyApp::DoMIMEDemo)
  74 END_EVENT_TABLE()
  75
  76 bool MyApp::OnInit()
  77 {
  78     // Create the main frame window
  79     MyFrame *frame = new MyFrame((wxFrame *) NULL, "wxWindows Types Demo",
  80                                  wxPoint(50, 50), wxSize(450, 340));
  81
  82     // Give it an icon
  83     frame->SetIcon(wxICON(mondrian));
  84
  85     // Make a menubar
  86     wxMenu *file_menu = new wxMenu;
  87
  88     file_menu->Append(TYPES_ABOUT, "&About");
  89     file_menu->AppendSeparator();
  90     file_menu->Append(TYPES_QUIT, "E&xit\tAlt-X");
  91
  92     wxMenu *test_menu = new wxMenu;
  93     test_menu->Append(TYPES_DATE, "&Date test");
  94     test_menu->Append(TYPES_TIME, "&Time test");
  95     test_menu->Append(TYPES_VARIANT, "&Variant test");
  96     test_menu->Append(TYPES_BYTEORDER, "&Byteorder test");
  97 #if wxUSE_UNICODE
  98     test_menu->Append(TYPES_UNICODE, "&Unicode test");
  99 #endif
 100     test_menu->Append(TYPES_STREAM, "&Stream test");
 101     test_menu->Append(TYPES_STREAM2, "&Stream seek test");
 102     test_menu->Append(TYPES_STREAM3, "&Stream error test");
 103     test_menu->Append(TYPES_STREAM4, "&Stream buffer test");
 104     test_menu->Append(TYPES_STREAM5, "&Stream peek test");
 105     test_menu->AppendSeparator();
 106     test_menu->Append(TYPES_MIME, "&MIME database test");
 107
 108     wxMenuBar *menu_bar = new wxMenuBar;
 109     menu_bar->Append(file_menu, "&File");
 110     menu_bar->Append(test_menu, "&Tests");
 111     frame->SetMenuBar(menu_bar);
 112
 113     m_textCtrl = new wxTextCtrl(frame, -1, "", wxPoint(0, 0), wxDefaultSize, wxTE_MULTILINE);
 114
 115     // Show the frame
 116     frame->Show(TRUE);
 117
 118     SetTopWindow(frame);
 119
 120     return TRUE;
 121 }
 122
 123 void MyApp::DoStreamDemo(wxCommandEvent& WXUNUSED(event))
 124 {
 125     wxTextCtrl& textCtrl = * GetTextCtrl();
 126
 127     textCtrl.Clear();
 128     textCtrl << _T("\nTest fstream vs. wxFileStream:\n\n");
 129
 130     textCtrl.WriteText( "Writing to ofstream and wxFileOutputStream:\n" );
 131
 132     wxSTD ofstream std_file_output( "test_std.dat" );
 133     wxFileOutputStream file_output( wxString("test_wx.dat") );
 134     wxBufferedOutputStream buf_output( file_output );
 135     wxTextOutputStream text_output( buf_output );
 136
 137     wxString tmp;
 138     signed int si = 0xFFFFFFFF;
 139     tmp.Printf( _T("Signed int: %d\n"), si );
 140     textCtrl.WriteText( tmp );
 141     text_output << si << "\n";
 142     std_file_output << si << "\n";
 143
 144     unsigned int ui = 0xFFFFFFFF;
 145     tmp.Printf( _T("Unsigned int: %u\n"), ui );
 146     textCtrl.WriteText( tmp );
 147     text_output << ui << "\n";
 148     std_file_output << ui << "\n";
 149
 150     double d = 2.01234567890123456789;
 151     tmp.Printf( _T("Double: %f\n"), d );
 152     textCtrl.WriteText( tmp );
 153     text_output << d << "\n";
 154     std_file_output << d << "\n";
 155
 156     float f = (float)0.00001;
 157     tmp.Printf( _T("Float: %f\n"), f );
 158     textCtrl.WriteText( tmp );
 159     text_output << f << "\n";
 160     std_file_output << f << "\n";
 161
 162     wxString str( _T("Hello!") );
 163     tmp.Printf( _T("String: %s\n"), str.c_str() );
 164     textCtrl.WriteText( tmp );
 165     text_output << str << "\n";
 166     std_file_output << str.c_str() << "\n";
 167
 168     textCtrl.WriteText( "\nReading from ifstream:\n" );
 169
 170     wxSTD ifstream std_file_input( "test_std.dat" );
 171
 172     std_file_input >> si;
 173     tmp.Printf( _T("Signed int: %d\n"), si );
 174     textCtrl.WriteText( tmp );
 175
 176     std_file_input >> ui;
 177     tmp.Printf( _T("Unsigned int: %u\n"), ui );
 178     textCtrl.WriteText( tmp );
 179
 180     std_file_input >> d;
 181     tmp.Printf( _T("Double: %f\n"), d );
 182     textCtrl.WriteText( tmp );
 183
 184     std_file_input >> f;
 185     tmp.Printf( _T("Float: %f\n"), f );
 186     textCtrl.WriteText( tmp );
 187
 188     // Why doesn't this work?
 189 #if 0
 190     char std_buf[200];
 191     std_file_input >> std_buf;
 192     tmp.Printf( _T("String: %s\n"), std_buf );
 193     textCtrl.WriteText( tmp );
 194 #endif
 195
 196     textCtrl.WriteText( "\nReading from wxFileInputStream:\n" );
 197
 198     buf_output.Sync();
 199
 200     wxFileInputStream file_input( wxString("test_wx.dat") );
 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 << "\nTest for wxDataStream:\n\n";
 227
 228     textCtrl.WriteText( "Writing to wxDataOutputStream:\n" );
 229
 230     file_output.SeekO( 0 );
 231     wxDataOutputStream data_output( buf_output );
 232
 233     wxInt16 i16 = (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 = "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( "\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( "Writing number 0 to 9 to buffered wxFileOutputStream:\n\n" );
 287
 288     wxFileOutputStream file_output( wxString("test_wx.dat") );
 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( wxString("test_wx.dat") );
 295     for (ch2 = 0; ch2 < 10; ch2++)
 296     {
 297         file_input.Read( &ch, 1 );
 298         textCtrl.WriteText( (char)(ch + '0') );
 299     }
 300     textCtrl.WriteText( "\n\n\n" );
 301
 302     textCtrl.WriteText( "Writing number 0 to 9 to buffered wxFileOutputStream, then\n" );
 303     textCtrl.WriteText( "seeking back to #3 and writing 3:\n\n" );
 304
 305     wxFileOutputStream file_output2( wxString("test_wx2.dat") );
 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 = 3;
 311     buf_output2.Write( &ch, 1 );
 312     buf_output2.Sync();
 313
 314     wxFileInputStream file_input2( wxString("test_wx2.dat") );
 315     for (ch2 = 0; ch2 < 10; ch2++)
 316     {
 317         file_input2.Read( &ch, 1 );
 318         textCtrl.WriteText( (char)(ch + '0') );
 319     }
 320     textCtrl.WriteText( "\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( "Reading number 0 to 9 from buffered wxFileInputStream, then\n" );
 330     textCtrl.WriteText( "seeking back to #3 and reading 3:\n\n" );
 331
 332     wxFileInputStream file_input3( wxString("test_wx2.dat") );
 333     wxBufferedInputStream buf_input3( file_input3 );
 334     for (ch2 = 0; ch2 < 10; ch2++)
 335     {
 336         buf_input3.Read( &ch, 1 );
 337         textCtrl.WriteText( (char)(ch + '0') );
 338     }
 339     for (int j = 0; j < 2000; j++)
 340        buf_input3.Read( &ch, 1 );
 341     textCtrl.WriteText( "\n" );
 342     buf_input3.SeekI( 3 );
 343     buf_input3.Read( &ch, 1 );
 344     textCtrl.WriteText( (char)(ch + '0') );
 345     textCtrl.WriteText( "\n\n\n" );
 346
 347 }
 348
 349 void MyApp::DoStreamDemo3(wxCommandEvent& WXUNUSED(event))
 350 {
 351     wxTextCtrl& textCtrl = * GetTextCtrl();
 352
 353     textCtrl.Clear();
 354     textCtrl << "\nTesting wxFileInputStream's and wxFFileInputStream's error handling:\n\n";
 355
 356     char ch,ch2;
 357
 358     textCtrl.WriteText( "Writing number 0 to 9 to wxFileOutputStream:\n\n" );
 359
 360     wxFileOutputStream file_output( wxString("test_wx.dat") );
 361     for (ch = 0; ch < 10; ch++)
 362         file_output.Write( &ch, 1 );
 363
 364     // Testing wxFileInputStream
 365
 366     textCtrl.WriteText( "Reading 0 to 10 to wxFileInputStream:\n\n" );
 367
 368     wxFileInputStream file_input( wxString("test_wx.dat") );
 369     for (ch2 = 0; ch2 < 11; ch2++)
 370     {
 371         file_input.Read( &ch, 1 );
 372         textCtrl.WriteText( "Value read: " );
 373         textCtrl.WriteText( (char)(ch + '0') );
 374         textCtrl.WriteText( ";  stream.LastError() returns: " );
 375         switch (file_input.LastError())
 376         {
 377             case wxSTREAM_NOERROR:      textCtrl.WriteText( "wxSTREAM_NOERROR\n" ); break;
 378             case wxSTREAM_EOF:          textCtrl.WriteText( "wxSTREAM_EOF\n" ); break;
 379             case wxSTREAM_READ_ERROR:   textCtrl.WriteText( "wxSTREAM_READ_ERROR\n" ); break;
 380             case wxSTREAM_WRITE_ERROR:  textCtrl.WriteText( "wxSTREAM_WRITE_ERROR\n" ); break;
 381             default: textCtrl.WriteText( "Huh?\n" ); break;
 382         }
 383     }
 384     textCtrl.WriteText( "\n" );
 385
 386     textCtrl.WriteText( "Seeking to 0;  stream.LastError() returns: " );
 387     file_input.SeekI( 0 );
 388     switch (file_input.LastError())
 389     {
 390         case wxSTREAM_NOERROR:      textCtrl.WriteText( "wxSTREAM_NOERROR\n" ); break;
 391         case wxSTREAM_EOF:          textCtrl.WriteText( "wxSTREAM_EOF\n" ); break;
 392         case wxSTREAM_READ_ERROR:   textCtrl.WriteText( "wxSTREAM_READ_ERROR\n" ); break;
 393         case wxSTREAM_WRITE_ERROR:  textCtrl.WriteText( "wxSTREAM_WRITE_ERROR\n" ); break;
 394         default: textCtrl.WriteText( "Huh?\n" ); break;
 395     }
 396     textCtrl.WriteText( "\n" );
 397
 398     file_input.Read( &ch, 1 );
 399     textCtrl.WriteText( "Value read: " );
 400     textCtrl.WriteText( (char)(ch + '0') );
 401     textCtrl.WriteText( ";  stream.LastError() returns: " );
 402     switch (file_input.LastError())
 403     {
 404         case wxSTREAM_NOERROR:      textCtrl.WriteText( "wxSTREAM_NOERROR\n" ); break;
 405         case wxSTREAM_EOF:          textCtrl.WriteText( "wxSTREAM_EOF\n" ); break;
 406         case wxSTREAM_READ_ERROR:   textCtrl.WriteText( "wxSTREAM_READ_ERROR\n" ); break;
 407         case wxSTREAM_WRITE_ERROR:  textCtrl.WriteText( "wxSTREAM_WRITE_ERROR\n" ); break;
 408         default: textCtrl.WriteText( "Huh?\n" ); break;
 409     }
 410     textCtrl.WriteText( "\n\n" );
 411
 412
 413     // Testing wxFFileInputStream
 414
 415     textCtrl.WriteText( "Reading 0 to 10 to wxFFileInputStream:\n\n" );
 416
 417     wxFFileInputStream ffile_input( wxString("test_wx.dat") );
 418     for (ch2 = 0; ch2 < 11; ch2++)
 419     {
 420         ffile_input.Read( &ch, 1 );
 421         textCtrl.WriteText( "Value read: " );
 422         textCtrl.WriteText( (char)(ch + '0') );
 423         textCtrl.WriteText( ";  stream.LastError() returns: " );
 424         switch (ffile_input.LastError())
 425         {
 426             case wxSTREAM_NOERROR:      textCtrl.WriteText( "wxSTREAM_NOERROR\n" ); break;
 427             case wxSTREAM_EOF:          textCtrl.WriteText( "wxSTREAM_EOF\n" ); break;
 428             case wxSTREAM_READ_ERROR:   textCtrl.WriteText( "wxSTREAM_READ_ERROR\n" ); break;
 429             case wxSTREAM_WRITE_ERROR:  textCtrl.WriteText( "wxSTREAM_WRITE_ERROR\n" ); break;
 430             default: textCtrl.WriteText( "Huh?\n" ); break;
 431             }
 432     }
 433     textCtrl.WriteText( "\n" );
 434
 435     textCtrl.WriteText( "Seeking to 0;  stream.LastError() returns: " );
 436     ffile_input.SeekI( 0 );
 437     switch (ffile_input.LastError())
 438     {
 439         case wxSTREAM_NOERROR:      textCtrl.WriteText( "wxSTREAM_NOERROR\n" ); break;
 440         case wxSTREAM_EOF:          textCtrl.WriteText( "wxSTREAM_EOF\n" ); break;
 441         case wxSTREAM_READ_ERROR:   textCtrl.WriteText( "wxSTREAM_READ_ERROR\n" ); break;
 442         case wxSTREAM_WRITE_ERROR:  textCtrl.WriteText( "wxSTREAM_WRITE_ERROR\n" ); break;
 443         default: textCtrl.WriteText( "Huh?\n" ); break;
 444     }
 445     textCtrl.WriteText( "\n" );
 446
 447     ffile_input.Read( &ch, 1 );
 448     textCtrl.WriteText( "Value read: " );
 449     textCtrl.WriteText( (char)(ch + '0') );
 450     textCtrl.WriteText( ";  stream.LastError() returns: " );
 451     switch (ffile_input.LastError())
 452     {
 453         case wxSTREAM_NOERROR:      textCtrl.WriteText( "wxSTREAM_NOERROR\n" ); break;
 454         case wxSTREAM_EOF:          textCtrl.WriteText( "wxSTREAM_EOF\n" ); break;
 455         case wxSTREAM_READ_ERROR:   textCtrl.WriteText( "wxSTREAM_READ_ERROR\n" ); break;
 456         case wxSTREAM_WRITE_ERROR:  textCtrl.WriteText( "wxSTREAM_WRITE_ERROR\n" ); break;
 457         default: textCtrl.WriteText( "Huh?\n" ); break;
 458     }
 459     textCtrl.WriteText( "\n\n" );
 460
 461     // Testing wxFFileInputStream
 462
 463     textCtrl.WriteText( "Reading 0 to 10 to buffered wxFFileInputStream:\n\n" );
 464
 465     wxFFileInputStream ffile_input2( wxString("test_wx.dat") );
 466     wxBufferedInputStream buf_input( ffile_input2 );
 467     for (ch2 = 0; ch2 < 11; ch2++)
 468     {
 469         buf_input.Read( &ch, 1 );
 470         textCtrl.WriteText( "Value read: " );
 471         textCtrl.WriteText( (char)(ch + '0') );
 472         textCtrl.WriteText( ";  stream.LastError() returns: " );
 473         switch (buf_input.LastError())
 474         {
 475             case wxSTREAM_NOERROR:      textCtrl.WriteText( "wxSTREAM_NOERROR\n" ); break;
 476             case wxSTREAM_EOF:          textCtrl.WriteText( "wxSTREAM_EOF\n" ); break;
 477             case wxSTREAM_READ_ERROR:   textCtrl.WriteText( "wxSTREAM_READ_ERROR\n" ); break;
 478             case wxSTREAM_WRITE_ERROR:  textCtrl.WriteText( "wxSTREAM_WRITE_ERROR\n" ); break;
 479             default: textCtrl.WriteText( "Huh?\n" ); break;
 480         }
 481     }
 482     textCtrl.WriteText( "\n" );
 483
 484     textCtrl.WriteText( "Seeking to 0;  stream.LastError() returns: " );
 485     buf_input.SeekI( 0 );
 486     switch (buf_input.LastError())
 487     {
 488         case wxSTREAM_NOERROR:      textCtrl.WriteText( "wxSTREAM_NOERROR\n" ); break;
 489         case wxSTREAM_EOF:          textCtrl.WriteText( "wxSTREAM_EOF\n" ); break;
 490         case wxSTREAM_READ_ERROR:   textCtrl.WriteText( "wxSTREAM_READ_ERROR\n" ); break;
 491         case wxSTREAM_WRITE_ERROR:  textCtrl.WriteText( "wxSTREAM_WRITE_ERROR\n" ); break;
 492         default: textCtrl.WriteText( "Huh?\n" ); break;
 493     }
 494     textCtrl.WriteText( "\n" );
 495
 496     buf_input.Read( &ch, 1 );
 497     textCtrl.WriteText( "Value read: " );
 498     textCtrl.WriteText( (char)(ch + '0') );
 499     textCtrl.WriteText( ";  stream.LastError() returns: " );
 500     switch (buf_input.LastError())
 501     {
 502         case wxSTREAM_NOERROR:      textCtrl.WriteText( "wxSTREAM_NOERROR\n" ); break;
 503         case wxSTREAM_EOF:          textCtrl.WriteText( "wxSTREAM_EOF\n" ); break;
 504         case wxSTREAM_READ_ERROR:   textCtrl.WriteText( "wxSTREAM_READ_ERROR\n" ); break;
 505         case wxSTREAM_WRITE_ERROR:  textCtrl.WriteText( "wxSTREAM_WRITE_ERROR\n" ); break;
 506         default: textCtrl.WriteText( "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 << "\nTesting wxStreamBuffer:\n\n";
 518
 519     // bigger than buffer
 520     textCtrl.WriteText( "Writing 2000x 1 to wxFileOutputStream.\n\n" );
 521
 522     wxFileOutputStream file_output( wxString("test_wx.dat") );
 523     for (int i = 0; i < 2000; i++)
 524     {
 525         char ch = 1;
 526         file_output.Write( &ch, 1 );
 527     }
 528
 529     textCtrl.WriteText( "Opening with a buffered wxFileInputStream:\n\n" );
 530
 531     wxFileInputStream file_input( wxString("test_wx.dat") );
 532     wxBufferedInputStream buf_input( file_input );
 533
 534     textCtrl.WriteText( "wxBufferedInputStream.LastError() returns: " );
 535     switch (buf_input.LastError())
 536     {
 537         case wxSTREAM_NOERROR:      textCtrl.WriteText( "wxSTREAM_NOERROR\n" ); break;
 538         case wxSTREAM_EOF:          textCtrl.WriteText( "wxSTREAM_EOF\n" ); break;
 539         case wxSTREAM_READ_ERROR:   textCtrl.WriteText( "wxSTREAM_READ_ERROR\n" ); break;
 540         case wxSTREAM_WRITE_ERROR:  textCtrl.WriteText( "wxSTREAM_WRITE_ERROR\n" ); break;
 541         default: textCtrl.WriteText( "Huh?\n" ); break;
 542     }
 543     msg.Printf( "wxBufferedInputStream.LastRead() returns: %d\n", (int)buf_input.LastRead() );
 544     textCtrl.WriteText( msg );
 545     msg.Printf( "wxBufferedInputStream.TellI() returns: %d\n", (int)buf_input.TellI() );
 546     textCtrl.WriteText( msg );
 547     textCtrl.WriteText( "\n\n" );
 548
 549
 550     textCtrl.WriteText( "Seeking to position 300:\n\n" );
 551
 552     buf_input.SeekI( 300 );
 553
 554     textCtrl.WriteText( "wxBufferedInputStream.LastError() returns: " );
 555     switch (buf_input.LastError())
 556     {
 557         case wxSTREAM_NOERROR:      textCtrl.WriteText( "wxSTREAM_NOERROR\n" ); break;
 558         case wxSTREAM_EOF:          textCtrl.WriteText( "wxSTREAM_EOF\n" ); break;
 559         case wxSTREAM_READ_ERROR:   textCtrl.WriteText( "wxSTREAM_READ_ERROR\n" ); break;
 560         case wxSTREAM_WRITE_ERROR:  textCtrl.WriteText( "wxSTREAM_WRITE_ERROR\n" ); break;
 561         default: textCtrl.WriteText( "Huh?\n" ); break;
 562     }
 563     msg.Printf( "wxBufferedInputStream.LastRead() returns: %d\n", (int)buf_input.LastRead() );
 564     textCtrl.WriteText( msg );
 565     msg.Printf( "wxBufferedInputStream.TellI() returns: %d\n", (int)buf_input.TellI() );
 566     textCtrl.WriteText( msg );
 567     textCtrl.WriteText( "\n\n" );
 568
 569
 570     char buf[2000];
 571
 572     textCtrl.WriteText( "Reading 500 bytes:\n\n" );
 573
 574     buf_input.Read( buf, 500 );
 575
 576     textCtrl.WriteText( "wxBufferedInputStream.LastError() returns: " );
 577     switch (buf_input.LastError())
 578     {
 579         case wxSTREAM_NOERROR:      textCtrl.WriteText( "wxSTREAM_NOERROR\n" ); break;
 580         case wxSTREAM_EOF:          textCtrl.WriteText( "wxSTREAM_EOF\n" ); break;
 581         case wxSTREAM_READ_ERROR:   textCtrl.WriteText( "wxSTREAM_READ_ERROR\n" ); break;
 582         case wxSTREAM_WRITE_ERROR:  textCtrl.WriteText( "wxSTREAM_WRITE_ERROR\n" ); break;
 583         default: textCtrl.WriteText( "Huh?\n" ); break;
 584     }
 585     msg.Printf( "wxBufferedInputStream.LastRead() returns: %d\n", (int)buf_input.LastRead() );
 586     textCtrl.WriteText( msg );
 587     msg.Printf( "wxBufferedInputStream.TellI() returns: %d\n", (int)buf_input.TellI() );
 588     textCtrl.WriteText( msg );
 589     textCtrl.WriteText( "\n\n" );
 590
 591     textCtrl.WriteText( "Reading another 500 bytes:\n\n" );
 592
 593     buf_input.Read( buf, 500 );
 594
 595     textCtrl.WriteText( "wxBufferedInputStream.LastError() returns: " );
 596     switch (buf_input.LastError())
 597     {
 598         case wxSTREAM_NOERROR:      textCtrl.WriteText( "wxSTREAM_NOERROR\n" ); break;
 599         case wxSTREAM_EOF:          textCtrl.WriteText( "wxSTREAM_EOF\n" ); break;
 600         case wxSTREAM_READ_ERROR:   textCtrl.WriteText( "wxSTREAM_READ_ERROR\n" ); break;
 601         case wxSTREAM_WRITE_ERROR:  textCtrl.WriteText( "wxSTREAM_WRITE_ERROR\n" ); break;
 602         default: textCtrl.WriteText( "Huh?\n" ); break;
 603     }
 604     msg.Printf( "wxBufferedInputStream.LastRead() returns: %d\n", (int)buf_input.LastRead() );
 605     textCtrl.WriteText( msg );
 606     msg.Printf( "wxBufferedInputStream.TellI() returns: %d\n", (int)buf_input.TellI() );
 607     textCtrl.WriteText( msg );
 608     textCtrl.WriteText( "\n\n" );
 609
 610     textCtrl.WriteText( "Reading another 500 bytes:\n\n" );
 611
 612     buf_input.Read( buf, 500 );
 613
 614     textCtrl.WriteText( "wxBufferedInputStream.LastError() returns: " );
 615     switch (buf_input.LastError())
 616     {
 617         case wxSTREAM_NOERROR:      textCtrl.WriteText( "wxSTREAM_NOERROR\n" ); break;
 618         case wxSTREAM_EOF:          textCtrl.WriteText( "wxSTREAM_EOF\n" ); break;
 619         case wxSTREAM_READ_ERROR:   textCtrl.WriteText( "wxSTREAM_READ_ERROR\n" ); break;
 620         case wxSTREAM_WRITE_ERROR:  textCtrl.WriteText( "wxSTREAM_WRITE_ERROR\n" ); break;
 621         default: textCtrl.WriteText( "Huh?\n" ); break;
 622     }
 623     msg.Printf( "wxBufferedInputStream.LastRead() returns: %d\n", (int)buf_input.LastRead() );
 624     textCtrl.WriteText( msg );
 625     msg.Printf( "wxBufferedInputStream.TellI() returns: %d\n", (int)buf_input.TellI() );
 626     textCtrl.WriteText( msg );
 627     textCtrl.WriteText( "\n\n" );
 628
 629     textCtrl.WriteText( "Reading another 500 bytes:\n\n" );
 630
 631     buf_input.Read( buf, 500 );
 632
 633     textCtrl.WriteText( "wxBufferedInputStream.LastError() returns: " );
 634     switch (buf_input.LastError())
 635     {
 636         case wxSTREAM_NOERROR:      textCtrl.WriteText( "wxSTREAM_NOERROR\n" ); break;
 637         case wxSTREAM_EOF:          textCtrl.WriteText( "wxSTREAM_EOF\n" ); break;
 638         case wxSTREAM_READ_ERROR:   textCtrl.WriteText( "wxSTREAM_READ_ERROR\n" ); break;
 639         case wxSTREAM_WRITE_ERROR:  textCtrl.WriteText( "wxSTREAM_WRITE_ERROR\n" ); break;
 640         default: textCtrl.WriteText( "Huh?\n" ); break;
 641     }
 642     msg.Printf( "wxBufferedInputStream.LastRead() returns: %d\n", (int)buf_input.LastRead() );
 643     textCtrl.WriteText( msg );
 644     msg.Printf( "wxBufferedInputStream.TellI() returns: %d\n", (int)buf_input.TellI() );
 645     textCtrl.WriteText( msg );
 646     textCtrl.WriteText( "\n\n" );
 647 }
 648
 649 void MyApp::DoStreamDemo5(wxCommandEvent& WXUNUSED(event))
 650 {
 651     wxTextCtrl& textCtrl = * GetTextCtrl();
 652
 653     textCtrl.Clear();
 654     textCtrl << "\nTesting wxFileInputStream's Peek():\n\n";
 655
 656     char ch;
 657     wxString str;
 658
 659     textCtrl.WriteText( "Writing number 0 to 9 to wxFileOutputStream:\n\n" );
 660
 661     wxFileOutputStream file_output( wxString("test_wx.dat") );
 662     for (ch = 0; ch < 10; ch++)
 663         file_output.Write( &ch, 1 );
 664
 665     file_output.Sync();
 666
 667     wxFileInputStream file_input( wxString("test_wx.dat") );
 668
 669     ch = file_input.Peek();
 670     str.Printf( "First char peeked: %d\n", (int) ch );
 671     textCtrl.WriteText( str );
 672
 673     ch = file_input.GetC();
 674     str.Printf( "First char read: %d\n", (int) ch );
 675     textCtrl.WriteText( str );
 676
 677     ch = file_input.Peek();
 678     str.Printf( "Second char peeked: %d\n", (int) ch );
 679     textCtrl.WriteText( str );
 680
 681     ch = file_input.GetC();
 682     str.Printf( "Second char read: %d\n", (int) ch );
 683     textCtrl.WriteText( str );
 684
 685     ch = file_input.Peek();
 686     str.Printf( "Third char peeked: %d\n", (int) ch );
 687     textCtrl.WriteText( str );
 688
 689     ch = file_input.GetC();
 690     str.Printf( "Third char read: %d\n", (int) ch );
 691     textCtrl.WriteText( str );
 692
 693
 694     textCtrl << "\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( "First char peeked: %d\n", (int) ch );
 701     textCtrl.WriteText( str );
 702
 703     ch = input.GetC();
 704     str.Printf( "First char read: %d\n", (int) ch );
 705     textCtrl.WriteText( str );
 706
 707     ch = input.Peek();
 708     str.Printf( "Second char peeked: %d\n", (int) ch );
 709     textCtrl.WriteText( str );
 710
 711     ch = input.GetC();
 712     str.Printf( "Second char read: %d\n", (int) ch );
 713     textCtrl.WriteText( str );
 714
 715     ch = input.Peek();
 716     str.Printf( "Third char peeked: %d\n", (int) ch );
 717     textCtrl.WriteText( str );
 718
 719     ch = input.GetC();
 720     str.Printf( "Third char read: %d\n", (int) ch );
 721     textCtrl.WriteText( str );
 722 }
 723
 724 #if wxUSE_UNICODE
 725 void MyApp::DoUnicodeDemo(wxCommandEvent& WXUNUSED(event))
 726 {
 727     wxTextCtrl& textCtrl = * GetTextCtrl();
 728
 729     textCtrl.Clear();
 730     textCtrl << "\nTest wchar_t to char (Unicode to ANSI/Multibyte) converions:";
 731
 732     wxString str;
 733     str = _T("Robert Röbling\n");
 734
 735     printf( "\n\nConversion with wxConvLocal:\n" );
 736     wxConvCurrent = &wxConvLocal;
 737     printf( (const char*) str.mbc_str() );
 738
 739     printf( "\n\nConversion with wxConvGdk:\n" );
 740     wxConvCurrent = &wxConvGdk;
 741     printf( (const char*) str.mbc_str() );
 742
 743     printf( "\n\nConversion with wxConvLibc:\n" );
 744     wxConvCurrent = &wxConvLibc;
 745     printf( (const char*) str.mbc_str() );
 746
 747 }
 748 #endif
 749
 750 void MyApp::DoMIMEDemo(wxCommandEvent& WXUNUSED(event))
 751 {
 752     static wxString s_defaultExt = "xyz";
 753
 754     wxString ext = wxGetTextFromUser("Enter a file extension: ",
 755                                      "MIME database test",
 756                                      s_defaultExt);
 757     if ( !!ext )
 758     {
 759         s_defaultExt = ext;
 760
 761         // init MIME database if not done yet
 762         if ( !m_mimeDatabase )
 763         {
 764             m_mimeDatabase = new wxMimeTypesManager;
 765
 766             static const wxFileTypeInfo fallbacks[] =
 767             {
 768                 wxFileTypeInfo("application/xyz",
 769                                "XyZ %s",
 770                                "XyZ -p %s",
 771                                "The one and only XYZ format file",
 772                                "xyz", "123", NULL),
 773                 wxFileTypeInfo("text/html",
 774                                "lynx %s",
 775                                "lynx -dump %s | lpr",
 776                                "HTML document (from fallback)",
 777                                "htm", "html", NULL),
 778
 779                 // must terminate the table with this!
 780                 wxFileTypeInfo()
 781             };
 782
 783             m_mimeDatabase->AddFallbacks(fallbacks);
 784         }
 785
 786         wxTextCtrl& textCtrl = * GetTextCtrl();
 787
 788         wxFileType *filetype = m_mimeDatabase->GetFileTypeFromExtension(ext);
 789         if ( !filetype )
 790         {
 791             textCtrl << "Unknown extension '" << ext << "'\n";
 792         }
 793         else
 794         {
 795             wxString type, desc, open;
 796             filetype->GetMimeType(&type);
 797             filetype->GetDescription(&desc);
 798
 799             wxString filename = "filename";
 800             filename << "." << ext;
 801             wxFileType::MessageParameters params(filename, type);
 802             filetype->GetOpenCommand(&open, params);
 803
 804             textCtrl << "MIME information about extension '" << ext << "'\n"
 805                      << "\tMIME type: " << ( !type ? "unknown"
 806                                                    : type.c_str() ) << '\n'
 807                      << "\tDescription: " << ( !desc ? "" : desc.c_str() )
 808                         << '\n'
 809                      << "\tCommand to open: " << ( !open ? "no" : open.c_str() )
 810                         << '\n';
 811
 812             delete filetype;
 813         }
 814     }
 815     //else: cancelled by user
 816 }
 817
 818 void MyApp::DoByteOrderDemo(wxCommandEvent& WXUNUSED(event))
 819 {
 820     wxTextCtrl& textCtrl = * GetTextCtrl();
 821
 822     textCtrl.Clear();
 823     textCtrl << "\nTest byte order macros:\n\n";
 824
 825     if (wxBYTE_ORDER == wxLITTLE_ENDIAN)
 826         textCtrl << "This is a little endian system.\n\n";
 827     else
 828         textCtrl << "This is a big endian system.\n\n";
 829
 830     wxString text;
 831
 832     wxInt32 var = 0xF1F2F3F4;
 833     text = "";
 834     text.Printf( _T("Value of wxInt32 is now: %#x.\n\n"), var );
 835     textCtrl.WriteText( text );
 836
 837     text = "";
 838     text.Printf( _T("Value of swapped wxInt32 is: %#x.\n\n"), wxINT32_SWAP_ALWAYS( var ) );
 839     textCtrl.WriteText( text );
 840
 841     text = "";
 842     text.Printf( _T("Value of wxInt32 swapped on little endian is: %#x.\n\n"), wxINT32_SWAP_ON_LE( var ) );
 843     textCtrl.WriteText( text );
 844
 845     text = "";
 846     text.Printf( _T("Value of wxInt32 swapped on big endian is: %#x.\n\n"), wxINT32_SWAP_ON_BE( var ) );
 847     textCtrl.WriteText( text );
 848 }
 849
 850 void MyApp::DoTimeDemo(wxCommandEvent& WXUNUSED(event))
 851 {
 852     wxTextCtrl& textCtrl = * GetTextCtrl();
 853
 854     textCtrl.Clear();
 855     textCtrl << "\nTest class wxTime:\n";
 856     wxTime now;
 857     textCtrl << "It is now " << (wxString) now << "\n";
 858 }
 859
 860 void MyApp::DoDateDemo(wxCommandEvent& WXUNUSED(event))
 861 {
 862     wxTextCtrl& textCtrl = * GetTextCtrl();
 863
 864     textCtrl.Clear();
 865     textCtrl << "\nTest class wxDate" << "\n";
 866
 867     // Various versions of the constructors
 868     // and various output
 869
 870     wxDate x(10,20,1962);
 871
 872     textCtrl << x.FormatDate(wxFULL) << "  (full)\n";
 873
 874     // constuctor with a string, just printing the day of the week
 875     wxDate y("8/8/1988");
 876
 877     textCtrl << y.FormatDate(wxDAY) << "  (just day)\n";
 878
 879     // constructor with a julian
 880     wxDate z( 2450000L );
 881     textCtrl << z.FormatDate(wxFULL) << "  (full)\n";
 882
 883     // using date addition and subtraction
 884     wxDate a = x + 10;
 885     textCtrl << a.FormatDate(wxFULL) << "  (full)\n";
 886     a = a - 25;
 887     textCtrl << a.FormatDate(wxEUROPEAN) << "  (European)\n";
 888
 889     // Using subtraction of two date objects
 890     wxDate a1 = wxString("7/13/1991");
 891     wxDate a2 = a1 + 14;
 892     textCtrl << (a1-a2) << "\n";
 893     textCtrl << (a2+=10) << "\n";
 894
 895     a1++;
 896     textCtrl << "Tomorrow= " << a1.FormatDate(wxFULL) << "\n";
 897
 898     wxDate tmpDate1("08/01/1991");
 899     wxDate tmpDate2("07/14/1991");
 900     textCtrl << "a1 (7-14-91) < 8-01-91 ? ==> " << ((a1 < tmpDate1) ? "TRUE" : "FALSE") << "\n";
 901     textCtrl << "a1 (7-14-91) > 8-01-91 ? ==> " << ((a1 > tmpDate1) ? "TRUE" : "FALSE") << "\n";
 902     textCtrl << "a1 (7-14-91)== 7-14-91 ? ==> " << ((a1==tmpDate2) ? "TRUE" : "FALSE") << "\n";
 903
 904     wxDate a3 = a1;
 905     textCtrl << "a1 (7-14-91)== a3 (7-14-91) ? ==> " << ((a1==a3) ? "TRUE" : "FALSE") << "\n";
 906     wxDate a4 = a1;
 907     textCtrl << "a1 (7-14-91)== a4 (7-15-91) ? ==> " << ((a1==++a4) ? "TRUE" : "FALSE") << "\n";
 908
 909     wxDate a5 = wxString("today");
 910     textCtrl << "Today is: " << a5 << "\n";
 911     a4 = "TODAY";
 912     textCtrl << "Today (a4) is: " << a4 << "\n";
 913
 914     textCtrl << "Today + 4 is: " << (a4+=4) << "\n";
 915     a4 = "TODAY";
 916     textCtrl << "Today - 4 is: " << (a4-=4) << "\n";
 917
 918     textCtrl << "=========== Leap Year Test ===========\n";
 919     a1 = "1/15/1992";
 920     textCtrl << a1.FormatDate(wxFULL) << "  " << ((a1.IsLeapYear()) ? "Leap" : "non-Leap");
 921     textCtrl << "  " << "day of year:  " << a1.GetDayOfYear() << "\n";
 922
 923     a1 = "2/16/1993";
 924     textCtrl << a1.FormatDate(wxFULL) << "  " << ((a1.IsLeapYear()) ? "Leap" : "non-Leap");
 925     textCtrl << "  " << "day of year:  " << a1.GetDayOfYear() << "\n";
 926
 927     textCtrl << "================== string assignment test ====================\n";
 928     wxString date_string=a1;
 929     textCtrl << "a1 as a string (s/b 2/16/1993) ==> " << date_string << "\n";
 930
 931     textCtrl << "================== SetFormat test ============================\n";
 932     a1.SetFormat(wxFULL);
 933     textCtrl << "a1 (s/b FULL format) ==> " << a1 << "\n";
 934     a1.SetFormat(wxEUROPEAN);
 935     textCtrl << "a1 (s/b EUROPEAN format) ==> " << a1 << "\n";
 936
 937     textCtrl << "================== SetOption test ============================\n";
 938     textCtrl << "Date abbreviation ON\n";
 939
 940     a1.SetOption(wxDATE_ABBR);
 941     a1.SetFormat(wxMONTH);
 942     textCtrl << "a1 (s/b MONTH format) ==> " << a1 << "\n";
 943     a1.SetFormat(wxDAY);
 944     textCtrl << "a1 (s/b DAY format) ==> " << a1 << "\n";
 945     a1.SetFormat(wxFULL);
 946     textCtrl << "a1 (s/b FULL format) ==> " << a1 << "\n";
 947     a1.SetFormat(wxEUROPEAN);
 948     textCtrl << "a1 (s/b EUROPEAN format) ==> " << a1 << "\n";
 949     textCtrl << "Century suppression ON\n";
 950     a1.SetOption(wxNO_CENTURY);
 951     a1.SetFormat(wxMDY);
 952     textCtrl << "a1 (s/b MDY format) ==> " << a1 << "\n";
 953     textCtrl << "Century suppression OFF\n";
 954     a1.SetOption(wxNO_CENTURY,FALSE);
 955     textCtrl << "a1 (s/b MDY format) ==> " << a1 << "\n";
 956     textCtrl << "Century suppression ON\n";
 957     a1.SetOption(wxNO_CENTURY);
 958     textCtrl << "a1 (s/b MDY format) ==> " << a1 << "\n";
 959     a1.SetFormat(wxFULL);
 960     textCtrl << "a1 (s/b FULL format) ==> " << a1 << "\n";
 961
 962     textCtrl << "\n=============== Version 4.0 Enhancement Test =================\n";
 963
 964     wxDate v4("11/26/1966");
 965     textCtrl << "\n---------- Set Stuff -----------\n";
 966     textCtrl << "First, 'Set' to today..." << "\n";
 967     textCtrl << "Before 'Set' => " << v4 << "\n";
 968     textCtrl << "After  'Set' => " << v4.Set() << "\n\n";
 969
 970     textCtrl << "Set to 11/26/66 => " << v4.Set(11,26,1966) << "\n";
 971     textCtrl << "Current Julian  => " << v4.GetJulianDate() << "\n";
 972     textCtrl << "Set to Julian 2450000L => " << v4.Set(2450000L) << "\n";
 973     textCtrl << "See! => " << v4.GetJulianDate() << "\n";
 974
 975     textCtrl << "---------- Add Stuff -----------\n";
 976     textCtrl << "Start => " << v4 << "\n";
 977     textCtrl << "Add 4 Weeks => " << v4.AddWeeks(4) << "\n";
 978     textCtrl << "Sub 1 Month => " << v4.AddMonths(-1) << "\n";
 979     textCtrl << "Add 2 Years => " << v4.AddYears(2) << "\n";
 980
 981     textCtrl << "---------- Misc Stuff -----------\n";
 982     textCtrl << "The date aboves' day of the month is => " << v4.GetDay() << "\n";
 983     textCtrl << "There are " << v4.GetDaysInMonth() << " days in this month.\n";
 984     textCtrl << "The first day of this month lands on " << v4.GetFirstDayOfMonth() << "\n";
 985     textCtrl << "This day happens to be " << v4.GetDayOfWeekName() << "\n";
 986     textCtrl << "the " << v4.GetDayOfWeek() << " day of the week," << "\n";
 987     textCtrl << "on the " << v4.GetWeekOfYear() << " week of the year," << "\n";
 988     textCtrl << "on the " << v4.GetWeekOfMonth() << " week of the month, " << "\n";
 989     textCtrl << "(which is " << v4.GetMonthName() << ")\n";
 990     textCtrl << "the "<< v4.GetMonth() << "th month in the year.\n";
 991     textCtrl << "The year alone is " << v4.GetYear() << "\n";
 992
 993     textCtrl << "---------- First and Last Stuff -----------\n";
 994     v4.Set();
 995     textCtrl << "The first date of this month is " << v4.GetMonthStart() << "\n";
 996     textCtrl << "The last date of this month is " << v4.GetMonthEnd() << "\n";
 997     textCtrl << "The first date of this year is " << v4.GetYearStart() << "\n";
 998     textCtrl << "The last date of this year is " << v4.GetYearEnd() << "\n";
 999 }
1000
1001 void MyApp::DoVariantDemo(wxCommandEvent& WXUNUSED(event) )
1002 {
1003     wxTextCtrl& textCtrl = * GetTextCtrl();
1004
1005     wxVariant var1 = "String value";
1006     textCtrl << "var1 = " << var1.MakeString() << "\n";
1007
1008     // Conversion
1009     wxString str = var1.MakeString();
1010
1011     var1 = 123.456;
1012     textCtrl << "var1 = " << var1.GetReal() << "\n";
1013
1014     // Implicit conversion
1015     double v = var1;
1016
1017     var1 = 9876L;
1018     textCtrl << "var1 = " << var1.GetLong() << "\n";
1019
1020     // Implicit conversion
1021     long l = var1;
1022
1023     // suppress compile warnings about unused variables
1024     if ( l < v )
1025     {
1026         ;
1027     }
1028
1029     wxStringList stringList;
1030     stringList.Add(_T("one")); stringList.Add(_T("two")); stringList.Add(_T("three"));
1031     var1 = stringList;
1032     textCtrl << "var1 = " << var1.MakeString() << "\n";
1033
1034     var1.ClearList();
1035     var1.Append(wxVariant(1.2345));
1036     var1.Append(wxVariant("hello"));
1037     var1.Append(wxVariant(54321L));
1038
1039     textCtrl << "var1 = " << var1.MakeString() << "\n";
1040
1041     size_t n = var1.GetCount();
1042     size_t i;
1043     for (i = (size_t) 0; i < n; i++)
1044     {
1045         textCtrl << "var1[" << (int) i << "] (type " << var1[i].GetType() << ") = " << var1[i].MakeString() << "\n";
1046     }
1047 }
1048
1049 BEGIN_EVENT_TABLE(MyFrame, wxFrame)
1050     EVT_MENU(TYPES_QUIT, MyFrame::OnQuit)
1051     EVT_MENU(TYPES_ABOUT, MyFrame::OnAbout)
1052 END_EVENT_TABLE()
1053
1054 // My frame constructor
1055 MyFrame::MyFrame(wxFrame *parent, const wxString& title,
1056        const wxPoint& pos, const wxSize& size):
1057   wxFrame(parent, -1, title, pos, size)
1058 {}
1059
1060 void MyFrame::OnQuit(wxCommandEvent& WXUNUSED(event) )
1061 {
1062   Close(TRUE);
1063 }
1064
1065 void MyFrame::OnAbout(wxCommandEvent& WXUNUSED(event) )
1066 {
1067   wxMessageDialog dialog(this, "Tests various wxWindows types",
1068       "About Types", wxYES_NO|wxCANCEL);
1069
1070   dialog.ShowModal();
1071 }
1072
1073