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