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
  34 #define wxTEST_GENERIC_DIALOGS_IN_MSW 0
  35
  36 #if defined(__WXMSW__) && wxTEST_GENERIC_DIALOGS_IN_MSW
  37 #include <wx/generic/colrdlgg.h>
  38 #include <wx/generic/fontdlgg.h>
  39 #endif
  40
  41 #include "dialogs.h"
  42
  43 IMPLEMENT_APP(MyApp)
  44
  45 MyCanvas *myCanvas = (MyCanvas *) NULL;
  46
  47 // `Main program' equivalent, creating windows and returning main app frame
  48 bool MyApp::OnInit(void)
  49 {
  50   m_canvasTextColour = wxColour("BLACK");
  51   m_canvasFont = *wxNORMAL_FONT;
  52
  53   // Create the main frame window
  54   MyFrame *frame = new MyFrame((wxFrame *) NULL, (char *) "wxWindows dialogs example", wxPoint(50, 50), wxSize(400, 300));
  55
  56   // Make a menubar
  57   wxMenu *file_menu = new wxMenu;
  58
  59   file_menu->Append(DIALOGS_CHOOSE_COLOUR, "&Choose colour");
  60
  61 #if defined(__WXMSW__) && wxTEST_GENERIC_DIALOGS_IN_MSW
  62   file_menu->Append(DIALOGS_CHOOSE_COLOUR_GENERIC, "Choose colour (&generic)");
  63 #endif
  64
  65   file_menu->AppendSeparator();
  66   file_menu->Append(DIALOGS_CHOOSE_FONT, "Choose &font");
  67
  68 #if defined(__WXMSW__) && wxTEST_GENERIC_DIALOGS_IN_MSW
  69   file_menu->Append(DIALOGS_CHOOSE_FONT_GENERIC, "Choose f&ont (generic)");
  70
  71 #endif
  72   file_menu->AppendSeparator();
  73   file_menu->Append(DIALOGS_MESSAGE_BOX, "&Message box");
  74   file_menu->Append(DIALOGS_TEXT_ENTRY,  "Text &entry");
  75   file_menu->Append(DIALOGS_SINGLE_CHOICE,  "&Single choice");
  76   file_menu->AppendSeparator();
  77   file_menu->Append(DIALOGS_FILE_OPEN,  "&Open file");
  78   file_menu->Append(DIALOGS_FILE_SAVE,  "Sa&ve file");
  79   file_menu->Append(DIALOGS_DIR_CHOOSE,  "&Choose a directory");
  80   file_menu->AppendSeparator();
  81   file_menu->Append(wxID_EXIT, "E&xit");
  82   wxMenuBar *menu_bar = new wxMenuBar;
  83   menu_bar->Append(file_menu, "&File");
  84   frame->SetMenuBar(menu_bar);
  85
  86   myCanvas = new MyCanvas(frame);
  87   myCanvas->SetBackgroundColour(*wxWHITE);
  88
  89   frame->Centre(wxBOTH);
  90
  91   // Show the frame
  92   frame->Show(TRUE);
  93
  94   SetTopWindow(frame);
  95
  96   return TRUE;
  97 }
  98
  99 // My frame constructor
 100 MyFrame::MyFrame(wxWindow *parent, const wxString& title, const wxPoint& pos, const wxSize& size):
 101   wxFrame(parent, -1, title, pos, size)
 102 {}
 103
 104 void MyFrame::ChooseColour(wxCommandEvent& WXUNUSED(event) )
 105 {
 106       wxColourData data;
 107       data.SetChooseFull(TRUE);
 108       for (int i = 0; i < 16; i++)
 109       {
 110         wxColour colour(i*16, i*16, i*16);
 111         data.SetCustomColour(i, colour);
 112       }
 113
 114       wxColourDialog *dialog = new wxColourDialog(this, &data);
 115       if (dialog->ShowModal() == wxID_OK)
 116       {
 117         wxColourData retData = dialog->GetColourData();
 118         wxColour col = retData.GetColour();
 119 //        wxBrush *brush = wxTheBrushList->FindOrCreateBrush(&col, wxSOLID);
 120         myCanvas->SetBackgroundColour(col);
 121         myCanvas->Clear();
 122         myCanvas->Refresh();
 123       }
 124       dialog->Close();
 125 }
 126
 127 void MyFrame::ChooseFont(wxCommandEvent& WXUNUSED(event) )
 128 {
 129       wxFontData data;
 130       data.SetInitialFont(wxGetApp().m_canvasFont);
 131       data.SetColour(wxGetApp().m_canvasTextColour);
 132
 133       wxFontDialog *dialog = new wxFontDialog(this, &data);
 134       if (dialog->ShowModal() == wxID_OK)
 135       {
 136         wxFontData retData = dialog->GetFontData();
 137         wxGetApp().m_canvasFont = retData.GetChosenFont();
 138         wxGetApp().m_canvasTextColour = retData.GetColour();
 139         myCanvas->Refresh();
 140       }
 141       dialog->Close();
 142 }
 143
 144 #if defined(__WXMSW__) && wxTEST_GENERIC_DIALOGS_IN_MSW
 145 void MyFrame::ChooseColourGeneric(wxCommandEvent& WXUNUSED(event))
 146 {
 147       wxColourData data;
 148       data.SetChooseFull(TRUE);
 149       for (int i = 0; i < 16; i++)
 150       {
 151         wxColour colour(i*16, i*16, i*16);
 152         data.SetCustomColour(i, colour);
 153       }
 154
 155       wxGenericColourDialog *dialog = new wxGenericColourDialog(this, &data);
 156       if (dialog->ShowModal() == wxID_OK)
 157       {
 158         wxColourData retData = dialog->GetColourData();
 159         wxColour col = retData.GetColour();
 160 //        wxBrush *brush = wxTheBrushList->FindOrCreateBrush(&col, wxSOLID);
 161         myCanvas->SetBackgroundColour(col);
 162         myCanvas->Clear();
 163         myCanvas->Refresh();
 164       }
 165       dialog->Close();
 166 }
 167
 168 void MyFrame::ChooseFontGeneric(wxCommandEvent& WXUNUSED(event) )
 169 {
 170       wxFontData data;
 171       data.SetInitialFont(wxGetApp().m_canvasFont);
 172       data.SetColour(wxGetApp().m_canvasTextColour);
 173
 174       wxGenericFontDialog *dialog = new wxGenericFontDialog(this, &data);
 175       if (dialog->ShowModal() == wxID_OK)
 176       {
 177         wxFontData retData = dialog->GetFontData();
 178         wxGetApp().m_canvasFont = retData.GetChosenFont();
 179         wxGetApp().m_canvasTextColour = retData.GetColour();
 180         myCanvas->Refresh();
 181       }
 182       dialog->Close();
 183 }
 184 #endif
 185
 186 void MyFrame::MessageBox(wxCommandEvent& WXUNUSED(event) )
 187 {
 188   wxMessageDialog dialog(this, "This is a message box\nA long, long string to test out the message box properly",
 189         "Message box text", wxYES_NO|wxCANCEL);
 190
 191   dialog.ShowModal();
 192 }
 193
 194 void MyFrame::TextEntry(wxCommandEvent& WXUNUSED(event) )
 195 {
 196   wxTextEntryDialog dialog(this, "This is a small sample\nA long, long string to test out the text entrybox",
 197         "Please enter a string", "Default value", wxOK|wxCANCEL);
 198
 199   if (dialog.ShowModal() == wxID_OK)
 200   {
 201         wxMessageDialog dialog2(this, dialog.GetValue(), "Got string");
 202         dialog2.ShowModal();
 203   }
 204 }
 205
 206 void MyFrame::SingleChoice(wxCommandEvent& WXUNUSED(event) )
 207 {
 208     const wxString choices[] = { "One", "Two", "Three", "Four", "Five" } ;
 209     int n = 5;
 210
 211     wxSingleChoiceDialog dialog(this, "This is a small sample\nA single-choice convenience dialog",
 212         "Please select a value", n, (const wxString *)choices);
 213
 214     dialog.SetSelection(2);
 215
 216     if (dialog.ShowModal() == wxID_OK)
 217     {
 218         wxMessageDialog dialog2(this, dialog.GetStringSelection(), "Got string");
 219         dialog2.ShowModal();
 220     }
 221 }
 222
 223 void MyFrame::FileOpen(wxCommandEvent& WXUNUSED(event) )
 224 {
 225         wxFileDialog dialog(this, "Testing open file dialog", "", "", "*.txt", 0);
 226
 227         if (dialog.ShowModal() == wxID_OK)
 228         {
 229                 wxMessageDialog dialog2(this, dialog.GetPath(), "Selected path");
 230                 dialog2.ShowModal();
 231         }
 232 }
 233
 234 void MyFrame::FileSave(wxCommandEvent& WXUNUSED(event) )
 235 {
 236         wxFileDialog dialog(this, "Testing save file dialog", "", "",
 237                 "Text files (*.txt)|*.txt|Document files (*.doc)|*.doc",
 238                 wxSAVE|wxOVERWRITE_PROMPT);
 239
 240         if (dialog.ShowModal() == wxID_OK)
 241         {
 242                 char buf[400];
 243                 sprintf(buf, "%s, filter %d", (const char *)dialog.GetPath(), dialog.GetFilterIndex());
 244                 wxMessageDialog dialog2(this, wxString(buf), "Selected path");
 245                 dialog2.ShowModal();
 246         }
 247 }
 248
 249 void MyFrame::DirChoose(wxCommandEvent& WXUNUSED(event) )
 250 {
 251         wxDirDialog dialog(this, "Testing directory picker", "");
 252
 253         if (dialog.ShowModal() == wxID_OK)
 254         {
 255                 wxMessageDialog dialog2(this, dialog.GetPath(), "Selected path");
 256                 dialog2.ShowModal();
 257         }
 258 }
 259
 260 void MyFrame::OnExit(wxCommandEvent& WXUNUSED(event) )
 261 {
 262         Close(TRUE);
 263 }
 264
 265 void MyCanvas::OnPaint(wxPaintEvent& WXUNUSED(event) )
 266 {
 267         wxPaintDC dc(this);
 268     dc.SetFont(wxGetApp().m_canvasFont);
 269     dc.SetTextForeground(wxGetApp().m_canvasTextColour);
 270     dc.SetBackgroundMode(wxTRANSPARENT);
 271     dc.DrawText("wxWindows common dialogs test application", 10, 10);
 272 }
 273
 274 BEGIN_EVENT_TABLE(MyCanvas, wxScrolledWindow)
 275         EVT_PAINT(MyCanvas::OnPaint)
 276 END_EVENT_TABLE()
 277
 278 BEGIN_EVENT_TABLE(MyFrame, wxFrame)
 279         EVT_MENU(DIALOGS_CHOOSE_COLOUR,                         MyFrame::ChooseColour)
 280         EVT_MENU(DIALOGS_CHOOSE_FONT,                           MyFrame::ChooseFont)
 281         EVT_MENU(DIALOGS_MESSAGE_BOX,                           MyFrame::MessageBox)
 282         EVT_MENU(DIALOGS_TEXT_ENTRY,                            MyFrame::TextEntry)
 283         EVT_MENU(DIALOGS_SINGLE_CHOICE,                         MyFrame::SingleChoice)
 284         EVT_MENU(DIALOGS_FILE_OPEN,                                     MyFrame::FileOpen)
 285         EVT_MENU(DIALOGS_FILE_SAVE,                                     MyFrame::FileSave)
 286         EVT_MENU(DIALOGS_DIR_CHOOSE,                            MyFrame::DirChoose)
 287 #if defined(__WXMSW__) && wxTEST_GENERIC_DIALOGS_IN_MSW
 288         EVT_MENU(DIALOGS_CHOOSE_COLOUR_GENERIC,         MyFrame::ChooseColourGeneric)
 289         EVT_MENU(DIALOGS_CHOOSE_FONT_GENERIC,           MyFrame::ChooseFontGeneric)
 290 #endif
 291         EVT_MENU(wxID_EXIT,                                                     MyFrame::OnExit)
 292 END_EVENT_TABLE()
 293