Added the forgotten file txtstrm.tex

[wxWidgets.git] / samples / dialogs / dialogs.cpp

diff --git a/samples/dialogs/dialogs.cpp b/samples/dialogs/dialogs.cpp
index 42a2dc00c1b14fab98a43b162c0cd4c2bb9c334a..2ecea4a565c5708da73c2017a51bb470b59d388d 100644 (file)
--- a/samples/dialogs/dialogs.cpp
+++ b/samples/dialogs/dialogs.cpp
@@ -6,7 +6,7 @@
 // Created:     04/01/98
 // RCS-ID:      $Id$
 // Copyright:   (c) Julian Smart and Markus Holzem
 // Created:     04/01/98
 // RCS-ID:      $Id$
 // Copyright:   (c) Julian Smart and Markus Holzem

-// Licence:    wxWindows license
+// Licence:     wxWindows license

 /////////////////////////////////////////////////////////////////////////////
 
 #ifdef __GNUG__
 /////////////////////////////////////////////////////////////////////////////
 
 #ifdef __GNUG__


@@ -25,13 +25,17 @@
 #include "wx/wx.h"
 #endif
 
 #include "wx/wx.h"
 #endif
 

-#include <wx/colordlg.h>
-#include <wx/filedlg.h>
-#include <wx/dirdlg.h>
-#include <wx/fontdlg.h>
-#include <wx/choicdlg.h>
+#include "wx/colordlg.h"
+#include "wx/filedlg.h"
+#include "wx/dirdlg.h"
+#include "wx/fontdlg.h"
+#include "wx/choicdlg.h"
+#include "wx/tipdlg.h"
+#include "wx/extdlg.h"

 
 

-#if !defined(__WXMSW__) || wxUSE_GENERIC_DIALOGS_IN_MSW
+#define wxTEST_GENERIC_DIALOGS_IN_MSW 0
+
+#if defined(__WXMSW__) && wxTEST_GENERIC_DIALOGS_IN_MSW

 #include <wx/generic/colrdlgg.h>
 #include <wx/generic/fontdlgg.h>
 #endif
 #include <wx/generic/colrdlgg.h>
 #include <wx/generic/fontdlgg.h>
 #endif


@@ -42,13 +46,13 @@ IMPLEMENT_APP(MyApp)
 
 MyCanvas *myCanvas = (MyCanvas *) NULL;
 
 
 MyCanvas *myCanvas = (MyCanvas *) NULL;
 

