samples/dialogs/dialogs.cpp

   1 /////////////////////////////////////////////////////////////////////////////
   2 // Name:        dialogs.cpp
   3 // Purpose:     Common dialogs demo
   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
  14 #pragma interface
  15 #endif
  16
  17 // For compilers that support precompilation, includes "wx/wx.h".
  18 #include "wx/wxprec.h"
  19
  20 #ifdef __BORLANDC__
  21 #pragma hdrstop
  22 #endif
  23
  24 #ifndef WX_PRECOMP
  25 #include "wx/wx.h"
  26 #endif
  27
  28 #include "wx/colordlg.h"
  29 #include "wx/filedlg.h"
  30 #include "wx/dirdlg.h"
  31 #include "wx/fontdlg.h"
  32 #include "wx/choicdlg.h"
  33 #include "wx/tipdlg.h"
  34 #include "wx/progdlg.h"
  35 #include "wx/fdrepdlg.h"
  36 #include "wx/busyinfo.h"
  37
  38 #define wxTEST_GENERIC_DIALOGS_IN_MSW 0
  39
  40 #if defined(__WXMSW__) && wxTEST_GENERIC_DIALOGS_IN_MSW
  41 #include "wx/generic/colrdlgg.h"
  42 #include "wx/generic/fontdlgg.h"
  43 #endif
  44
  45 #define wxUSE_DIRDLGG 0
  46
  47 #if !defined(__WXMSW__) || defined(wxUSE_DIRDLGG) && wxUSE_DIRDLGG
  48 #include "wx/generic/dirdlgg.h"
  49 #endif
  50
  51 #include "dialogs.h"
  52
  53 IMPLEMENT_APP(MyApp)
  54
  55 BEGIN_EVENT_TABLE(MyCanvas, wxScrolledWindow)
  56     EVT_PAINT(MyCanvas::OnPaint)
  57 END_EVENT_TABLE()
  58
  59 BEGIN_EVENT_TABLE(MyFrame, wxFrame)
  60     EVT_MENU(DIALOGS_CHOOSE_COLOUR,                 MyFrame::ChooseColour)
  61     EVT_MENU(DIALOGS_CHOOSE_FONT,                   MyFrame::ChooseFont)
  62     EVT_MENU(DIALOGS_LOG_DIALOG,                    MyFrame::LogDialog)
  63     EVT_MENU(DIALOGS_MESSAGE_BOX,                   MyFrame::MessageBox)
  64     EVT_MENU(DIALOGS_TEXT_ENTRY,                    MyFrame::TextEntry)
  65     EVT_MENU(DIALOGS_PASSWORD_ENTRY,                MyFrame::PasswordEntry)
  66     EVT_MENU(DIALOGS_NUM_ENTRY,                     MyFrame::NumericEntry)
  67     EVT_MENU(DIALOGS_SINGLE_CHOICE,                 MyFrame::SingleChoice)
  68     EVT_MENU(DIALOGS_MULTI_CHOICE,                  MyFrame::MultiChoice)
  69     EVT_MENU(DIALOGS_FILE_OPEN,                     MyFrame::FileOpen)
  70     EVT_MENU(DIALOGS_FILE_OPEN2,                    MyFrame::FileOpen2)
  71     EVT_MENU(DIALOGS_FILES_OPEN,                    MyFrame::FilesOpen)
  72     EVT_MENU(DIALOGS_FILE_SAVE,                     MyFrame::FileSave)
  73     EVT_MENU(DIALOGS_DIR_CHOOSE,                    MyFrame::DirChoose)
  74 #if defined(__WXMSW__) || defined(__WXMAC__)
  75     EVT_MENU(DIALOGS_GENERIC_DIR_CHOOSE,            MyFrame::GenericDirChoose)
  76 #endif // wxMSW || wxMAC
  77     EVT_MENU(DIALOGS_MODAL,                         MyFrame::ModalDlg)
  78     EVT_MENU(DIALOGS_MODELESS,                      MyFrame::ModelessDlg)
  79     EVT_MENU(DIALOGS_TIP,                           MyFrame::ShowTip)
  80 #if defined(__WXMSW__) && wxTEST_GENERIC_DIALOGS_IN_MSW
  81     EVT_MENU(DIALOGS_CHOOSE_COLOUR_GENERIC,         MyFrame::ChooseColourGeneric)
  82     EVT_MENU(DIALOGS_CHOOSE_FONT_GENERIC,           MyFrame::ChooseFontGeneric)
  83 #endif
  84
  85 #if wxUSE_PROGRESSDLG
  86     EVT_MENU(DIALOGS_PROGRESS,                      MyFrame::ShowProgress)
  87 #endif // wxUSE_PROGRESSDLG
  88
  89 #if wxUSE_BUSYINFO
  90     EVT_MENU(DIALOGS_BUSYINFO,                      MyFrame::ShowBusyInfo)
  91 #endif // wxUSE_BUSYINFO
  92
  93 #if wxUSE_FINDREPLDLG
  94     EVT_MENU(DIALOGS_FIND,                          MyFrame::ShowFindDialog)
  95     EVT_MENU(DIALOGS_REPLACE,                       MyFrame::ShowReplaceDialog)
  96
  97     EVT_FIND(-1, MyFrame::OnFindDialog)
  98     EVT_FIND_NEXT(-1, MyFrame::OnFindDialog)
  99     EVT_FIND_REPLACE(-1, MyFrame::OnFindDialog)
 100     EVT_FIND_REPLACE_ALL(-1, MyFrame::OnFindDialog)
 101     EVT_FIND_CLOSE(-1, MyFrame::OnFindDialog)
 102 #endif // wxUSE_FINDREPLDLG
 103     EVT_MENU(wxID_EXIT,                             MyFrame::OnExit)
 104 END_EVENT_TABLE()
 105
 106 BEGIN_EVENT_TABLE(MyModalDialog, wxDialog)
 107     EVT_BUTTON(-1, MyModalDialog::OnButton)
 108 END_EVENT_TABLE()
 109
 110 BEGIN_EVENT_TABLE(MyModelessDialog, wxDialog)
 111     EVT_BUTTON(DIALOGS_MODELESS_BTN, MyModelessDialog::OnButton)
 112
 113     EVT_CLOSE(MyModelessDialog::OnClose)
 114 END_EVENT_TABLE()
 115
 116 MyCanvas *myCanvas = (MyCanvas *) NULL;
 117
 118 // `Main program' equivalent, creating windows and returning main app frame
 119 bool MyApp::OnInit()
 120 {
 121 #if defined(__WXGTK__) && defined(wxUSE_UNICODE)
 122   wxConvCurrent = &wxConvLibc;
 123 #endif
 124
 125   m_canvasTextColour = wxColour("BLACK");
 126   m_canvasFont = *wxNORMAL_FONT;
 127
 128   // Create the main frame window
 129   MyFrame *frame = new MyFrame((wxFrame *) NULL, (char *) "wxWindows dialogs example", wxPoint(20, 20), wxSize(400, 300));
 130
 131   // Make a menubar
 132   wxMenu *file_menu = new wxMenu;
 133
 134   file_menu->Append(DIALOGS_CHOOSE_COLOUR, "&Choose colour");
 135
 136 #if defined(__WXMSW__) && wxTEST_GENERIC_DIALOGS_IN_MSW
 137   file_menu->Append(DIALOGS_CHOOSE_COLOUR_GENERIC, "Choose colour (&generic)");
 138 #endif
 139
 140   file_menu->AppendSeparator();
 141   file_menu->Append(DIALOGS_CHOOSE_FONT, "Choose &font");
 142
 143 #if defined(__WXMSW__) && wxTEST_GENERIC_DIALOGS_IN_MSW
 144   file_menu->Append(DIALOGS_CHOOSE_FONT_GENERIC, "Choose f&ont (generic)");
 145
 146 #endif
 147   file_menu->AppendSeparator();
 148   file_menu->Append(DIALOGS_LOG_DIALOG, "&Log dialog\tCtrl-L");
 149   file_menu->Append(DIALOGS_MESSAGE_BOX, "&Message box\tCtrl-M");
 150   file_menu->Append(DIALOGS_TEXT_ENTRY,  "Text &entry\tCtrl-E");
 151   file_menu->Append(DIALOGS_PASSWORD_ENTRY,  "&Password entry\tCtrl-P");
 152   file_menu->Append(DIALOGS_NUM_ENTRY, "&Numeric entry\tCtrl-N");
 153   file_menu->Append(DIALOGS_SINGLE_CHOICE,  "&Single choice\tCtrl-C");
 154   file_menu->Append(DIALOGS_MULTI_CHOICE,  "M&ultiple choice\tCtrl-U");
 155   file_menu->AppendSeparator();
 156   file_menu->Append(DIALOGS_TIP,  "&Tip of the day\tCtrl-T");
 157   file_menu->AppendSeparator();
 158   file_menu->Append(DIALOGS_FILE_OPEN,  "&Open file\tCtrl-O");
 159   file_menu->Append(DIALOGS_FILE_OPEN2,  "&Second open file\tCtrl-2");
 160   file_menu->Append(DIALOGS_FILES_OPEN,  "Open &files\tCtrl-Q");
 161   file_menu->Append(DIALOGS_FILE_SAVE,  "Sa&ve file\tCtrl-S");
 162   file_menu->Append(DIALOGS_DIR_CHOOSE,  "&Choose a directory\tCtrl-D");
 163 #if defined(__WXMSW__) || defined(__WXMAC__)
 164   file_menu->Append(DIALOGS_GENERIC_DIR_CHOOSE,  "&Choose a directory (generic implementation)");
 165 #endif // wxMSW || wxMAC
 166 #if wxUSE_PROGRESSDLG
 167   file_menu->Append(DIALOGS_PROGRESS, "Pro&gress dialog\tCtrl-G");
 168 #endif // wxUSE_PROGRESSDLG
 169 #if wxUSE_BUSYINFO
 170   file_menu->Append(DIALOGS_BUSYINFO, "&Busy info dialog\tCtrl-B");
 171 #endif // wxUSE_BUSYINFO
 172 #if wxUSE_FINDREPLDLG
 173   file_menu->Append(DIALOGS_FIND, "&Find dialog\tCtrl-F", "", TRUE);
 174   file_menu->Append(DIALOGS_REPLACE, "Find and &replace dialog\tShift-Ctrl-F", "", TRUE);
 175 #endif // wxUSE_FINDREPLDLG
 176   file_menu->AppendSeparator();
 177   file_menu->Append(DIALOGS_MODAL, "Mo&dal dialog\tCtrl-W");
 178   file_menu->Append(DIALOGS_MODELESS, "Modeless &dialog\tCtrl-Z", "", TRUE);
 179   file_menu->AppendSeparator();
 180   file_menu->Append(wxID_EXIT, "E&xit\tAlt-X");
 181   wxMenuBar *menu_bar = new wxMenuBar;
 182   menu_bar->Append(file_menu, "&File");
 183   frame->SetMenuBar(menu_bar);
 184
 185   myCanvas = new MyCanvas(frame);
 186   myCanvas->SetBackgroundColour(*wxWHITE);
 187
 188   frame->Centre(wxBOTH);
 189
 190   // Show the frame
 191   frame->Show(TRUE);
 192
 193   SetTopWindow(frame);
 194
 195   return TRUE;
 196 }
 197
 198 // My frame constructor
 199 MyFrame::MyFrame(wxWindow *parent,
 200                  const wxString& title,
 201                  const wxPoint& pos,
 202                  const wxSize& size)
 203        : wxFrame(parent, -1, title, pos, size)
 204 {
 205     m_dialog = (MyModelessDialog *)NULL;
 206
 207 #if wxUSE_FINDREPLDLG
 208     m_dlgFind =
 209     m_dlgReplace = NULL;
 210 #endif
 211
 212     CreateStatusBar();
 213 }
 214
 215 void MyFrame::ChooseColour(wxCommandEvent& WXUNUSED(event) )
 216 {
 217     wxColour col = myCanvas->GetBackgroundColour();
 218
 219     wxColourData data;
 220     data.SetColour(col);
 221     data.SetChooseFull(TRUE);
 222     for (int i = 0; i < 16; i++)
 223     {
 224         wxColour colour(i*16, i*16, i*16);
 225         data.SetCustomColour(i, colour);
 226     }
 227
 228     wxColourDialog dialog(this, &data);
 229     dialog.SetTitle("Choose the background colour");
 230     if (dialog.ShowModal() == wxID_OK)
 231     {
 232         wxColourData retData = dialog.GetColourData();
 233         col = retData.GetColour();
 234         myCanvas->SetBackgroundColour(col);
 235         myCanvas->Clear();
 236         myCanvas->Refresh();
 237     }
 238 }
 239
 240 void MyFrame::ChooseFont(wxCommandEvent& WXUNUSED(event) )
 241 {
 242       wxFontData data;
 243       data.SetInitialFont(wxGetApp().m_canvasFont);
 244       data.SetColour(wxGetApp().m_canvasTextColour);
 245
 246       wxFontDialog *dialog = new wxFontDialog(this, &data);
 247       if (dialog->ShowModal() == wxID_OK)
 248       {
 249         wxFontData retData = dialog->GetFontData();
 250         wxGetApp().m_canvasFont = retData.GetChosenFont();
 251         wxGetApp().m_canvasTextColour = retData.GetColour();
 252         myCanvas->Refresh();
 253       }
 254       dialog->Destroy();
 255 }
 256
 257 #if defined(__WXMSW__) && wxTEST_GENERIC_DIALOGS_IN_MSW
 258 void MyFrame::ChooseColourGeneric(wxCommandEvent& WXUNUSED(event))
 259 {
 260       wxColourData data;
 261       data.SetChooseFull(TRUE);
 262       for (int i = 0; i < 16; i++)
 263       {
 264         wxColour colour(i*16, i*16, i*16);
 265         data.SetCustomColour(i, colour);
 266       }
 267
 268       wxGenericColourDialog *dialog = new wxGenericColourDialog(this, &data);
 269       if (dialog->ShowModal() == wxID_OK)
 270       {
 271         wxColourData retData = dialog->GetColourData();
 272         wxColour col = retData.GetColour();
 273 //        wxBrush *brush = wxTheBrushList->FindOrCreateBrush(&col, wxSOLID);
 274         myCanvas->SetBackgroundColour(col);
 275         myCanvas->Clear();
 276         myCanvas->Refresh();
 277       }
 278       dialog->Destroy();
 279 }
 280
 281 void MyFrame::ChooseFontGeneric(wxCommandEvent& WXUNUSED(event) )
 282 {
 283       wxFontData data;
 284       data.SetInitialFont(wxGetApp().m_canvasFont);
 285       data.SetColour(wxGetApp().m_canvasTextColour);
 286
 287       wxGenericFontDialog *dialog = new wxGenericFontDialog(this, &data);
 288       if (dialog->ShowModal() == wxID_OK)
 289       {
 290         wxFontData retData = dialog->GetFontData();
 291         wxGetApp().m_canvasFont = retData.GetChosenFont();
 292         wxGetApp().m_canvasTextColour = retData.GetColour();
 293         myCanvas->Refresh();
 294       }
 295       dialog->Destroy();
 296 }
 297 #endif // wxTEST_GENERIC_DIALOGS_IN_MSW
 298
 299 void MyFrame::LogDialog(wxCommandEvent& event)
 300 {
 301     // calling wxYield() (as ~wxBusyCursor does) shouldn't result in messages
 302     // being flushed -- test it
 303     {
 304         wxBusyCursor bc;
 305         wxLogMessage(wxT("This is some message - everything is ok so far."));
 306         wxLogMessage(wxT("Another message...\n... this one is on multiple lines"));
 307         wxLogWarning(wxT("And then something went wrong!"));
 308
 309         // and if ~wxBusyCursor doesn't do it, then call it manually
 310         wxYield();
 311     }
 312
 313     wxLogError(wxT("Intermediary error handler decided to abort."));
 314     wxLogError(wxT("The top level caller detected an unrecoverable error."));
 315
 316     wxLog::FlushActive();
 317
 318     wxLogMessage(wxT("And this is the same dialog but with only one message."));
 319 }
 320
 321 void MyFrame::MessageBox(wxCommandEvent& WXUNUSED(event) )
 322 {
 323   wxMessageDialog dialog( NULL, "This is a message box\nA long, long string to test out the message box properly",
 324       "Message box text", wxNO_DEFAULT|wxYES_NO|wxCANCEL|wxICON_INFORMATION);
 325
 326   switch ( dialog.ShowModal() )
 327   {
 328       case wxID_YES:
 329           wxLogStatus("You pressed \"Yes\"");
 330           break;
 331
 332       case wxID_NO:
 333           wxLogStatus("You pressed \"No\"");
 334           break;
 335
 336       case wxID_CANCEL:
 337           wxLogStatus("You pressed \"Cancel\"");
 338           break;
 339
 340       default:
 341           wxLogError("Unexpected wxMessageDialog return code!");
 342   }
 343 }
 344
 345 void MyFrame::NumericEntry(wxCommandEvent& WXUNUSED(event) )
 346 {
 347     long res = wxGetNumberFromUser( "This is some text, actually a lot of text.\n"
 348                                     "Even two rows of text.",
 349                                     "Enter a number:", "Numeric input test",
 350                                      50, 0, 100, this );
 351
 352     wxString msg;
 353     int icon;
 354     if ( res == -1 )
 355     {
 356         msg = "Invalid number entered or dialog cancelled.";
 357         icon = wxICON_HAND;
 358     }
 359     else
 360     {
 361         msg.Printf(_T("You've entered %lu"), res );
 362         icon = wxICON_INFORMATION;
 363     }
 364
 365     wxMessageBox(msg, "Numeric test result", wxOK | icon, this);
 366 }
 367
 368 void MyFrame::PasswordEntry(wxCommandEvent& WXUNUSED(event))
 369 {
 370     wxString pwd = wxGetPasswordFromUser("Enter password:",
 371                                          "Password entry dialog",
 372                                          "",
 373                                          this);
 374     if ( !!pwd )
 375     {
 376         wxMessageBox(wxString::Format(wxT("Your password is '%s'"), pwd.c_str()),
 377                      "Got password", wxOK | wxICON_INFORMATION, this);
 378     }
 379 }
 380
 381 void MyFrame::TextEntry(wxCommandEvent& WXUNUSED(event))
 382 {
 383   wxTextEntryDialog dialog(this,
 384                            "This is a small sample\n"
 385                            "A long, long string to test out the text entrybox",
 386                            "Please enter a string",
 387                            "Default value",
 388                            wxOK | wxCANCEL);
 389
 390   if (dialog.ShowModal() == wxID_OK)
 391   {
 392     wxMessageDialog dialog2(this, dialog.GetValue(), "Got string");
 393     dialog2.ShowModal();
 394   }
 395 }
 396
 397 void MyFrame::SingleChoice(wxCommandEvent& WXUNUSED(event) )
 398 {
 399     const wxString choices[] = { "One", "Two", "Three", "Four", "Five" } ;
 400
 401     wxSingleChoiceDialog dialog(this,
 402                                 "This is a small sample\n"
 403                                 "A single-choice convenience dialog",
 404                                 "Please select a value",
 405                                 WXSIZEOF(choices), choices);
 406
 407     dialog.SetSelection(2);
 408
 409     if (dialog.ShowModal() == wxID_OK)
 410     {
 411         wxMessageDialog dialog2(this, dialog.GetStringSelection(), "Got string");
 412         dialog2.ShowModal();
 413     }
 414 }
 415
 416 void MyFrame::MultiChoice(wxCommandEvent& WXUNUSED(event) )
 417 {
 418     const wxString choices[] =
 419     {
 420         "One", "Two", "Three", "Four", "Five",
 421         "Six", "Seven", "Eight", "Nine", "Ten",
 422         "Eleven", "Twelve", "Seventeen",
 423     };
 424
 425     wxArrayInt selections;
 426     size_t count = wxGetMultipleChoices(selections,
 427                                         "This is a small sample\n"
 428                                         "A multi-choice convenience dialog",
 429                                         "Please select a value",
 430                                         WXSIZEOF(choices), choices,
 431                                         this);
 432     if ( count )
 433     {
 434         wxString msg;
 435         msg.Printf(wxT("You selected %u items:\n"), count);
 436         for ( size_t n = 0; n < count; n++ )
 437         {
 438             msg += wxString::Format(wxT("\t%u: %u (%s)\n"), n, selections[n],
 439                                     choices[selections[n]].c_str());
 440         }
 441         wxLogMessage(msg);
 442     }
 443     //else: cancelled or nothing selected
 444 }
 445
 446 void MyFrame::FileOpen(wxCommandEvent& WXUNUSED(event) )
 447 {
 448     wxFileDialog dialog
 449                  (
 450                     this,
 451                     _T("Testing open file dialog"),
 452                     _T(""),
 453                     _T(""),
 454                     _T("C++ files (*.h;*.cpp)|*.h;*.cpp")
 455                  );
 456
 457     if (dialog.ShowModal() == wxID_OK)
 458     {
 459         wxString info;
 460         info.Printf(_T("Full file name: %s\n")
 461                     _T("Path: %s\n")
 462                     _T("Name: %s"),
 463                     dialog.GetPath().c_str(),
 464                     dialog.GetDirectory().c_str(),
 465                     dialog.GetFilename().c_str());
 466         wxMessageDialog dialog2(this, info, "Selected file");
 467         dialog2.ShowModal();
 468     }
 469 }
 470
 471 // this shows how to take advantage of specifying a default extension in the
 472 // call to wxFileSelector: it is remembered after each new call and the next
 473 // one will use it by default
 474 void MyFrame::FileOpen2(wxCommandEvent& WXUNUSED(event) )
 475 {
 476     static wxString s_extDef;
 477     wxString path = wxFileSelector(
 478                                     _T("Select the file to load"),
 479                                     _T(""), _T(""),
 480                                     s_extDef,
 481                                     _T("Waveform (*.wav)|*.wav|Plain text (*.txt)|*.txt|All files (*.*)|*.*"),
 482                                     wxCHANGE_DIR,
 483                                     this
 484                                    );
 485
 486     if ( !path )
 487         return;
 488
 489     // it is just a sample, would use wxSplitPath in real program
 490     s_extDef = path.AfterLast(_T('.'));
 491
 492     wxLogMessage(_T("You selected the file '%s', remembered extension '%s'"),
 493                  (const wxChar*) path, (const wxChar*) s_extDef);
 494 }
 495
 496 void MyFrame::FilesOpen(wxCommandEvent& WXUNUSED(event) )
 497 {
 498     wxFileDialog dialog(this, "Testing open multiple file dialog",
 499                         "", "", wxFileSelectorDefaultWildcardStr,
 500                         wxMULTIPLE);
 501
 502     if (dialog.ShowModal() == wxID_OK)
 503     {
 504         wxArrayString paths, filenames;
 505
 506         dialog.GetPaths(paths);
 507         dialog.GetFilenames(filenames);
 508
 509         wxString msg, s;
 510         size_t count = paths.GetCount();
 511         for ( size_t n = 0; n < count; n++ )
 512         {
 513             s.Printf(_T("File %d: %s (%s)\n"),
 514                      n, paths[n].c_str(), filenames[n].c_str());
 515
 516             msg += s;
 517         }
 518
 519         wxMessageDialog dialog2(this, msg, "Selected files");
 520         dialog2.ShowModal();
 521     }
 522 }
 523
 524 void MyFrame::FileSave(wxCommandEvent& WXUNUSED(event) )
 525 {
 526     wxFileDialog dialog(this, "Testing save file dialog", "", "myletter.txt",
 527         "Text files (*.txt)|*.txt|Document files (*.doc)|*.doc",
 528         wxSAVE|wxOVERWRITE_PROMPT);
 529
 530     if (dialog.ShowModal() == wxID_OK)
 531     {
 532         wxChar buf[400];
 533         wxSprintf(buf, _T("%s, filter %d"), (const wxChar*)dialog.GetPath(), dialog.GetFilterIndex());
 534         wxMessageDialog dialog2(this, wxString(buf), "Selected path");
 535         dialog2.ShowModal();
 536     }
 537 }
 538
 539 void MyFrame::DirChoose(wxCommandEvent& WXUNUSED(event) )
 540 {
 541     // pass some initial dir to wxDirDialog
 542     wxString dirHome;
 543     wxGetHomeDir(&dirHome);
 544
 545     wxDirDialog dialog(this, "Testing directory picker", dirHome);
 546
 547     if (dialog.ShowModal() == wxID_OK)
 548     {
 549         wxMessageDialog dialog2(this, dialog.GetPath(), "Selected path");
 550         dialog2.ShowModal();
 551     }
 552 }
 553
 554 #if defined(__WXMSW__) || defined(__WXMAC__)
 555
 556 void MyFrame::GenericDirChoose(wxCommandEvent& WXUNUSED(event) )
 557 {
 558 #if !defined(__WXMSW__) || defined(wxUSE_DIRDLGG) && wxUSE_DIRDLGG
 559     // pass some initial dir to wxDirDialog
 560     wxString dirHome;
 561     wxGetHomeDir(&dirHome);
 562
 563     wxGenericDirDialog dialog(this, "Testing generic directory picker", dirHome);
 564
 565     if (dialog.ShowModal() == wxID_OK)
 566     {
 567         wxMessageDialog dialog2(this, dialog.GetPath(), "Selected path");
 568         dialog2.ShowModal();
 569     }
 570 #else
 571     wxLogError(wxT("Sorry, generic dir dialog not available:\n")
 572                wxT("set wxUSE_DIRDLGG to 1 and recompile"));
 573 #endif
 574 }
 575
 576 #endif // wxMSW || wxMAC
 577
 578 void MyFrame::ModalDlg(wxCommandEvent& WXUNUSED(event))
 579 {
 580     MyModalDialog dlg(this);
 581     dlg.ShowModal();
 582 }
 583
 584 void MyFrame::ModelessDlg(wxCommandEvent& event)
 585 {
 586     bool show = GetMenuBar()->IsChecked(event.GetId());
 587
 588     if ( show )
 589     {
 590         if ( !m_dialog )
 591         {
 592             m_dialog = new MyModelessDialog(this);
 593         }
 594
 595         m_dialog->Show(TRUE);
 596     }
 597     else // hide
 598     {
 599         m_dialog->Hide();
 600     }
 601 }
 602
 603 void MyFrame::ShowTip(wxCommandEvent& event)
 604 {
 605 #if wxUSE_STARTUP_TIPS
 606     static size_t s_index = (size_t)-1;
 607
 608     if ( s_index == (size_t)-1 )
 609     {
 610         srand(time(NULL));
 611
 612         // this is completely bogus, we don't know how many lines are there
 613         // in the file, but who cares, it's a demo only...
 614         s_index = rand() % 5;
 615     }
 616
 617     wxTipProvider *tipProvider = wxCreateFileTipProvider("tips.txt", s_index);
 618
 619     bool showAtStartup = wxShowTip(this, tipProvider);
 620
 621     if ( showAtStartup )
 622     {
 623         wxMessageBox("Will show tips on startup", "Tips dialog",
 624                      wxOK | wxICON_INFORMATION, this);
 625     }
 626
 627     s_index = tipProvider->GetCurrentTip();
 628     delete tipProvider;
 629 #endif
 630 }
 631
 632 void MyFrame::OnExit(wxCommandEvent& WXUNUSED(event) )
 633 {
 634     Close(TRUE);
 635 }
 636
 637 #if wxUSE_PROGRESSDLG
 638
 639 void MyFrame::ShowProgress( wxCommandEvent& WXUNUSED(event) )
 640 {
 641     static const int max = 10;
 642
 643     wxProgressDialog dialog("Progress dialog example",
 644                             "An informative message",
 645                             max,    // range
 646                             this,   // parent
 647                             wxPD_CAN_ABORT |
 648                             wxPD_APP_MODAL |
 649                             wxPD_ELAPSED_TIME |
 650                             wxPD_ESTIMATED_TIME |
 651                             wxPD_REMAINING_TIME);
 652
 653     bool cont = TRUE;
 654     for ( int i = 0; i <= max && cont; i++ )
 655     {
 656         wxSleep(1);
 657         if ( i == max )
 658         {
 659             cont = dialog.Update(i, "That's all, folks!");
 660         }
 661         else if ( i == max / 2 )
 662         {
 663             cont = dialog.Update(i, "Only a half left (very long message)!");
 664         }
 665         else
 666         {
 667             cont = dialog.Update(i);
 668         }
 669     }
 670
 671     if ( !cont )
 672     {
 673         wxLogStatus(wxT("Progress dialog aborted!"));
 674     }
 675     else
 676     {
 677         wxLogStatus(wxT("Countdown from %d finished"), max);
 678     }
 679 }
 680
 681 #endif // wxUSE_PROGRESSDLG
 682
 683 #if wxUSE_BUSYINFO
 684
 685 void MyFrame::ShowBusyInfo(wxCommandEvent& WXUNUSED(event))
 686 {
 687     wxWindowDisabler disableAll;
 688
 689     wxBusyInfo info("Working, please wait...", this);
 690
 691     for ( int i = 0; i < 30; i++ )
 692     {
 693         wxUsleep(100);
 694         wxTheApp->Yield();
 695     }
 696 }
 697
 698 #endif // wxUSE_BUSYINFO
 699
 700 #if wxUSE_FINDREPLDLG
 701
 702 void MyFrame::ShowReplaceDialog( wxCommandEvent& WXUNUSED(event) )
 703 {
 704     if ( m_dlgReplace )
 705     {
 706         delete m_dlgReplace;
 707         m_dlgReplace = NULL;
 708     }
 709     else
 710     {
 711         m_dlgReplace = new wxFindReplaceDialog
 712                            (
 713                             this,
 714                             &m_findData,
 715                             "Find and replace dialog",
 716                             wxFR_REPLACEDIALOG
 717                            );
 718
 719         m_dlgReplace->Show(TRUE);
 720     }
 721 }
 722
 723 void MyFrame::ShowFindDialog( wxCommandEvent& WXUNUSED(event) )
 724 {
 725     if ( m_dlgFind )
 726     {
 727         delete m_dlgFind;
 728         m_dlgFind = NULL;
 729     }
 730     else
 731     {
 732         m_dlgFind = new wxFindReplaceDialog
 733                         (
 734                             this,
 735                             &m_findData,
 736                             "Find dialog",
 737                             // just for testing
 738                             wxFR_NOWHOLEWORD
 739                         );
 740
 741         m_dlgFind->Show(TRUE);
 742     }
 743 }
 744
 745 static wxString DecodeFindDialogEventFlags(int flags)
 746 {
 747     wxString str;
 748     str << (flags & wxFR_DOWN ? "down" : "up") << ", "
 749         << (flags & wxFR_WHOLEWORD ? "whole words only, " : "")
 750         << (flags & wxFR_MATCHCASE ? "" : "not ")
 751         << "case sensitive";
 752
 753     return str;
 754 }
 755
 756 void MyFrame::OnFindDialog(wxFindDialogEvent& event)
 757 {
 758     wxEventType type = event.GetEventType();
 759
 760     if ( type == wxEVT_COMMAND_FIND || type == wxEVT_COMMAND_FIND_NEXT )
 761     {
 762         wxLogMessage(wxT("Find %s'%s' (flags: %s)"),
 763                      type == wxEVT_COMMAND_FIND_NEXT ? "next " : "",
 764                      event.GetFindString().c_str(),
 765                      DecodeFindDialogEventFlags(event.GetFlags()).c_str());
 766     }
 767     else if ( type == wxEVT_COMMAND_FIND_REPLACE ||
 768                 type == wxEVT_COMMAND_FIND_REPLACE_ALL )
 769     {
 770         wxLogMessage(wxT("Replace %s'%s' with '%s' (flags: %s)"),
 771                      type == wxEVT_COMMAND_FIND_REPLACE_ALL ? "all " : "",
 772                      event.GetFindString().c_str(),
 773                      event.GetReplaceString().c_str(),
 774                      DecodeFindDialogEventFlags(event.GetFlags()).c_str());
 775     }
 776     else if ( type == wxEVT_COMMAND_FIND_CLOSE )
 777     {
 778         wxFindReplaceDialog *dlg = event.GetDialog();
 779
 780         const wxChar *txt;
 781         if ( dlg == m_dlgFind )
 782         {
 783             txt = _T("Find");
 784             m_dlgFind = NULL;
 785         }
 786         else if ( dlg == m_dlgReplace )
 787         {
 788             txt = _T("Replace");
 789             m_dlgReplace = NULL;
 790         }
 791         else
 792         {
 793             txt = _T("Unknown");
 794
 795             wxFAIL_MSG( _T("unexecpted event") );
 796         }
 797
 798         wxLogMessage(wxT("%s dialog is being closed."), txt),
 799
 800         dlg->Destroy();
 801     }
 802     else
 803     {
 804         wxLogError(wxT("Unknown find dialog event!"));
 805     }
 806 }
 807
 808 #endif // wxUSE_FINDREPLDLG
 809
 810 // ----------------------------------------------------------------------------
 811 // MyCanvas
 812 // ----------------------------------------------------------------------------
 813
 814 void MyCanvas::OnPaint(wxPaintEvent& WXUNUSED(event) )
 815 {
 816     wxPaintDC dc(this);
 817     dc.SetFont(wxGetApp().m_canvasFont);
 818     dc.SetTextForeground(wxGetApp().m_canvasTextColour);
 819     dc.SetBackgroundMode(wxTRANSPARENT);
 820     dc.DrawText("wxWindows common dialogs test application", 10, 10);
 821 }
 822
 823 // ----------------------------------------------------------------------------
 824 // MyModelessDialog
 825 // ----------------------------------------------------------------------------
 826
 827 MyModelessDialog::MyModelessDialog(wxWindow *parent)
 828                 : wxDialog(parent, -1, wxString("Modeless dialog"))
 829 {
 830     wxBoxSizer *sizerTop = new wxBoxSizer(wxVERTICAL);
 831
 832     wxButton *btn = new wxButton(this, DIALOGS_MODELESS_BTN, "Press me");
 833     wxCheckBox *check = new wxCheckBox(this, -1, "Should be disabled");
 834     check->Disable();
 835
 836     sizerTop->Add(btn, 1, wxEXPAND | wxALL, 5);
 837     sizerTop->Add(check, 1, wxEXPAND | wxALL, 5);
 838
 839     SetAutoLayout(TRUE);
 840     SetSizer(sizerTop);
 841
 842     sizerTop->SetSizeHints(this);
 843     sizerTop->Fit(this);
 844 }
 845
 846 void MyModelessDialog::OnButton(wxCommandEvent& WXUNUSED(event))
 847 {
 848     wxMessageBox("Button pressed in modeless dialog", "Info",
 849                  wxOK | wxICON_INFORMATION, this);
 850 }
 851
 852 void MyModelessDialog::OnClose(wxCloseEvent& event)
 853 {
 854     if ( event.CanVeto() )
 855     {
 856         wxMessageBox("Use the menu item to close this dialog",
 857                      "Modeless dialog",
 858                      wxOK | wxICON_INFORMATION, this);
 859
 860         event.Veto();
 861     }
 862 }
 863
 864 // ----------------------------------------------------------------------------
 865 // MyModalDialog
 866 // ----------------------------------------------------------------------------
 867
 868 MyModalDialog::MyModalDialog(wxWindow *parent)
 869              : wxDialog(parent, -1, wxString("Modal dialog"))
 870 {
 871     wxBoxSizer *sizerTop = new wxBoxSizer(wxHORIZONTAL);
 872
 873     m_btnFocused = new wxButton(this, -1, "Default button");
 874     m_btnDelete = new wxButton(this, -1, "&Delete button");
 875     wxButton *btnOk = new wxButton(this, wxID_CANCEL, "&Close");
 876     sizerTop->Add(m_btnFocused, 0, wxALIGN_CENTER | wxALL, 5);
 877     sizerTop->Add(m_btnDelete, 0, wxALIGN_CENTER | wxALL, 5);
 878     sizerTop->Add(btnOk, 0, wxALIGN_CENTER | wxALL, 5);
 879
 880     SetAutoLayout(TRUE);
 881     SetSizer(sizerTop);
 882
 883     sizerTop->SetSizeHints(this);
 884     sizerTop->Fit(this);
 885
 886     m_btnFocused->SetFocus();
 887     m_btnFocused->SetDefault();
 888 }
 889
 890 void MyModalDialog::OnButton(wxCommandEvent& event)
 891 {
 892     if ( event.GetEventObject() == m_btnDelete )
 893     {
 894         delete m_btnFocused;
 895         m_btnFocused = NULL;
 896
 897         m_btnDelete->Disable();
 898     }
 899     else if ( event.GetEventObject() == m_btnFocused )
 900     {
 901         wxGetTextFromUser("Dummy prompt", "Modal dialog called from dialog",
 902                           "", this);
 903     }
 904     else
 905     {
 906         event.Skip();
 907     }
 908 }