samples/dialogs/dialogs.cpp

   1 /////////////////////////////////////////////////////////////////////////////
   2 // Name:        dialogs.cpp
   3 // Purpose:     Common dialogs demo
   4 // Author:      Julian Smart
   5 // Modified by: ABX (2004) - adjustements for conditional building + new menu
   6 // Created:     04/01/98
   7 // RCS-ID:      $Id$
   8 // Copyright:   (c) Julian Smart
   9 // Licence:     wxWindows license
  10 /////////////////////////////////////////////////////////////////////////////
  11
  12 // For compilers that support precompilation, includes "wx/wx.h".
  13 #include "wx/wxprec.h"
  14
  15 #ifdef __BORLANDC__
  16 #pragma hdrstop
  17 #endif
  18
  19 #ifndef WX_PRECOMP
  20 #include "wx/wx.h"
  21 #endif
  22
  23 #include "../sample.xpm"
  24
  25 #include "wx/datetime.h"
  26 #include "wx/image.h"
  27 #include "wx/bookctrl.h"
  28 #include "wx/artprov.h"
  29 #include "wx/imaglist.h"
  30 #include "wx/sysopt.h"
  31
  32 #if wxUSE_COLOURDLG
  33     #include "wx/colordlg.h"
  34 #endif // wxUSE_COLOURDLG
  35
  36 #if wxUSE_CHOICEDLG
  37     #include "wx/choicdlg.h"
  38 #endif // wxUSE_CHOICEDLG
  39
  40 #if wxUSE_STARTUP_TIPS
  41     #include "wx/tipdlg.h"
  42 #endif // wxUSE_STARTUP_TIPS
  43
  44 #if wxUSE_PROGRESSDLG
  45 #if wxUSE_STOPWATCH && wxUSE_LONGLONG
  46     #include "wx/datetime.h"      // wxDateTime
  47 #endif
  48
  49     #include "wx/progdlg.h"
  50 #endif // wxUSE_PROGRESSDLG
  51
  52 #if wxUSE_BUSYINFO
  53     #include "wx/busyinfo.h"
  54 #endif // wxUSE_BUSYINFO
  55
  56 #if wxUSE_NUMBERDLG
  57     #include "wx/numdlg.h"
  58 #endif // wxUSE_NUMBERDLG
  59
  60 #if wxUSE_FILEDLG
  61     #include "wx/filedlg.h"
  62 #endif // wxUSE_FILEDLG
  63
  64 #if wxUSE_DIRDLG
  65     #include "wx/dirdlg.h"
  66 #endif // wxUSE_DIRDLG
  67
  68 #if wxUSE_FONTDLG
  69     #include "wx/fontdlg.h"
  70 #endif // wxUSE_FONTDLG
  71
  72 #if wxUSE_FINDREPLDLG
  73     #include "wx/fdrepdlg.h"
  74 #endif // wxUSE_FINDREPLDLG
  75
  76 #if wxUSE_SPINCTRL
  77 #include "wx/spinctrl.h"
  78 #endif
  79
  80 #include "wx/propdlg.h"
  81
  82 #include "dialogs.h"
  83
  84 #if USE_COLOURDLG_GENERIC
  85     #include "wx/generic/colrdlgg.h"
  86 #endif // USE_COLOURDLG_GENERIC
  87
  88 #if USE_DIRDLG_GENERIC
  89     #include "wx/generic/dirdlgg.h"
  90 #endif // USE_DIRDLG_GENERIC
  91
  92 #if USE_FILEDLG_GENERIC
  93     #include "wx/generic/filedlgg.h"
  94 #endif // USE_FILEDLG_GENERIC
  95
  96 #if USE_FONTDLG_GENERIC
  97     #include "wx/generic/fontdlgg.h"
  98 #endif // USE_FONTDLG_GENERIC
  99
 100 IMPLEMENT_APP(MyApp)
 101
 102 BEGIN_EVENT_TABLE(MyCanvas, wxScrolledWindow)
 103     EVT_PAINT(MyCanvas::OnPaint)
 104 END_EVENT_TABLE()
 105
 106
 107
 108 BEGIN_EVENT_TABLE(MyFrame, wxFrame)
 109     EVT_MENU(DIALOGS_MESSAGE_BOX,                   MyFrame::MessageBox)
 110
 111 #if wxUSE_COLOURDLG
 112     EVT_MENU(DIALOGS_CHOOSE_COLOUR,                 MyFrame::ChooseColour)
 113 #endif // wxUSE_COLOURDLG
 114
 115 #if wxUSE_FONTDLG
 116     EVT_MENU(DIALOGS_CHOOSE_FONT,                   MyFrame::ChooseFont)
 117 #endif // wxUSE_FONTDLG
 118
 119 #if wxUSE_LOG_DIALOG
 120     EVT_MENU(DIALOGS_LOG_DIALOG,                    MyFrame::LogDialog)
 121 #endif // wxUSE_LOG_DIALOG
 122
 123 #if wxUSE_TEXTDLG
 124     EVT_MENU(DIALOGS_TEXT_ENTRY,                    MyFrame::TextEntry)
 125     EVT_MENU(DIALOGS_PASSWORD_ENTRY,                MyFrame::PasswordEntry)
 126 #endif // wxUSE_TEXTDLG
 127
 128 #if wxUSE_NUMBERDLG
 129     EVT_MENU(DIALOGS_NUM_ENTRY,                     MyFrame::NumericEntry)
 130 #endif // wxUSE_NUMBERDLG
 131
 132 #if wxUSE_CHOICEDLG
 133     EVT_MENU(DIALOGS_SINGLE_CHOICE,                 MyFrame::SingleChoice)
 134     EVT_MENU(DIALOGS_MULTI_CHOICE,                  MyFrame::MultiChoice)
 135 #endif // wxUSE_CHOICEDLG
 136
 137 #if wxUSE_FILEDLG
 138     EVT_MENU(DIALOGS_FILE_OPEN,                     MyFrame::FileOpen)
 139     EVT_MENU(DIALOGS_FILE_OPEN2,                    MyFrame::FileOpen2)
 140     EVT_MENU(DIALOGS_FILES_OPEN,                    MyFrame::FilesOpen)
 141     EVT_MENU(DIALOGS_FILE_SAVE,                     MyFrame::FileSave)
 142 #endif // wxUSE_FILEDLG
 143
 144 #if USE_FILEDLG_GENERIC
 145     EVT_MENU(DIALOGS_FILE_OPEN_GENERIC,             MyFrame::FileOpenGeneric)
 146     EVT_MENU(DIALOGS_FILES_OPEN_GENERIC,            MyFrame::FilesOpenGeneric)
 147     EVT_MENU(DIALOGS_FILE_SAVE_GENERIC,             MyFrame::FileSaveGeneric)
 148 #endif // USE_FILEDLG_GENERIC
 149
 150 #if wxUSE_DIRDLG
 151     EVT_MENU(DIALOGS_DIR_CHOOSE,                    MyFrame::DirChoose)
 152     EVT_MENU(DIALOGS_DIRNEW_CHOOSE,                 MyFrame::DirChooseNew)
 153 #endif // wxUSE_DIRDLG
 154
 155 #if USE_MODAL_PRESENTATION
 156     EVT_MENU(DIALOGS_MODAL,                         MyFrame::ModalDlg)
 157     EVT_MENU(DIALOGS_MODELESS,                      MyFrame::ModelessDlg)
 158     EVT_MENU(DIALOGS_CENTRE_SCREEN,                 MyFrame::DlgCenteredScreen)
 159     EVT_MENU(DIALOGS_CENTRE_PARENT,                 MyFrame::DlgCenteredParent)
 160 #endif // USE_MODAL
 161
 162 #if wxUSE_STARTUP_TIPS
 163     EVT_MENU(DIALOGS_TIP,                           MyFrame::ShowTip)
 164 #endif // wxUSE_STARTUP_TIPS
 165
 166 #if USE_FONTDLG_GENERIC
 167     EVT_MENU(DIALOGS_CHOOSE_FONT_GENERIC,           MyFrame::ChooseFontGeneric)
 168 #endif // USE_FONTDLG_GENERIC
 169
 170 #if USE_DIRDLG_GENERIC
 171     EVT_MENU(DIALOGS_GENERIC_DIR_CHOOSE,            MyFrame::GenericDirChoose)
 172 #endif // wxMSW || wxMAC
 173
 174 #if USE_COLOURDLG_GENERIC
 175     EVT_MENU(DIALOGS_CHOOSE_COLOUR_GENERIC,         MyFrame::ChooseColourGeneric)
 176 #endif // USE_COLOURDLG_GENERIC
 177
 178 #if wxUSE_PROGRESSDLG
 179     EVT_MENU(DIALOGS_PROGRESS,                      MyFrame::ShowProgress)
 180 #endif // wxUSE_PROGRESSDLG
 181
 182 #if wxUSE_BUSYINFO
 183     EVT_MENU(DIALOGS_BUSYINFO,                      MyFrame::ShowBusyInfo)
 184 #endif // wxUSE_BUSYINFO
 185
 186 #if wxUSE_FINDREPLDLG
 187     EVT_MENU(DIALOGS_FIND,                          MyFrame::ShowFindDialog)
 188     EVT_MENU(DIALOGS_REPLACE,                       MyFrame::ShowReplaceDialog)
 189
 190     EVT_FIND(wxID_ANY, MyFrame::OnFindDialog)
 191     EVT_FIND_NEXT(wxID_ANY, MyFrame::OnFindDialog)
 192     EVT_FIND_REPLACE(wxID_ANY, MyFrame::OnFindDialog)
 193     EVT_FIND_REPLACE_ALL(wxID_ANY, MyFrame::OnFindDialog)
 194     EVT_FIND_CLOSE(wxID_ANY, MyFrame::OnFindDialog)
 195 #endif // wxUSE_FINDREPLDLG
 196
 197 #if USE_SETTINGS_DIALOG
 198     EVT_MENU(DIALOGS_PROPERTY_SHEET,                MyFrame::OnPropertySheet)
 199     EVT_MENU(DIALOGS_PROPERTY_SHEET_TOOLBOOK,       MyFrame::OnPropertySheetToolBook)
 200 #endif
 201
 202     EVT_MENU(DIALOGS_REQUEST,                       MyFrame::OnRequestUserAttention)
 203
 204     EVT_MENU(wxID_EXIT,                             MyFrame::OnExit)
 205 END_EVENT_TABLE()
 206
 207 #if USE_MODAL_PRESENTATION
 208
 209     BEGIN_EVENT_TABLE(MyModalDialog, wxDialog)
 210         EVT_BUTTON(wxID_ANY, MyModalDialog::OnButton)
 211     END_EVENT_TABLE()
 212
 213     BEGIN_EVENT_TABLE(MyModelessDialog, wxDialog)
 214         EVT_BUTTON(DIALOGS_MODELESS_BTN, MyModelessDialog::OnButton)
 215         EVT_CLOSE(MyModelessDialog::OnClose)
 216     END_EVENT_TABLE()
 217
 218 #endif // USE_MODAL_PRESENTATION
 219
 220 MyCanvas *myCanvas = (MyCanvas *) NULL;
 221
 222 // `Main program' equivalent, creating windows and returning main app frame
 223 bool MyApp::OnInit()
 224 {
 225 #if wxUSE_IMAGE
 226     wxInitAllImageHandlers();
 227 #endif
 228
 229     m_canvasTextColour = wxColour(_T("BLACK"));
 230     m_canvasFont = *wxNORMAL_FONT;
 231
 232     // Create the main frame window
 233     MyFrame *frame = new MyFrame((wxFrame *) NULL, _T("wxWidgets dialogs example"));
 234
 235     // Make a menubar
 236     wxMenu *file_menu = new wxMenu;
 237
 238     file_menu->Append(DIALOGS_MESSAGE_BOX, _T("&Message box\tCtrl-M"));
 239
 240
 241 #if wxUSE_COLOURDLG || wxUSE_FONTDLG || wxUSE_CHOICEDLG
 242
 243     wxMenu *choices_menu = new wxMenu;
 244
 245     #if wxUSE_COLOURDLG
 246         choices_menu->Append(DIALOGS_CHOOSE_COLOUR, _T("&Choose colour"));
 247     #endif // wxUSE_COLOURDLG
 248
 249     #if wxUSE_FONTDLG
 250         choices_menu->Append(DIALOGS_CHOOSE_FONT, _T("Choose &font"));
 251     #endif // wxUSE_FONTDLG
 252
 253     #if wxUSE_CHOICEDLG
 254         choices_menu->Append(DIALOGS_SINGLE_CHOICE,  _T("&Single choice\tCtrl-C"));
 255         choices_menu->Append(DIALOGS_MULTI_CHOICE,  _T("M&ultiple choice\tCtrl-U"));
 256     #endif // wxUSE_CHOICEDLG
 257
 258     #if USE_COLOURDLG_GENERIC || USE_FONTDLG_GENERIC
 259         choices_menu->AppendSeparator();
 260     #endif // USE_COLOURDLG_GENERIC || USE_FONTDLG_GENERIC
 261
 262     #if USE_COLOURDLG_GENERIC
 263         choices_menu->Append(DIALOGS_CHOOSE_COLOUR_GENERIC, _T("&Choose colour (generic)"));
 264     #endif // USE_COLOURDLG_GENERIC
 265
 266     #if USE_FONTDLG_GENERIC
 267         choices_menu->Append(DIALOGS_CHOOSE_FONT_GENERIC, _T("Choose &font (generic)"));
 268     #endif // USE_FONTDLG_GENERIC
 269
 270     file_menu->Append(wxID_ANY,_T("&Choices and selectors"),choices_menu);
 271 #endif // wxUSE_COLOURDLG || wxUSE_FONTDLG || wxUSE_CHOICEDLG
 272
 273
 274 #if wxUSE_TEXTDLG || wxUSE_NUMBERDLG
 275
 276     wxMenu *entry_menu = new wxMenu;
 277
 278     #if wxUSE_TEXTDLG
 279         entry_menu->Append(DIALOGS_TEXT_ENTRY,  _T("Text &entry\tCtrl-E"));
 280         entry_menu->Append(DIALOGS_PASSWORD_ENTRY,  _T("&Password entry\tCtrl-P"));
 281     #endif // wxUSE_TEXTDLG
 282
 283     #if wxUSE_NUMBERDLG
 284         entry_menu->Append(DIALOGS_NUM_ENTRY, _T("&Numeric entry\tCtrl-N"));
 285     #endif // wxUSE_NUMBERDLG
 286
 287     file_menu->Append(wxID_ANY,_T("&Entry dialogs"),entry_menu);
 288
 289 #endif // wxUSE_TEXTDLG || wxUSE_NUMBERDLG
 290
 291
 292 #if wxUSE_FILEDLG
 293
 294     wxMenu *filedlg_menu = new wxMenu;
 295     filedlg_menu->Append(DIALOGS_FILE_OPEN,  _T("&Open file\tCtrl-O"));
 296     filedlg_menu->Append(DIALOGS_FILE_OPEN2,  _T("&Second open file\tCtrl-2"));
 297     filedlg_menu->Append(DIALOGS_FILES_OPEN,  _T("Open &files\tCtrl-Q"));
 298     filedlg_menu->Append(DIALOGS_FILE_SAVE,  _T("Sa&ve file\tCtrl-S"));
 299
 300     #if USE_FILEDLG_GENERIC
 301         filedlg_menu->AppendSeparator();
 302         filedlg_menu->Append(DIALOGS_FILE_OPEN_GENERIC,  _T("&Open file (generic)"));
 303         filedlg_menu->Append(DIALOGS_FILES_OPEN_GENERIC,  _T("Open &files (generic)"));
 304         filedlg_menu->Append(DIALOGS_FILE_SAVE_GENERIC,  _T("Sa&ve file (generic)"));
 305     #endif // USE_FILEDLG_GENERIC
 306
 307     file_menu->Append(wxID_ANY,_T("&File operations"),filedlg_menu);
 308
 309 #endif // wxUSE_FILEDLG
 310
 311 #if wxUSE_DIRDLG
 312     wxMenu *dir_menu = new wxMenu;
 313
 314     dir_menu->Append(DIALOGS_DIR_CHOOSE,  _T("&Choose a directory\tCtrl-D"));
 315     dir_menu->Append(DIALOGS_DIRNEW_CHOOSE,  _T("Choose a directory (with \"Ne&w\" button)\tShift-Ctrl-D"));
 316     file_menu->Append(wxID_ANY,_T("&Directory operations"),dir_menu);
 317
 318     #if USE_DIRDLG_GENERIC
 319         dir_menu->AppendSeparator();
 320         dir_menu->Append(DIALOGS_GENERIC_DIR_CHOOSE,  _T("&Choose a directory (generic)"));
 321     #endif // USE_DIRDLG_GENERIC
 322
 323 #endif // wxUSE_DIRDLG
 324
 325
 326 #if wxUSE_STARTUP_TIPS || wxUSE_PROGRESSDLG || wxUSE_BUSYINFO || wxUSE_LOG_DIALOG
 327
 328     wxMenu *info_menu = new wxMenu;
 329
 330     #if wxUSE_STARTUP_TIPS
 331         info_menu->Append(DIALOGS_TIP,  _T("&Tip of the day\tCtrl-T"));
 332     #endif // wxUSE_STARTUP_TIPS
 333
 334     #if wxUSE_PROGRESSDLG
 335         info_menu->Append(DIALOGS_PROGRESS, _T("Pro&gress dialog\tCtrl-G"));
 336     #endif // wxUSE_PROGRESSDLG
 337
 338     #if wxUSE_BUSYINFO
 339        info_menu->Append(DIALOGS_BUSYINFO, _T("&Busy info dialog\tCtrl-B"));
 340     #endif // wxUSE_BUSYINFO
 341
 342     #if wxUSE_LOG_DIALOG
 343        info_menu->Append(DIALOGS_LOG_DIALOG, _T("&Log dialog\tCtrl-L"));
 344     #endif // wxUSE_LOG_DIALOG
 345
 346     file_menu->Append(wxID_ANY,_T("&Informative dialogs"),info_menu);
 347
 348 #endif // wxUSE_STARTUP_TIPS || wxUSE_PROGRESSDLG || wxUSE_BUSYINFO || wxUSE_LOG_DIALOG
 349
 350
 351 #if wxUSE_FINDREPLDLG
 352     wxMenu *find_menu = new wxMenu;
 353     find_menu->AppendCheckItem(DIALOGS_FIND, _T("&Find dialog\tCtrl-F"));
 354     find_menu->AppendCheckItem(DIALOGS_REPLACE, _T("Find and &replace dialog\tShift-Ctrl-F"));
 355     file_menu->Append(wxID_ANY,_T("&Searching"),find_menu);
 356 #endif // wxUSE_FINDREPLDLG
 357
 358 #if USE_MODAL_PRESENTATION
 359     wxMenu *dialogs_menu = new wxMenu;
 360     dialogs_menu->Append(DIALOGS_MODAL, _T("&Modal dialog\tCtrl-W"));
 361     dialogs_menu->AppendCheckItem(DIALOGS_MODELESS, _T("Mode&less dialog\tCtrl-Z"));
 362     dialogs_menu->AppendCheckItem(DIALOGS_CENTRE_SCREEN, _T("Centered on &screen\tShift-Ctrl-1"));
 363     dialogs_menu->AppendCheckItem(DIALOGS_CENTRE_PARENT, _T("Centered on &parent\tShift-Ctrl-2"));
 364     file_menu->Append(wxID_ANY, _T("&Generic dialogs"), dialogs_menu);
 365 #endif // USE_MODAL_PRESENTATION
 366
 367 #if USE_SETTINGS_DIALOG
 368     wxMenu *sheet_menu = new wxMenu;
 369     sheet_menu->Append(DIALOGS_PROPERTY_SHEET, _T("&Standard property sheet\tShift-Ctrl-P"));
 370     sheet_menu->Append(DIALOGS_PROPERTY_SHEET_TOOLBOOK, _T("&Toolbook sheet\tShift-Ctrl-T"));
 371     file_menu->Append(wxID_ANY, _T("&Property sheets"), sheet_menu);
 372 #endif // USE_SETTINGS_DIALOG
 373
 374     file_menu->Append(DIALOGS_REQUEST, _T("&Request user attention\tCtrl-R"));
 375
 376     file_menu->AppendSeparator();
 377     file_menu->Append(wxID_EXIT, _T("E&xit\tAlt-X"));
 378
 379     wxMenuBar *menu_bar = new wxMenuBar;
 380     menu_bar->Append(file_menu, _T("&File"));
 381     frame->SetMenuBar(menu_bar);
 382
 383     myCanvas = new MyCanvas(frame);
 384     myCanvas->SetBackgroundColour(*wxWHITE);
 385
 386     frame->Centre(wxBOTH);
 387
 388     // Show the frame
 389     frame->Show(true);
 390
 391     SetTopWindow(frame);
 392
 393     return true;
 394 }
 395
 396 // My frame constructor
 397 MyFrame::MyFrame(wxWindow *parent,
 398                  const wxString& title)
 399        : wxFrame(parent, wxID_ANY, title)
 400 {
 401     SetIcon(sample_xpm);
 402
 403 #if USE_MODAL_PRESENTATION
 404     m_dialog = (MyModelessDialog *)NULL;
 405 #endif // USE_MODAL_PRESENTATION
 406
 407 #if wxUSE_FINDREPLDLG
 408     m_dlgFind =
 409     m_dlgReplace = NULL;
 410 #endif
 411
 412 #if wxUSE_COLOURDLG
 413     m_clrData.SetChooseFull(true);
 414     for (int i = 0; i < 16; i++)
 415     {
 416         m_clrData.SetCustomColour(
 417           i,
 418           wxColour(
 419             (unsigned char)(i*16),
 420             (unsigned char)(i*16),
 421             (unsigned char)(i*16)
 422           )
 423         );
 424     }
 425 #endif // wxUSE_COLOURDLG
 426 }
 427
 428 #if wxUSE_COLOURDLG
 429 void MyFrame::ChooseColour(wxCommandEvent& WXUNUSED(event) )
 430 {
 431     m_clrData.SetColour(myCanvas->GetBackgroundColour());
 432
 433     wxColourDialog dialog(this, &m_clrData);
 434     dialog.SetTitle(_T("Choose the background colour"));
 435     if (dialog.ShowModal() == wxID_OK)
 436     {
 437         m_clrData = dialog.GetColourData();
 438         myCanvas->SetBackgroundColour(m_clrData.GetColour());
 439         myCanvas->ClearBackground();
 440         myCanvas->Refresh();
 441     }
 442 }
 443 #endif // wxUSE_COLOURDLG
 444
 445 #if USE_COLOURDLG_GENERIC
 446 void MyFrame::ChooseColourGeneric(wxCommandEvent& WXUNUSED(event))
 447 {
 448     m_clrData.SetColour(myCanvas->GetBackgroundColour());
 449
 450     //FIXME:TODO:This has no effect...
 451     m_clrData.SetChooseFull(true);
 452
 453     for (int i = 0; i < 16; i++)
 454     {
 455         wxColour colour(
 456             (unsigned char)(i*16),
 457             (unsigned char)(i*16),
 458             (unsigned char)(i*16)
 459         );
 460         m_clrData.SetCustomColour(i, colour);
 461     }
 462
 463     wxGenericColourDialog *dialog = new wxGenericColourDialog(this, &m_clrData);
 464     if (dialog->ShowModal() == wxID_OK)
 465     {
 466         m_clrData = dialog->GetColourData();
 467         myCanvas->SetBackgroundColour(m_clrData.GetColour());
 468         myCanvas->ClearBackground();
 469         myCanvas->Refresh();
 470     }
 471     dialog->Destroy();
 472 }
 473 #endif // USE_COLOURDLG_GENERIC
 474
 475 #if wxUSE_FONTDLG
 476 void MyFrame::ChooseFont(wxCommandEvent& WXUNUSED(event) )
 477 {
 478     wxFontData data;
 479     data.SetInitialFont(wxGetApp().m_canvasFont);
 480     data.SetColour(wxGetApp().m_canvasTextColour);
 481
 482     // you might also do this:
 483     //
 484     //  wxFontDialog dialog;
 485     //  if ( !dialog.Create(this, data) { ... error ... }
 486     //
 487     wxFontDialog dialog(this, data);
 488
 489     if (dialog.ShowModal() == wxID_OK)
 490     {
 491         wxFontData retData = dialog.GetFontData();
 492         wxGetApp().m_canvasFont = retData.GetChosenFont();
 493         wxGetApp().m_canvasTextColour = retData.GetColour();
 494         myCanvas->Refresh();
 495     }
 496     //else: cancelled by the user, don't change the font
 497 }
 498 #endif // wxUSE_FONTDLG
 499
 500 #if USE_FONTDLG_GENERIC
 501 void MyFrame::ChooseFontGeneric(wxCommandEvent& WXUNUSED(event) )
 502 {
 503     wxFontData data;
 504     data.SetInitialFont(wxGetApp().m_canvasFont);
 505     data.SetColour(wxGetApp().m_canvasTextColour);
 506
 507     wxGenericFontDialog *dialog = new wxGenericFontDialog(this, &data);
 508     if (dialog->ShowModal() == wxID_OK)
 509     {
 510         wxFontData retData = dialog->GetFontData();
 511         wxGetApp().m_canvasFont = retData.GetChosenFont();
 512         wxGetApp().m_canvasTextColour = retData.GetColour();
 513         myCanvas->Refresh();
 514     }
 515     dialog->Destroy();
 516 }
 517 #endif // USE_FONTDLG_GENERIC
 518
 519 #if wxUSE_LOG_DIALOG
 520 void MyFrame::LogDialog(wxCommandEvent& WXUNUSED(event))
 521 {
 522     // calling wxYield() (as ~wxBusyCursor does) shouldn't result in messages
 523     // being flushed -- test it
 524     {
 525         wxBusyCursor bc;
 526         wxLogMessage(wxT("This is some message - everything is ok so far."));
 527         wxLogMessage(wxT("Another message...\n... this one is on multiple lines"));
 528         wxLogWarning(wxT("And then something went wrong!"));
 529
 530         // and if ~wxBusyCursor doesn't do it, then call it manually
 531         wxYield();
 532     }
 533
 534     wxLogError(wxT("Intermediary error handler decided to abort."));
 535     wxLogError(wxT("The top level caller detected an unrecoverable error."));
 536
 537     wxLog::FlushActive();
 538
 539     wxLogMessage(wxT("And this is the same dialog but with only one message."));
 540 }
 541 #endif // wxUSE_LOG_DIALOG
 542
 543 void MyFrame::MessageBox(wxCommandEvent& WXUNUSED(event) )
 544 {
 545     wxMessageDialog dialog( NULL, _T("This is a message box\nA long, long string to test out the message box properly"),
 546         _T("Message box text"), wxNO_DEFAULT|wxYES_NO|wxCANCEL|wxICON_INFORMATION);
 547
 548     switch ( dialog.ShowModal() )
 549     {
 550         case wxID_YES:
 551             wxLogStatus(wxT("You pressed \"Yes\""));
 552             break;
 553
 554         case wxID_NO:
 555             wxLogStatus(wxT("You pressed \"No\""));
 556             break;
 557
 558         case wxID_CANCEL:
 559             wxLogStatus(wxT("You pressed \"Cancel\""));
 560             break;
 561
 562         default:
 563             wxLogError(wxT("Unexpected wxMessageDialog return code!"));
 564     }
 565 }
 566
 567 #if wxUSE_NUMBERDLG
 568 void MyFrame::NumericEntry(wxCommandEvent& WXUNUSED(event) )
 569 {
 570     long res = wxGetNumberFromUser( _T("This is some text, actually a lot of text.\n")
 571                                     _T("Even two rows of text."),
 572                                     _T("Enter a number:"), _T("Numeric input test"),
 573                                      50, 0, 100, this );
 574
 575     wxString msg;
 576     int icon;
 577     if ( res == -1 )
 578     {
 579         msg = _T("Invalid number entered or dialog cancelled.");
 580         icon = wxICON_HAND;
 581     }
 582     else
 583     {
 584         msg.Printf(_T("You've entered %lu"), res );
 585         icon = wxICON_INFORMATION;
 586     }
 587
 588     wxMessageBox(msg, _T("Numeric test result"), wxOK | icon, this);
 589 }
 590 #endif // wxUSE_NUMBERDLG
 591
 592 #if wxUSE_TEXTDLG
 593 void MyFrame::PasswordEntry(wxCommandEvent& WXUNUSED(event))
 594 {
 595     wxString pwd = wxGetPasswordFromUser(_T("Enter password:"),
 596                                          _T("Password entry dialog"),
 597                                          wxEmptyString,
 598                                          this);
 599     if ( !pwd.empty() )
 600     {
 601         wxMessageBox(wxString::Format(wxT("Your password is '%s'"), pwd.c_str()),
 602                      _T("Got password"), wxOK | wxICON_INFORMATION, this);
 603     }
 604 }
 605
 606 void MyFrame::TextEntry(wxCommandEvent& WXUNUSED(event))
 607 {
 608     wxTextEntryDialog dialog(this,
 609                              _T("This is a small sample\n")
 610                              _T("A long, long string to test out the text entrybox"),
 611                              _T("Please enter a string"),
 612                              _T("Default value"),
 613                              wxOK | wxCANCEL);
 614
 615     if (dialog.ShowModal() == wxID_OK)
 616     {
 617         wxMessageBox(dialog.GetValue(), _T("Got string"), wxOK | wxICON_INFORMATION, this);
 618     }
 619 }
 620 #endif // wxUSE_TEXTDLG
 621
 622 #if wxUSE_CHOICEDLG
 623 void MyFrame::SingleChoice(wxCommandEvent& WXUNUSED(event) )
 624 {
 625     const wxString choices[] = { _T("One"), _T("Two"), _T("Three"), _T("Four"), _T("Five") } ;
 626
 627     wxSingleChoiceDialog dialog(this,
 628                                 _T("This is a small sample\n")
 629                                 _T("A single-choice convenience dialog"),
 630                                 _T("Please select a value"),
 631                                 WXSIZEOF(choices), choices);
 632
 633     dialog.SetSelection(2);
 634
 635     if (dialog.ShowModal() == wxID_OK)
 636     {
 637         wxMessageDialog dialog2(this, dialog.GetStringSelection(), _T("Got string"));
 638         dialog2.ShowModal();
 639     }
 640 }
 641
 642 void MyFrame::MultiChoice(wxCommandEvent& WXUNUSED(event) )
 643 {
 644     const wxString choices[] =
 645     {
 646         _T("One"), _T("Two"), _T("Three"), _T("Four"), _T("Five"),
 647         _T("Six"), _T("Seven"), _T("Eight"), _T("Nine"), _T("Ten"),
 648         _T("Eleven"), _T("Twelve"), _T("Seventeen"),
 649     };
 650
 651     wxArrayInt selections;
 652     size_t count = wxGetMultipleChoices(selections,
 653                                         _T("This is a small sample\n")
 654                                         _T("A multi-choice convenience dialog"),
 655                                         _T("Please select a value"),
 656                                         WXSIZEOF(choices), choices,
 657                                         this);
 658     if ( count )
 659     {
 660         wxString msg;
 661         msg.Printf(wxT("You selected %u items:\n"), (unsigned)count);
 662         for ( size_t n = 0; n < count; n++ )
 663         {
 664             msg += wxString::Format(wxT("\t%u: %u (%s)\n"),
 665                                     (unsigned)n, (unsigned)selections[n],
 666                                     choices[selections[n]].c_str());
 667         }
 668         wxLogMessage(msg);
 669     }
 670     //else: cancelled or nothing selected
 671 }
 672 #endif // wxUSE_CHOICEDLG
 673
 674 #if wxUSE_FILEDLG
 675 void MyFrame::FileOpen(wxCommandEvent& WXUNUSED(event) )
 676 {
 677     wxFileDialog dialog
 678                  (
 679                     this,
 680                     _T("Testing open file dialog"),
 681                     wxEmptyString,
 682                     wxEmptyString,
 683 #ifdef __WXMOTIF__
 684                     _T("C++ files (*.cpp)|*.cpp")
 685 #else
 686                     _T("C++ files (*.cpp;*.h)|*.cpp;*.h")
 687 #endif
 688                  );
 689
 690     dialog.SetDirectory(wxGetHomeDir());
 691     dialog.CentreOnParent();
 692
 693     if (dialog.ShowModal() == wxID_OK)
 694     {
 695         wxString info;
 696         info.Printf(_T("Full file name: %s\n")
 697                     _T("Path: %s\n")
 698                     _T("Name: %s"),
 699                     dialog.GetPath().c_str(),
 700                     dialog.GetDirectory().c_str(),
 701                     dialog.GetFilename().c_str());
 702         wxMessageDialog dialog2(this, info, _T("Selected file"));
 703         dialog2.ShowModal();
 704     }
 705 }
 706
 707 // this shows how to take advantage of specifying a default extension in the
 708 // call to wxFileSelector: it is remembered after each new call and the next
 709 // one will use it by default
 710 void MyFrame::FileOpen2(wxCommandEvent& WXUNUSED(event) )
 711 {
 712     static wxString s_extDef;
 713     wxString path = wxFileSelector(
 714                                     _T("Select the file to load"),
 715                                     wxEmptyString, wxEmptyString,
 716                                     s_extDef,
 717                                     wxString::Format
 718                                     (
 719                                         _T("Waveform (*.wav)|*.wav|Plain text (*.txt)|*.txt|All files (%s)|%s"),
 720                                         wxFileSelectorDefaultWildcardStr,
 721                                         wxFileSelectorDefaultWildcardStr
 722                                     ),
 723                                     wxCHANGE_DIR,
 724                                     this
 725                                    );
 726
 727     if ( !path )
 728         return;
 729
 730     // it is just a sample, would use wxSplitPath in real program
 731     s_extDef = path.AfterLast(_T('.'));
 732
 733     wxLogMessage(_T("You selected the file '%s', remembered extension '%s'"),
 734                  (const wxChar*) path, (const wxChar*) s_extDef);
 735 }
 736
 737 void MyFrame::FilesOpen(wxCommandEvent& WXUNUSED(event) )
 738 {
 739     wxString wildcards =
 740 #ifdef __WXMOTIF__
 741                     _T("C++ files (*.cpp)|*.cpp");
 742 #else
 743                     wxString::Format
 744                     (
 745                         _T("All files (%s)|%s|C++ files (*.cpp;*.h)|*.cpp;*.h"),
 746                         wxFileSelectorDefaultWildcardStr,
 747                         wxFileSelectorDefaultWildcardStr
 748                     );
 749 #endif
 750     wxFileDialog dialog(this, _T("Testing open multiple file dialog"),
 751                         wxEmptyString, wxEmptyString, wildcards,
 752                         wxMULTIPLE);
 753
 754     if (dialog.ShowModal() == wxID_OK)
 755     {
 756         wxArrayString paths, filenames;
 757
 758         dialog.GetPaths(paths);
 759         dialog.GetFilenames(filenames);
 760
 761         wxString msg, s;
 762         size_t count = paths.GetCount();
 763         for ( size_t n = 0; n < count; n++ )
 764         {
 765             s.Printf(_T("File %d: %s (%s)\n"),
 766                      (int)n, paths[n].c_str(), filenames[n].c_str());
 767
 768             msg += s;
 769         }
 770         s.Printf(_T("Filter index: %d"), dialog.GetFilterIndex());
 771         msg += s;
 772
 773         wxMessageDialog dialog2(this, msg, _T("Selected files"));
 774         dialog2.ShowModal();
 775     }
 776 }
 777
 778 void MyFrame::FileSave(wxCommandEvent& WXUNUSED(event) )
 779 {
 780     wxFileDialog dialog(this,
 781                         _T("Testing save file dialog"),
 782                         wxEmptyString,
 783                         _T("myletter.doc"),
 784                         _T("Text files (*.txt)|*.txt|Document files (*.doc)|*.doc"),
 785                         wxSAVE|wxOVERWRITE_PROMPT);
 786
 787     dialog.SetFilterIndex(1);
 788
 789     if (dialog.ShowModal() == wxID_OK)
 790     {
 791         wxLogMessage(_T("%s, filter %d"),
 792                      dialog.GetPath().c_str(), dialog.GetFilterIndex());
 793     }
 794 }
 795 #endif // wxUSE_FILEDLG
 796
 797 #if USE_FILEDLG_GENERIC
 798 void MyFrame::FileOpenGeneric(wxCommandEvent& WXUNUSED(event) )
 799 {
 800     wxGenericFileDialog dialog
 801                  (
 802                     this,
 803                     _T("Testing open file dialog"),
 804                     wxEmptyString,
 805                     wxEmptyString,
 806                     _T("C++ files (*.cpp;*.h)|*.cpp;*.h")
 807                  );
 808
 809     dialog.SetDirectory(wxGetHomeDir());
 810
 811     if (dialog.ShowModal() == wxID_OK)
 812     {
 813         wxString info;
 814         info.Printf(_T("Full file name: %s\n")
 815                     _T("Path: %s\n")
 816                     _T("Name: %s"),
 817                     dialog.GetPath().c_str(),
 818                     dialog.GetDirectory().c_str(),
 819                     dialog.GetFilename().c_str());
 820         wxMessageDialog dialog2(this, info, _T("Selected file"));
 821         dialog2.ShowModal();
 822     }
 823 }
 824
 825 void MyFrame::FilesOpenGeneric(wxCommandEvent& WXUNUSED(event) )
 826 {
 827     // On PocketPC you can disable OK-only dialogs policy using system option
 828     int buttons = wxSystemOptions::GetOptionInt(wxT("wince.dialog.real-ok-cancel"));
 829     wxSystemOptions::SetOption(wxT("wince.dialog.real-ok-cancel"), 1);
 830
 831     wxString wildcards = _T("All files (*.*)|*.*|C++ files (*.cpp;*.h)|*.cpp;*.h");
 832     wxGenericFileDialog dialog(this, _T("Testing open multiple file dialog"),
 833                         wxEmptyString, wxEmptyString, wildcards,
 834                         wxMULTIPLE);
 835
 836     if (dialog.ShowModal() == wxID_OK)
 837     {
 838         wxArrayString paths, filenames;
 839
 840         dialog.GetPaths(paths);
 841         dialog.GetFilenames(filenames);
 842
 843         wxString msg, s;
 844         size_t count = paths.GetCount();
 845         for ( size_t n = 0; n < count; n++ )
 846         {
 847             s.Printf(_T("File %d: %s (%s)\n"),
 848                      (int)n, paths[n].c_str(), filenames[n].c_str());
 849
 850             msg += s;
 851         }
 852         s.Printf(_T("Filter index: %d"), dialog.GetFilterIndex());
 853         msg += s;
 854
 855         wxMessageDialog dialog2(this, msg, _T("Selected files"));
 856         dialog2.ShowModal();
 857     }
 858
 859     // restore system option
 860     wxSystemOptions::SetOption(wxT("wince.dialog.real-ok-cancel"), buttons);
 861 }
 862
 863 void MyFrame::FileSaveGeneric(wxCommandEvent& WXUNUSED(event) )
 864 {
 865     wxGenericFileDialog dialog(this,
 866                         _T("Testing save file dialog"),
 867                         wxEmptyString,
 868                         _T("myletter.doc"),
 869                         _T("Text files (*.txt)|*.txt|Document files (*.doc)|*.doc"),
 870                         wxSAVE|wxOVERWRITE_PROMPT);
 871
 872     dialog.SetFilterIndex(1);
 873
 874     if (dialog.ShowModal() == wxID_OK)
 875     {
 876         wxLogMessage(_T("%s, filter %d"),
 877                      dialog.GetPath().c_str(), dialog.GetFilterIndex());
 878     }
 879 }
 880 #endif // USE_FILEDLG_GENERIC
 881
 882 #if wxUSE_DIRDLG
 883 void MyFrame::DoDirChoose(int style)
 884 {
 885     // pass some initial dir to wxDirDialog
 886     wxString dirHome;
 887     wxGetHomeDir(&dirHome);
 888
 889     wxDirDialog dialog(this, _T("Testing directory picker"), dirHome, style);
 890
 891     if (dialog.ShowModal() == wxID_OK)
 892     {
 893         wxLogMessage(_T("Selected path: %s"), dialog.GetPath().c_str());
 894     }
 895 }
 896
 897 void MyFrame::DirChoose(wxCommandEvent& WXUNUSED(event) )
 898 {
 899     DoDirChoose(wxDD_DEFAULT_STYLE & ~wxDD_NEW_DIR_BUTTON);
 900 }
 901
 902 void MyFrame::DirChooseNew(wxCommandEvent& WXUNUSED(event) )
 903 {
 904     DoDirChoose(wxDD_DEFAULT_STYLE | wxDD_NEW_DIR_BUTTON);
 905 }
 906 #endif // wxUSE_DIRDLG
 907
 908 #if USE_DIRDLG_GENERIC
 909 void MyFrame::GenericDirChoose(wxCommandEvent& WXUNUSED(event) )
 910 {
 911     // pass some initial dir to wxDirDialog
 912     wxString dirHome;
 913     wxGetHomeDir(&dirHome);
 914
 915     wxGenericDirDialog dialog(this, _T("Testing generic directory picker"), dirHome);
 916
 917     if (dialog.ShowModal() == wxID_OK)
 918     {
 919         wxMessageDialog dialog2(this, dialog.GetPath(), _T("Selected path"));
 920         dialog2.ShowModal();
 921     }
 922 }
 923 #endif // USE_DIRDLG_GENERIC
 924
 925 #if USE_MODAL_PRESENTATION
 926 void MyFrame::ModalDlg(wxCommandEvent& WXUNUSED(event))
 927 {
 928     MyModalDialog dlg(this);
 929     dlg.ShowModal();
 930 }
 931
 932 void MyFrame::ModelessDlg(wxCommandEvent& event)
 933 {
 934     bool show = GetMenuBar()->IsChecked(event.GetId());
 935
 936     if ( show )
 937     {
 938         if ( !m_dialog )
 939         {
 940             m_dialog = new MyModelessDialog(this);
 941         }
 942
 943         m_dialog->Show(true);
 944     }
 945     else // hide
 946     {
 947         // If m_dialog is NULL, then possibly the system
 948         // didn't report the checked menu item status correctly.
 949         // It should be true just after the menu item was selected,
 950         // if there was no modeless dialog yet.
 951
 952         wxASSERT( m_dialog != NULL );
 953         if (m_dialog)
 954             m_dialog->Hide();
 955     }
 956 }
 957
 958 void MyFrame::DlgCenteredScreen(wxCommandEvent& WXUNUSED(event))
 959 {
 960     wxDialog dlg(this, wxID_ANY, _T("Dialog centered on screen"),
 961                  wxDefaultPosition, wxSize(200, 100));
 962     new wxButton(&dlg, wxID_OK, _T("Close"), wxPoint(10, 10));
 963     dlg.CentreOnScreen();
 964     dlg.ShowModal();
 965 }
 966
 967 void MyFrame::DlgCenteredParent(wxCommandEvent& WXUNUSED(event))
 968 {
 969     wxDialog dlg(this, wxID_ANY, _T("Dialog centered on parent"),
 970                  wxDefaultPosition, wxSize(200, 100));
 971     new wxButton(&dlg, wxID_OK, _T("Close"), wxPoint(10, 10));
 972     dlg.CentreOnParent();
 973     dlg.ShowModal();
 974 }
 975
 976 #endif // USE_MODAL_PRESENTATION
 977
 978 #if wxUSE_STARTUP_TIPS
 979 void MyFrame::ShowTip(wxCommandEvent& WXUNUSED(event))
 980 {
 981     static size_t s_index = (size_t)-1;
 982
 983     if ( s_index == (size_t)-1 )
 984     {
 985         srand(time(NULL));
 986
 987         // this is completely bogus, we don't know how many lines are there
 988         // in the file, but who cares, it's a demo only...
 989         s_index = rand() % 5;
 990     }
 991
 992     wxTipProvider *tipProvider = wxCreateFileTipProvider(_T("tips.txt"), s_index);
 993
 994     bool showAtStartup = wxShowTip(this, tipProvider);
 995
 996     if ( showAtStartup )
 997     {
 998         wxMessageBox(_T("Will show tips on startup"), _T("Tips dialog"),
 999                      wxOK | wxICON_INFORMATION, this);
1000     }
1001
1002     s_index = tipProvider->GetCurrentTip();
1003     delete tipProvider;
1004 }
1005 #endif // wxUSE_STARTUP_TIPS
1006
1007 #if USE_SETTINGS_DIALOG
1008 void MyFrame::OnPropertySheet(wxCommandEvent& WXUNUSED(event))
1009 {
1010     SettingsDialog dialog(this);
1011     dialog.ShowModal();
1012 }
1013
1014 void MyFrame::OnPropertySheetToolBook(wxCommandEvent& WXUNUSED(event))
1015 {
1016     SettingsDialog dialog(this, true);
1017     dialog.ShowModal();
1018 }
1019 #endif // USE_SETTINGS_DIALOG
1020
1021 void MyFrame::OnRequestUserAttention(wxCommandEvent& WXUNUSED(event))
1022 {
1023     wxLogStatus(_T("Sleeping for 3 seconds to allow you to switch to another window"));
1024
1025     wxSleep(3);
1026
1027     RequestUserAttention(wxUSER_ATTENTION_ERROR);
1028 }
1029
1030 void MyFrame::OnExit(wxCommandEvent& WXUNUSED(event) )
1031 {
1032     Close(true);
1033 }
1034
1035 #if wxUSE_PROGRESSDLG
1036
1037 void MyFrame::ShowProgress( wxCommandEvent& WXUNUSED(event) )
1038 {
1039     #if wxUSE_STOPWATCH && wxUSE_LONGLONG
1040     // check the performance
1041     int countrandomnumbers = 0, count = 0;
1042     wxTimeSpan tsTest(0,0,0,250);
1043     wxDateTime DT2, DT1 = wxDateTime::UNow();
1044     srand(0);
1045     while(1)
1046     {
1047         rand();
1048         ++countrandomnumbers;
1049         if ( countrandomnumbers == 1000 )
1050         {
1051             srand(0);
1052             countrandomnumbers = 0;
1053             ++count;
1054             DT2 = wxDateTime::UNow();
1055             wxTimeSpan ts = DT2.Subtract( DT1 );
1056             if ( ts.IsLongerThan( tsTest ) )
1057             {
1058                 break;
1059             }
1060         }
1061     }
1062     const int max = 40 * count;
1063     #else
1064     static const int max = 10;
1065     #endif // wxUSE_STOPWATCH && wxUSE_LONGLONG
1066
1067     wxProgressDialog dialog(_T("Progress dialog example"),
1068                             _T("An informative message"),
1069                             max,    // range
1070                             this,   // parent
1071                             wxPD_CAN_ABORT |
1072                             wxPD_CAN_SKIP |
1073                             wxPD_APP_MODAL |
1074                             // wxPD_AUTO_HIDE | -- try this as well
1075                             wxPD_ELAPSED_TIME |
1076                             wxPD_ESTIMATED_TIME |
1077                             wxPD_REMAINING_TIME |
1078                             wxPD_SMOOTH);
1079
1080     bool cont = true;
1081     bool skip = false;
1082     // each skip will move progress about quarter forward
1083     for ( int i = 0; i <= max; i = wxMin(i+(skip?int(max/4):1), max+1), skip = false )
1084     {
1085         #if wxUSE_STOPWATCH && wxUSE_LONGLONG
1086         // do (almost) the same operations as we did for the performance test
1087         srand(0);
1088         for ( int j = 0; j < 1000; j++ )
1089         {
1090             rand();
1091             if ( j == 999 )
1092             {
1093                 DT2 = wxDateTime::UNow();
1094                 wxTimeSpan ts = DT2.Subtract( DT1 );
1095                 if ( ts.IsLongerThan( tsTest ) )
1096                 {
1097                     // nothing to do
1098                 }
1099             }
1100         }
1101         #else
1102         wxSleep(1);
1103         #endif
1104
1105         wxString msg;
1106
1107         if ( i == max )
1108         {
1109             msg = _T("That's all, folks!");
1110         }
1111         else if ( i > max / 2 )
1112         {
1113             msg = _T("Only a half left (very long message)!");
1114         }
1115
1116 #if wxUSE_STOPWATCH && wxUSE_LONGLONG
1117         if ( (i % (max/100)) == 0 ) // // only 100 updates, this makes it much faster
1118         {
1119             cont = dialog.Update(i, msg, &skip);
1120         }
1121 #else
1122         cont = dialog.Update(i, msg, &skip);
1123 #endif
1124
1125         if ( !cont )
1126         {
1127             if ( wxMessageBox(_T("Do you really want to cancel?"),
1128                               _T("Progress dialog question"),  // caption
1129                               wxYES_NO | wxICON_QUESTION) == wxYES )
1130                 break;
1131
1132             cont = true;
1133             dialog.Resume();
1134         }
1135     }
1136
1137     if ( !cont )
1138     {
1139         wxLogStatus(wxT("Progress dialog aborted!"));
1140     }
1141     else
1142     {
1143         wxLogStatus(wxT("Countdown from %d finished"), max);
1144     }
1145 }
1146
1147 #endif // wxUSE_PROGRESSDLG
1148
1149 #if wxUSE_BUSYINFO
1150
1151 void MyFrame::ShowBusyInfo(wxCommandEvent& WXUNUSED(event))
1152 {
1153     wxWindowDisabler disableAll;
1154
1155     wxBusyInfo info(_T("Working, please wait..."), this);
1156
1157     for ( int i = 0; i < 18; i++ )
1158     {
1159         //wxUsleep(100);
1160         wxTheApp->Yield();
1161     }
1162
1163     wxSleep(2);
1164     //wxWakeUpIdle();
1165 }
1166
1167 #endif // wxUSE_BUSYINFO
1168
1169 #if wxUSE_FINDREPLDLG
1170
1171 void MyFrame::ShowReplaceDialog( wxCommandEvent& WXUNUSED(event) )
1172 {
1173     if ( m_dlgReplace )
1174     {
1175         delete m_dlgReplace;
1176         m_dlgReplace = NULL;
1177     }
1178     else
1179     {
1180         m_dlgReplace = new wxFindReplaceDialog
1181                            (
1182                             this,
1183                             &m_findData,
1184                             _T("Find and replace dialog"),
1185                             wxFR_REPLACEDIALOG
1186                            );
1187
1188         m_dlgReplace->Show(true);
1189     }
1190 }
1191
1192 void MyFrame::ShowFindDialog( wxCommandEvent& WXUNUSED(event) )
1193 {
1194     if ( m_dlgFind )
1195     {
1196         delete m_dlgFind;
1197         m_dlgFind = NULL;
1198     }
1199     else
1200     {
1201         m_dlgFind = new wxFindReplaceDialog
1202                         (
1203                             this,
1204                             &m_findData,
1205                             _T("Find dialog"),
1206                             // just for testing
1207                             wxFR_NOWHOLEWORD
1208                         );
1209
1210         m_dlgFind->Show(true);
1211     }
1212 }
1213
1214 static wxString DecodeFindDialogEventFlags(int flags)
1215 {
1216     wxString str;
1217     str << (flags & wxFR_DOWN ? _T("down") : _T("up")) << _T(", ")
1218         << (flags & wxFR_WHOLEWORD ? _T("whole words only, ") : _T(""))
1219         << (flags & wxFR_MATCHCASE ? _T("") : _T("not "))
1220         << _T("case sensitive");
1221
1222     return str;
1223 }
1224
1225 void MyFrame::OnFindDialog(wxFindDialogEvent& event)
1226 {
1227     wxEventType type = event.GetEventType();
1228
1229     if ( type == wxEVT_COMMAND_FIND || type == wxEVT_COMMAND_FIND_NEXT )
1230     {
1231         wxLogMessage(wxT("Find %s'%s' (flags: %s)"),
1232                      type == wxEVT_COMMAND_FIND_NEXT ? wxT("next ") : wxT(""),
1233                      event.GetFindString().c_str(),
1234                      DecodeFindDialogEventFlags(event.GetFlags()).c_str());
1235     }
1236     else if ( type == wxEVT_COMMAND_FIND_REPLACE ||
1237                 type == wxEVT_COMMAND_FIND_REPLACE_ALL )
1238     {
1239         wxLogMessage(wxT("Replace %s'%s' with '%s' (flags: %s)"),
1240                      type == wxEVT_COMMAND_FIND_REPLACE_ALL ? _T("all ") : wxT(""),
1241                      event.GetFindString().c_str(),
1242                      event.GetReplaceString().c_str(),
1243                      DecodeFindDialogEventFlags(event.GetFlags()).c_str());
1244     }
1245     else if ( type == wxEVT_COMMAND_FIND_CLOSE )
1246     {
1247         wxFindReplaceDialog *dlg = event.GetDialog();
1248
1249         int idMenu;
1250         const wxChar *txt;
1251         if ( dlg == m_dlgFind )
1252         {
1253             txt = _T("Find");
1254             idMenu = DIALOGS_FIND;
1255             m_dlgFind = NULL;
1256         }
1257         else if ( dlg == m_dlgReplace )
1258         {
1259             txt = _T("Replace");
1260             idMenu = DIALOGS_REPLACE;
1261             m_dlgReplace = NULL;
1262         }
1263         else
1264         {
1265             txt = _T("Unknown");
1266             idMenu = wxID_ANY;
1267
1268             wxFAIL_MSG( _T("unexpected event") );
1269         }
1270
1271         wxLogMessage(wxT("%s dialog is being closed."), txt);
1272
1273         if ( idMenu != wxID_ANY )
1274         {
1275             GetMenuBar()->Check(idMenu, false);
1276         }
1277
1278         dlg->Destroy();
1279     }
1280     else
1281     {
1282         wxLogError(wxT("Unknown find dialog event!"));
1283     }
1284 }
1285
1286 #endif // wxUSE_FINDREPLDLG
1287
1288 // ----------------------------------------------------------------------------
1289 // MyCanvas
1290 // ----------------------------------------------------------------------------
1291
1292 void MyCanvas::OnPaint(wxPaintEvent& WXUNUSED(event) )
1293 {
1294     wxPaintDC dc(this);
1295     dc.SetFont(wxGetApp().m_canvasFont);
1296     dc.SetTextForeground(wxGetApp().m_canvasTextColour);
1297     dc.SetBackgroundMode(wxTRANSPARENT);
1298     dc.DrawText(
1299                 _T("wxWidgets common dialogs")
1300 #if !defined(__SMARTPHONE__)
1301                 _T(" test application")
1302 #endif
1303                 , 10, 10);
1304 }
1305
1306 #if USE_MODAL_PRESENTATION
1307
1308 // ----------------------------------------------------------------------------
1309 // MyModelessDialog
1310 // ----------------------------------------------------------------------------
1311
1312 MyModelessDialog::MyModelessDialog(wxWindow *parent)
1313                 : wxDialog(parent, wxID_ANY, wxString(_T("Modeless dialog")))
1314 {
1315     wxBoxSizer *sizerTop = new wxBoxSizer(wxVERTICAL);
1316
1317     wxButton *btn = new wxButton(this, DIALOGS_MODELESS_BTN, _T("Press me"));
1318     wxCheckBox *check = new wxCheckBox(this, wxID_ANY, _T("Should be disabled"));
1319     check->Disable();
1320
1321     sizerTop->Add(btn, 1, wxEXPAND | wxALL, 5);
1322     sizerTop->Add(check, 1, wxEXPAND | wxALL, 5);
1323
1324     SetSizer(sizerTop);
1325
1326     sizerTop->SetSizeHints(this);
1327     sizerTop->Fit(this);
1328 }
1329
1330 void MyModelessDialog::OnButton(wxCommandEvent& WXUNUSED(event))
1331 {
1332     wxMessageBox(_T("Button pressed in modeless dialog"), _T("Info"),
1333                  wxOK | wxICON_INFORMATION, this);
1334 }
1335
1336 void MyModelessDialog::OnClose(wxCloseEvent& event)
1337 {
1338     if ( event.CanVeto() )
1339     {
1340         wxMessageBox(_T("Use the menu item to close this dialog"),
1341                      _T("Modeless dialog"),
1342                      wxOK | wxICON_INFORMATION, this);
1343
1344         event.Veto();
1345     }
1346 }
1347
1348 // ----------------------------------------------------------------------------
1349 // MyModalDialog
1350 // ----------------------------------------------------------------------------
1351
1352 MyModalDialog::MyModalDialog(wxWindow *parent)
1353              : wxDialog(parent, wxID_ANY, wxString(_T("Modal dialog")))
1354 {
1355     wxBoxSizer *sizerTop = new wxBoxSizer(wxHORIZONTAL);
1356
1357     m_btnModal = new wxButton(this, wxID_ANY, _T("&Modal dialog..."));
1358     m_btnModeless = new wxButton(this, wxID_ANY, _T("Mode&less dialog"));
1359     m_btnDelete = new wxButton(this, wxID_ANY, _T("&Delete button"));
1360
1361     wxButton *btnOk = new wxButton(this, wxID_CANCEL, _T("&Close"));
1362     sizerTop->Add(m_btnModal, 0, wxALIGN_CENTER | wxALL, 5);
1363     sizerTop->Add(m_btnModeless, 0, wxALIGN_CENTER | wxALL, 5);
1364     sizerTop->Add(m_btnDelete, 0, wxALIGN_CENTER | wxALL, 5);
1365     sizerTop->Add(btnOk, 0, wxALIGN_CENTER | wxALL, 5);
1366
1367     SetSizer(sizerTop);
1368
1369     sizerTop->SetSizeHints(this);
1370     sizerTop->Fit(this);
1371
1372     m_btnModal->SetFocus();
1373     m_btnModal->SetDefault();
1374 }
1375
1376 void MyModalDialog::OnButton(wxCommandEvent& event)
1377 {
1378     if ( event.GetEventObject() == m_btnDelete )
1379     {
1380         delete m_btnModal;
1381         m_btnModal = NULL;
1382
1383         m_btnDelete->Disable();
1384     }
1385     else if ( event.GetEventObject() == m_btnModal )
1386     {
1387 #if wxUSE_TEXTDLG
1388         wxGetTextFromUser(_T("Dummy prompt"),
1389                           _T("Modal dialog called from dialog"),
1390                           wxEmptyString, this);
1391 #else
1392         wxMessageBox(_T("Modal dialog called from dialog"));
1393 #endif // wxUSE_TEXTDLG
1394     }
1395     else if ( event.GetEventObject() == m_btnModeless )
1396     {
1397         (new MyModelessDialog(this))->Show();
1398     }
1399     else
1400     {
1401         event.Skip();
1402     }
1403 }
1404
1405 #endif // USE_MODAL_PRESENTATION
1406
1407 #if USE_SETTINGS_DIALOG
1408 // ----------------------------------------------------------------------------
1409 // SettingsDialog
1410 // ----------------------------------------------------------------------------
1411
1412 IMPLEMENT_CLASS(SettingsDialog, wxPropertySheetDialog)
1413
1414 BEGIN_EVENT_TABLE(SettingsDialog, wxPropertySheetDialog)
1415 END_EVENT_TABLE()
1416
1417 SettingsDialog::SettingsDialog(wxWindow* win, bool useToolBook)
1418 {
1419     SetExtraStyle(wxDIALOG_EX_CONTEXTHELP|wxWS_EX_VALIDATE_RECURSIVELY);
1420
1421     int tabImage1 = -1;
1422     int tabImage2 = -1;
1423
1424     if (useToolBook)
1425     {
1426         tabImage1 = 0;
1427         tabImage2 = 1;
1428         SetSheetStyle(wxPROPSHEET_TOOLBOOK|wxPROPSHEET_SHRINKTOFIT);
1429
1430         // create a dummy image list with a few icons
1431         const wxSize imageSize(32, 32);
1432
1433         m_imageList = new wxImageList(imageSize.GetWidth(), imageSize.GetHeight());
1434         m_imageList->
1435             Add(wxArtProvider::GetIcon(wxART_INFORMATION, wxART_OTHER, imageSize));
1436         m_imageList->
1437             Add(wxArtProvider::GetIcon(wxART_QUESTION, wxART_OTHER, imageSize));
1438         m_imageList->
1439             Add(wxArtProvider::GetIcon(wxART_WARNING, wxART_OTHER, imageSize));
1440         m_imageList->
1441             Add(wxArtProvider::GetIcon(wxART_ERROR, wxART_OTHER, imageSize));
1442     }
1443     else
1444         m_imageList = NULL;
1445
1446     Create(win, wxID_ANY, _("Preferences"), wxDefaultPosition, wxDefaultSize,
1447         wxDEFAULT_DIALOG_STYLE
1448 #ifndef __WXWINCE__
1449         |wxRESIZE_BORDER
1450 #endif
1451     );
1452
1453     // If using a toolbook, also follow Mac style and don't create buttons
1454     if (!useToolBook)
1455         CreateButtons(wxOK|wxCANCEL
1456 #ifndef __POCKETPC__
1457                       |wxHELP
1458 #endif
1459     );
1460
1461     wxBookCtrlBase* notebook = GetBookCtrl();
1462     notebook->SetImageList(m_imageList);
1463
1464     wxPanel* generalSettings = CreateGeneralSettingsPage(notebook);
1465     wxPanel* aestheticSettings = CreateAestheticSettingsPage(notebook);
1466
1467     notebook->AddPage(generalSettings, _("General"), true, tabImage1);
1468     notebook->AddPage(aestheticSettings, _("Aesthetics"), false, tabImage2);
1469
1470     LayoutDialog();
1471 }
1472
1473 SettingsDialog::~SettingsDialog()
1474 {
1475     delete m_imageList;
1476 }
1477
1478 wxPanel* SettingsDialog::CreateGeneralSettingsPage(wxWindow* parent)
1479 {
1480     wxPanel* panel = new wxPanel(parent, wxID_ANY);
1481
1482     wxBoxSizer *topSizer = new wxBoxSizer( wxVERTICAL );
1483     wxBoxSizer *item0 = new wxBoxSizer( wxVERTICAL );
1484
1485     //// LOAD LAST FILE
1486
1487     wxBoxSizer* itemSizer3 = new wxBoxSizer( wxHORIZONTAL );
1488     wxCheckBox* checkBox3 = new wxCheckBox(panel, ID_LOAD_LAST_PROJECT, _("&Load last project on startup"), wxDefaultPosition, wxDefaultSize);
1489     itemSizer3->Add(checkBox3, 0, wxALL|wxALIGN_CENTER_VERTICAL, 5);
1490     item0->Add(itemSizer3, 0, wxGROW|wxALL, 0);
1491
1492     //// AUTOSAVE
1493
1494     wxString autoSaveLabel = _("&Auto-save every");
1495     wxString minsLabel = _("mins");
1496
1497     wxBoxSizer* itemSizer12 = new wxBoxSizer( wxHORIZONTAL );
1498     wxCheckBox* checkBox12 = new wxCheckBox(panel, ID_AUTO_SAVE, autoSaveLabel, wxDefaultPosition, wxDefaultSize);
1499
1500 #if wxUSE_SPINCTRL
1501     wxSpinCtrl* spinCtrl12 = new wxSpinCtrl(panel, ID_AUTO_SAVE_MINS, wxEmptyString,
1502         wxDefaultPosition, wxSize(40, wxDefaultCoord), wxSP_ARROW_KEYS, 1, 60, 1);
1503 #endif
1504
1505     itemSizer12->Add(checkBox12, 0, wxALL|wxALIGN_CENTER_VERTICAL, 5);
1506 #if wxUSE_SPINCTRL
1507     itemSizer12->Add(spinCtrl12, 0, wxALL|wxALIGN_CENTER_VERTICAL, 5);
1508 #endif
1509     itemSizer12->Add(new wxStaticText(panel, wxID_STATIC, minsLabel), 0, wxALL|wxALIGN_CENTER_VERTICAL, 5);
1510     item0->Add(itemSizer12, 0, wxGROW|wxALL, 0);
1511
1512     //// TOOLTIPS
1513
1514     wxBoxSizer* itemSizer8 = new wxBoxSizer( wxHORIZONTAL );
1515     wxCheckBox* checkBox6 = new wxCheckBox(panel, ID_SHOW_TOOLTIPS, _("Show &tooltips"), wxDefaultPosition, wxDefaultSize);
1516     itemSizer8->Add(checkBox6, 0, wxALL|wxALIGN_CENTER_VERTICAL, 5);
1517     item0->Add(itemSizer8, 0, wxGROW|wxALL, 0);
1518
1519     topSizer->Add( item0, 1, wxGROW|wxALIGN_CENTRE|wxALL, 5 );
1520
1521     panel->SetSizer(topSizer);
1522     topSizer->Fit(panel);
1523
1524     return panel;
1525 }
1526
1527 wxPanel* SettingsDialog::CreateAestheticSettingsPage(wxWindow* parent)
1528 {
1529     wxPanel* panel = new wxPanel(parent, wxID_ANY);
1530
1531     wxBoxSizer *topSizer = new wxBoxSizer( wxVERTICAL );
1532     wxBoxSizer *item0 = new wxBoxSizer( wxVERTICAL );
1533
1534     //// PROJECT OR GLOBAL
1535     wxString globalOrProjectChoices[2];
1536     globalOrProjectChoices[0] = _("&New projects");
1537     globalOrProjectChoices[1] = _("&This project");
1538
1539     wxRadioBox* projectOrGlobal = new wxRadioBox(panel, ID_APPLY_SETTINGS_TO, _("&Apply settings to:"),
1540         wxDefaultPosition, wxDefaultSize, 2, globalOrProjectChoices);
1541     item0->Add(projectOrGlobal, 0, wxGROW|wxALL, 5);
1542
1543     projectOrGlobal->SetSelection(0);
1544
1545     //// BACKGROUND STYLE
1546     wxArrayString backgroundStyleChoices;
1547     backgroundStyleChoices.Add(wxT("Colour"));
1548     backgroundStyleChoices.Add(wxT("Image"));
1549     wxStaticBox* staticBox3 = new wxStaticBox(panel, wxID_ANY, _("Background style:"));
1550
1551     wxBoxSizer* styleSizer = new wxStaticBoxSizer( staticBox3, wxVERTICAL );
1552     item0->Add(styleSizer, 0, wxGROW|wxALL, 5);
1553
1554     wxBoxSizer* itemSizer2 = new wxBoxSizer( wxHORIZONTAL );
1555
1556     wxChoice* choice2 = new wxChoice(panel, ID_BACKGROUND_STYLE, wxDefaultPosition, wxDefaultSize, backgroundStyleChoices);
1557
1558     itemSizer2->Add(new wxStaticText(panel, wxID_ANY, _("&Window:")), 0, wxALL|wxALIGN_CENTER_VERTICAL, 5);
1559     itemSizer2->Add(5, 5, 1, wxALL, 0);
1560     itemSizer2->Add(choice2, 0, wxALL|wxALIGN_CENTER_VERTICAL, 5);
1561
1562     styleSizer->Add(itemSizer2, 0, wxGROW|wxALL, 5);
1563
1564 #if wxUSE_SPINCTRL
1565     //// FONT SIZE SELECTION
1566
1567     wxStaticBox* staticBox1 = new wxStaticBox(panel, wxID_ANY, _("Tile font size:"));
1568     wxBoxSizer* itemSizer5 = new wxStaticBoxSizer( staticBox1, wxHORIZONTAL );
1569
1570     wxSpinCtrl* spinCtrl = new wxSpinCtrl(panel, ID_FONT_SIZE, wxEmptyString, wxDefaultPosition,
1571         wxSize(80, wxDefaultCoord));
1572     itemSizer5->Add(spinCtrl, 0, wxALL|wxALIGN_CENTER_HORIZONTAL|wxALIGN_CENTER_VERTICAL, 5);
1573
1574     item0->Add(itemSizer5, 0, wxGROW|wxLEFT|wxRIGHT, 5);
1575 #endif
1576
1577     topSizer->Add( item0, 1, wxGROW|wxALIGN_CENTRE|wxALL, 5 );
1578     topSizer->AddSpacer(5);
1579
1580     panel->SetSizer(topSizer);
1581     topSizer->Fit(panel);
1582
1583     return panel;
1584 }
1585
1586 #endif // USE_SETTINGS_DIALOG