-// A macro needed for some compilers (AIX) that need 'main' to be defined
-// in the application itself.
-IMPLEMENT_WXWIN_MAIN
-

 // `Main program' equivalent, creating windows and returning main app frame
 bool MyApp::OnInit(void)
 {
 // `Main program' equivalent, creating windows and returning main app frame
 bool MyApp::OnInit(void)
 {

+#if defined(__WXGTK__) && defined(wxUSE_UNICODE)
+  wxConvCurrent = &wxConvLibc;
+#endif
+

   m_canvasTextColour = wxColour("BLACK");
   m_canvasFont = *wxNORMAL_FONT;
 
   m_canvasTextColour = wxColour("BLACK");
   m_canvasFont = *wxNORMAL_FONT;
 


@@ -60,29 +64,29 @@ bool MyApp::OnInit(void)
 
   file_menu->Append(DIALOGS_CHOOSE_COLOUR, "&Choose colour");
 
 
   file_menu->Append(DIALOGS_CHOOSE_COLOUR, "&Choose colour");
 

-#if !defined(__WXMSW__) || wxUSE_GENERIC_DIALOGS_IN_MSW
+#if defined(__WXMSW__) && wxTEST_GENERIC_DIALOGS_IN_MSW

   file_menu->Append(DIALOGS_CHOOSE_COLOUR_GENERIC, "Choose colour (&generic)");
 #endif
 
   file_menu->AppendSeparator();
   file_menu->Append(DIALOGS_CHOOSE_FONT, "Choose &font");
 
   file_menu->Append(DIALOGS_CHOOSE_COLOUR_GENERIC, "Choose colour (&generic)");
 #endif
 
   file_menu->AppendSeparator();
   file_menu->Append(DIALOGS_CHOOSE_FONT, "Choose &font");
 

-#if !defined(__WXMSW__) || wxUSE_GENERIC_DIALOGS_IN_MSW
+#if defined(__WXMSW__) && wxTEST_GENERIC_DIALOGS_IN_MSW

   file_menu->Append(DIALOGS_CHOOSE_FONT_GENERIC, "Choose f&ont (generic)");
 
 #endif
   file_menu->AppendSeparator();
   file_menu->Append(DIALOGS_MESSAGE_BOX, "&Message box");
   file_menu->Append(DIALOGS_TEXT_ENTRY,  "Text &entry");
   file_menu->Append(DIALOGS_CHOOSE_FONT_GENERIC, "Choose f&ont (generic)");
 
 #endif
   file_menu->AppendSeparator();
   file_menu->Append(DIALOGS_MESSAGE_BOX, "&Message box");
   file_menu->Append(DIALOGS_TEXT_ENTRY,  "Text &entry");

+  file_menu->Append(DIALOGS_NUM_ENTRY, "&Numeric entry\tCtrl-N");

   file_menu->Append(DIALOGS_SINGLE_CHOICE,  "&Single choice");
   file_menu->Append(DIALOGS_SINGLE_CHOICE,  "&Single choice");

+  file_menu->Append(DIALOGS_EXT_DIALOG,  "&Extended dialog");
+  file_menu->AppendSeparator();
+  file_menu->Append(DIALOGS_TIP,  "&Tip of the day");

   file_menu->AppendSeparator();
   file_menu->Append(DIALOGS_FILE_OPEN,  "&Open file");
   file_menu->Append(DIALOGS_FILE_SAVE,  "Sa&ve file");
   file_menu->AppendSeparator();
   file_menu->Append(DIALOGS_FILE_OPEN,  "&Open file");
   file_menu->Append(DIALOGS_FILE_SAVE,  "Sa&ve file");

-#ifndef __WXGTK__
-  // don't add a menu entry for something that isn't in wxGTK. It only
-  // confuses the user

   file_menu->Append(DIALOGS_DIR_CHOOSE,  "&Choose a directory");
   file_menu->Append(DIALOGS_DIR_CHOOSE,  "&Choose a directory");

-#endif

   file_menu->AppendSeparator();
   file_menu->Append(wxID_EXIT, "E&xit");
   wxMenuBar *menu_bar = new wxMenuBar;
   file_menu->AppendSeparator();
   file_menu->Append(wxID_EXIT, "E&xit");
   wxMenuBar *menu_bar = new wxMenuBar;


@@ -107,6 +111,43 @@ MyFrame::MyFrame(wxWindow *parent, const wxString& title, const wxPoint& pos, co
   wxFrame(parent, -1, title, pos, size)
 {}
 
   wxFrame(parent, -1, title, pos, size)
 {}
 

+void MyFrame::ExtDialog(wxCommandEvent& WXUNUSED(event) )
+{
+    // The standard flags causes this dialog to display a 
+    // wxStaticLine under wxMotif and wxGTK, but none under 
+    // other platforms. Also, it will not be resizable
+    // anywhere.
+    
+    wxExtDialog dialog( this, -1, "Test 1 for wxExtDialog", wxOK|wxFORWARD|wxBACKWARD );
+    dialog.AddButton( new wxButton( &dialog, -1, "Custom") );
+
+    dialog.SetClientWindow( new wxTextCtrl( &dialog, -1, "Test", wxDefaultPosition, wxDefaultSize, wxTE_MULTILINE ) );
+
+    // query minimal recommended size from the buttons
+    dialog.SetSize( dialog.GetButtonAreaSize().x, 170 );
+    
+    dialog.Centre( wxBOTH );
+    dialog.ShowModal();
+    
+    // This dialog uses the standard dialog styles but is also
+    // resizable on all platforms and shows a wxStaticLine on
+    // all platforms.
+    
+    wxExtDialog dialog2( this, -1, "Test 2 for wxExtDialog", 
+      wxOK|wxFORWARD|wxBACKWARD|wxCANCEL, 
+      wxDefaultPosition, wxSize(400,170),
+      wxDEFAULT_DIALOG_STYLE | wxRESIZE_BORDER | wxED_BUTTONS_RIGHT | wxED_STATIC_LINE | wxED_CLIENT_MARGIN );
+
+    dialog2.SetClientWindow( new wxTextCtrl( &dialog2, -1, "Test", wxDefaultPosition, wxDefaultSize, wxTE_MULTILINE ) );
+
+    // query minimal recommended size from the buttons
+    wxSize min_size( dialog2.GetButtonAreaSize() );
+    dialog2.SetSizeHints( min_size.x + 200, min_size.y );
+    
+    dialog2.Centre( wxBOTH );
+    dialog2.ShowModal();
+}
+

 void MyFrame::ChooseColour(wxCommandEvent& WXUNUSED(event) )
 {
       wxColourData data;
 void MyFrame::ChooseColour(wxCommandEvent& WXUNUSED(event) )
 {
       wxColourData data;


@@ -127,7 +168,7 @@ void MyFrame::ChooseColour(wxCommandEvent& WXUNUSED(event) )
         myCanvas->Clear();
         myCanvas->Refresh();
       }
         myCanvas->Clear();
         myCanvas->Refresh();
       }

-      dialog->Close();
+      dialog->Destroy();

 }
 
 void MyFrame::ChooseFont(wxCommandEvent& WXUNUSED(event) )
 }
 
 void MyFrame::ChooseFont(wxCommandEvent& WXUNUSED(event) )


@@ -144,10 +185,10 @@ void MyFrame::ChooseFont(wxCommandEvent& WXUNUSED(event) )
         wxGetApp().m_canvasTextColour = retData.GetColour();
         myCanvas->Refresh();
       }
         wxGetApp().m_canvasTextColour = retData.GetColour();
         myCanvas->Refresh();
       }

-      dialog->Close();
+      dialog->Destroy();

 }
 
 }
 

-#if !defined(__WXMSW__) || wxUSE_GENERIC_DIALOGS_IN_MSW
+#if defined(__WXMSW__) && wxTEST_GENERIC_DIALOGS_IN_MSW

 void MyFrame::ChooseColourGeneric(wxCommandEvent& WXUNUSED(event))
 {
       wxColourData data;
 void MyFrame::ChooseColourGeneric(wxCommandEvent& WXUNUSED(event))
 {
       wxColourData data;


@@ -168,7 +209,7 @@ void MyFrame::ChooseColourGeneric(wxCommandEvent& WXUNUSED(event))
         myCanvas->Clear();
         myCanvas->Refresh();
       }
         myCanvas->Clear();
         myCanvas->Refresh();
       }

-      dialog->Close();
+      dialog->Destroy();

 }
 
 void MyFrame::ChooseFontGeneric(wxCommandEvent& WXUNUSED(event) )
 }
 
 void MyFrame::ChooseFontGeneric(wxCommandEvent& WXUNUSED(event) )


@@ -185,27 +226,48 @@ void MyFrame::ChooseFontGeneric(wxCommandEvent& WXUNUSED(event) )
         wxGetApp().m_canvasTextColour = retData.GetColour();
         myCanvas->Refresh();
       }
         wxGetApp().m_canvasTextColour = retData.GetColour();
         myCanvas->Refresh();
       }

-      dialog->Close();
+      dialog->Destroy();

 }
 #endif
 
 void MyFrame::MessageBox(wxCommandEvent& WXUNUSED(event) )
 {
 }
 #endif
 
 void MyFrame::MessageBox(wxCommandEvent& WXUNUSED(event) )
 {

-  wxMessageDialog dialog(this, "This is a message box\nA long, long string to test out the message box properly",
-       "Message box text", wxYES_NO|wxCANCEL);
+  wxMessageDialog dialog(NULL, "This is a message box\nA long, long string to test out the message box properly",
+      "Message box text", wxYES_NO|wxCANCEL|wxICON_INFORMATION);

 
   dialog.ShowModal();
 }
 
 
   dialog.ShowModal();
 }
 

+void MyFrame::NumericEntry(wxCommandEvent& WXUNUSED(event) )
+{
+    long res = wxGetNumberFromUser("", "Enter a number:", "Numeric input test",
+                                   50, 0, 100, this);
+
+    wxString msg;
+    int icon;
+    if ( res == -1 )
+    {
+        msg = "Invalid number entered or dialog cancelled.";
+        icon = wxICON_HAND;
+    }
+    else
+    {
+        msg.Printf(_T("You've entered %lu"), res);
+        icon = wxICON_INFORMATION;
+    }
+
+    wxMessageBox(msg, "Numeric test result", wxOK | icon, this);
+}
+

 void MyFrame::TextEntry(wxCommandEvent& WXUNUSED(event) )
 {
   wxTextEntryDialog dialog(this, "This is a small sample\nA long, long string to test out the text entrybox",
 void MyFrame::TextEntry(wxCommandEvent& WXUNUSED(event) )
 {
   wxTextEntryDialog dialog(this, "This is a small sample\nA long, long string to test out the text entrybox",

-       "Please enter a string", "Default value", wxOK|wxCANCEL);
+      "Please enter a string", "Default value", wxOK|wxCANCEL);

 
   if (dialog.ShowModal() == wxID_OK)
   {
 
   if (dialog.ShowModal() == wxID_OK)
   {

-       wxMessageDialog dialog2(this, dialog.GetValue(), "Got string");
-       dialog2.ShowModal();
+    wxMessageDialog dialog2(this, dialog.GetValue(), "Got string");
+    dialog2.ShowModal();

   }
 }
 
   }
 }
 


@@ -228,51 +290,85 @@ void MyFrame::SingleChoice(wxCommandEvent& WXUNUSED(event) )
 
 void MyFrame::FileOpen(wxCommandEvent& WXUNUSED(event) )
 {
 
 void MyFrame::FileOpen(wxCommandEvent& WXUNUSED(event) )
 {

-       wxFileDialog dialog(this, "Testing open file dialog", "", "", "*.txt", 0);
+    wxFileDialog dialog(this, "Testing open file dialog", "", "", "*.txt", 0);

 
 

-       if (dialog.ShowModal() == wxID_OK)
-       {
-               wxMessageDialog dialog2(this, dialog.GetPath(), "Selected path");
-               dialog2.ShowModal();
-       }
+    if (dialog.ShowModal() == wxID_OK)
+    {
+        wxString info;
+        info.Printf(_T("Full file name: %s\n")
+                    _T("Path: %s\n")
+                    _T("Name: %s"),
+                    dialog.GetPath().c_str(),
+                    dialog.GetDirectory().c_str(),
+                    dialog.GetFilename().c_str());
+        wxMessageDialog dialog2(this, info, "Selected file");
+        dialog2.ShowModal();
+    }

 }
 
 void MyFrame::FileSave(wxCommandEvent& WXUNUSED(event) )
 {
 }
 
 void MyFrame::FileSave(wxCommandEvent& WXUNUSED(event) )
 {

-       wxFileDialog dialog(this, "Testing save file dialog", "", "",
-               "Text files (*.txt)|*.txt|Document files (*.doc)|*.doc",
-               wxSAVE|wxOVERWRITE_PROMPT);
-
-       if (dialog.ShowModal() == wxID_OK)
-       {
-               char buf[400];
-               sprintf(buf, "%s, filter %d", (const char *)dialog.GetPath(), dialog.GetFilterIndex());
-               wxMessageDialog dialog2(this, wxString(buf), "Selected path");
-               dialog2.ShowModal();
-       }
+    wxFileDialog dialog(this, "Testing save file dialog", "", "",
+        "Text files (*.txt)|*.txt|Document files (*.doc)|*.doc",
+        wxSAVE|wxOVERWRITE_PROMPT);
+
+    if (dialog.ShowModal() == wxID_OK)
+    {
+        wxChar buf[400];
+        wxSprintf(buf, _T("%s, filter %d"), (const wxChar*)dialog.GetPath(), dialog.GetFilterIndex());
+        wxMessageDialog dialog2(this, wxString(buf), "Selected path");
+        dialog2.ShowModal();
+    }

 }
 
 void MyFrame::DirChoose(wxCommandEvent& WXUNUSED(event) )
 {
 }
 
 void MyFrame::DirChoose(wxCommandEvent& WXUNUSED(event) )
 {

-#ifndef __WXGTK__
-       wxDirDialog dialog(this, "Testing directory picker", "");
-
-       if (dialog.ShowModal() == wxID_OK)
-       {
-               wxMessageDialog dialog2(this, dialog.GetPath(), "Selected path");
-               dialog2.ShowModal();
-       }
+    wxDirDialog dialog(this, "Testing directory picker", "");
+
+    if (dialog.ShowModal() == wxID_OK)
+    {
+        wxMessageDialog dialog2(this, dialog.GetPath(), "Selected path");
+        dialog2.ShowModal();
+    }
+}
+
+void MyFrame::ShowTip(wxCommandEvent& event)
+{
+#if wxUSE_STARTUP_TIPS
+    static size_t s_index = (size_t)-1;
+
+    if ( s_index == (size_t)-1 )
+    {
+        srand(time(NULL));
+
+        // this is completely bogus, we don't know how many lines are there
+        // in the file, but who cares, it's a demo only...
+        s_index = rand() % 5;
+    }
+
+    wxTipProvider *tipProvider = wxCreateFileTipProvider("tips.txt", s_index);
+
+    bool showAtStartup = wxShowTip(this, tipProvider);
+
+    if ( showAtStartup )
+    {
+        wxMessageBox("Will show tips on startup", "Tips dialog",
+                     wxOK | wxICON_INFORMATION, this);
+    }
+
+    s_index = tipProvider->GetCurrentTip();
+    delete tipProvider;

 #endif
 }
 
 void MyFrame::OnExit(wxCommandEvent& WXUNUSED(event) )
 {
 #endif
 }
 
 void MyFrame::OnExit(wxCommandEvent& WXUNUSED(event) )
 {

-       Close(TRUE);
+    Close(TRUE);

 }
 
 void MyCanvas::OnPaint(wxPaintEvent& WXUNUSED(event) )
 {
 }
 
 void MyCanvas::OnPaint(wxPaintEvent& WXUNUSED(event) )
 {

-       wxPaintDC dc(this);
+    wxPaintDC dc(this);

     dc.SetFont(wxGetApp().m_canvasFont);
     dc.SetTextForeground(wxGetApp().m_canvasTextColour);
     dc.SetBackgroundMode(wxTRANSPARENT);
     dc.SetFont(wxGetApp().m_canvasFont);
     dc.SetTextForeground(wxGetApp().m_canvasTextColour);
     dc.SetBackgroundMode(wxTRANSPARENT);


@@ -280,22 +376,25 @@ void MyCanvas::OnPaint(wxPaintEvent& WXUNUSED(event) )
 }
 
 BEGIN_EVENT_TABLE(MyCanvas, wxScrolledWindow)
 }
 
 BEGIN_EVENT_TABLE(MyCanvas, wxScrolledWindow)

-       EVT_PAINT(MyCanvas::OnPaint)
+    EVT_PAINT(MyCanvas::OnPaint)

 END_EVENT_TABLE()
 
 BEGIN_EVENT_TABLE(MyFrame, wxFrame)
 END_EVENT_TABLE()
 
 BEGIN_EVENT_TABLE(MyFrame, wxFrame)

-       EVT_MENU(DIALOGS_CHOOSE_COLOUR,                         MyFrame::ChooseColour)
-       EVT_MENU(DIALOGS_CHOOSE_FONT,                           MyFrame::ChooseFont)
-       EVT_MENU(DIALOGS_MESSAGE_BOX,                           MyFrame::MessageBox)
-       EVT_MENU(DIALOGS_TEXT_ENTRY,                            MyFrame::TextEntry)
-       EVT_MENU(DIALOGS_SINGLE_CHOICE,                         MyFrame::SingleChoice)
-       EVT_MENU(DIALOGS_FILE_OPEN,                                     MyFrame::FileOpen)
-       EVT_MENU(DIALOGS_FILE_SAVE,                                     MyFrame::FileSave)
-       EVT_MENU(DIALOGS_DIR_CHOOSE,                            MyFrame::DirChoose)
-#if !defined(__WXMSW__) || wxUSE_GENERIC_DIALOGS_IN_MSW
-       EVT_MENU(DIALOGS_CHOOSE_COLOUR_GENERIC,         MyFrame::ChooseColourGeneric)
-       EVT_MENU(DIALOGS_CHOOSE_FONT_GENERIC,           MyFrame::ChooseFontGeneric)
+    EVT_MENU(DIALOGS_CHOOSE_COLOUR,                MyFrame::ChooseColour)
+    EVT_MENU(DIALOGS_CHOOSE_FONT,                MyFrame::ChooseFont)
+    EVT_MENU(DIALOGS_MESSAGE_BOX,                MyFrame::MessageBox)
+    EVT_MENU(DIALOGS_TEXT_ENTRY,                MyFrame::TextEntry)
+    EVT_MENU(DIALOGS_NUM_ENTRY,                MyFrame::NumericEntry)
+    EVT_MENU(DIALOGS_SINGLE_CHOICE,                MyFrame::SingleChoice)
+    EVT_MENU(DIALOGS_FILE_OPEN,                    MyFrame::FileOpen)
+    EVT_MENU(DIALOGS_FILE_SAVE,                    MyFrame::FileSave)
+    EVT_MENU(DIALOGS_DIR_CHOOSE,                MyFrame::DirChoose)
+    EVT_MENU(DIALOGS_TIP,                        MyFrame::ShowTip)
+    EVT_MENU(DIALOGS_EXT_DIALOG,                 MyFrame::ExtDialog)
+#if defined(__WXMSW__) && wxTEST_GENERIC_DIALOGS_IN_MSW
+    EVT_MENU(DIALOGS_CHOOSE_COLOUR_GENERIC,        MyFrame::ChooseColourGeneric)
+    EVT_MENU(DIALOGS_CHOOSE_FONT_GENERIC,        MyFrame::ChooseFontGeneric)

 #endif
 #endif

-       EVT_MENU(wxID_EXIT,                                                     MyFrame::OnExit)
+    EVT_MENU(wxID_EXIT,                            MyFrame::OnExit)

 END_EVENT_TABLE()
 
 END_EVENT_TABLE()