c50f1fb922
2. wxTextDialog looks fine under MSW again 3. startup tips added: code, sample, docs 4. read-only text controls don't participate in TAB traversal git-svn-id: https://svn.wxwidgets.org/svn/wx/wxWidgets/trunk@2919 c3d73ce0-8a6f-49c7-b76d-6d57e0e08775
336 lines
10 KiB
C++
336 lines
10 KiB
C++
/////////////////////////////////////////////////////////////////////////////
|
|
// Name: dialogs.cpp
|
|
// Purpose: Common dialogs demo
|
|
// Author: Julian Smart
|
|
// Modified by:
|
|
// Created: 04/01/98
|
|
// RCS-ID: $Id$
|
|
// Copyright: (c) Julian Smart and Markus Holzem
|
|
// Licence: wxWindows license
|
|
/////////////////////////////////////////////////////////////////////////////
|
|
|
|
#ifdef __GNUG__
|
|
#pragma implementation
|
|
#pragma interface
|
|
#endif
|
|
|
|
// For compilers that support precompilation, includes "wx/wx.h".
|
|
#include "wx/wxprec.h"
|
|
|
|
#ifdef __BORLANDC__
|
|
#pragma hdrstop
|
|
#endif
|
|
|
|
#ifndef WX_PRECOMP
|
|
#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/tipdlg.h>
|
|
|
|
#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 "dialogs.h"
|
|
|
|
IMPLEMENT_APP(MyApp)
|
|
|
|
MyCanvas *myCanvas = (MyCanvas *) NULL;
|
|
|
|
// `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;
|
|
|
|
// Create the main frame window
|
|
MyFrame *frame = new MyFrame((wxFrame *) NULL, (char *) "wxWindows dialogs example", wxPoint(50, 50), wxSize(400, 300));
|
|
|
|
// Make a menubar
|
|
wxMenu *file_menu = new wxMenu;
|
|
|
|
file_menu->Append(DIALOGS_CHOOSE_COLOUR, "&Choose colour");
|
|
|
|
#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");
|
|
|
|
#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_SINGLE_CHOICE, "&Single choice");
|
|
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->Append(DIALOGS_DIR_CHOOSE, "&Choose a directory");
|
|
file_menu->AppendSeparator();
|
|
file_menu->Append(wxID_EXIT, "E&xit");
|
|
wxMenuBar *menu_bar = new wxMenuBar;
|
|
menu_bar->Append(file_menu, "&File");
|
|
frame->SetMenuBar(menu_bar);
|
|
|
|
myCanvas = new MyCanvas(frame);
|
|
myCanvas->SetBackgroundColour(*wxWHITE);
|
|
|
|
frame->Centre(wxBOTH);
|
|
|
|
// Show the frame
|
|
frame->Show(TRUE);
|
|
|
|
SetTopWindow(frame);
|
|
|
|
return TRUE;
|
|
}
|
|
|
|
// My frame constructor
|
|
MyFrame::MyFrame(wxWindow *parent, const wxString& title, const wxPoint& pos, const wxSize& size):
|
|
wxFrame(parent, -1, title, pos, size)
|
|
{}
|
|
|
|
void MyFrame::ChooseColour(wxCommandEvent& WXUNUSED(event) )
|
|
{
|
|
wxColourData data;
|
|
data.SetChooseFull(TRUE);
|
|
for (int i = 0; i < 16; i++)
|
|
{
|
|
wxColour colour(i*16, i*16, i*16);
|
|
data.SetCustomColour(i, colour);
|
|
}
|
|
|
|
wxColourDialog *dialog = new wxColourDialog(this, &data);
|
|
if (dialog->ShowModal() == wxID_OK)
|
|
{
|
|
wxColourData retData = dialog->GetColourData();
|
|
wxColour col = retData.GetColour();
|
|
// wxBrush *brush = wxTheBrushList->FindOrCreateBrush(&col, wxSOLID);
|
|
myCanvas->SetBackgroundColour(col);
|
|
myCanvas->Clear();
|
|
myCanvas->Refresh();
|
|
}
|
|
dialog->Destroy();
|
|
}
|
|
|
|
void MyFrame::ChooseFont(wxCommandEvent& WXUNUSED(event) )
|
|
{
|
|
wxFontData data;
|
|
data.SetInitialFont(wxGetApp().m_canvasFont);
|
|
data.SetColour(wxGetApp().m_canvasTextColour);
|
|
|
|
wxFontDialog *dialog = new wxFontDialog(this, &data);
|
|
if (dialog->ShowModal() == wxID_OK)
|
|
{
|
|
wxFontData retData = dialog->GetFontData();
|
|
wxGetApp().m_canvasFont = retData.GetChosenFont();
|
|
wxGetApp().m_canvasTextColour = retData.GetColour();
|
|
myCanvas->Refresh();
|
|
}
|
|
dialog->Destroy();
|
|
}
|
|
|
|
#if defined(__WXMSW__) && wxTEST_GENERIC_DIALOGS_IN_MSW
|
|
void MyFrame::ChooseColourGeneric(wxCommandEvent& WXUNUSED(event))
|
|
{
|
|
wxColourData data;
|
|
data.SetChooseFull(TRUE);
|
|
for (int i = 0; i < 16; i++)
|
|
{
|
|
wxColour colour(i*16, i*16, i*16);
|
|
data.SetCustomColour(i, colour);
|
|
}
|
|
|
|
wxGenericColourDialog *dialog = new wxGenericColourDialog(this, &data);
|
|
if (dialog->ShowModal() == wxID_OK)
|
|
{
|
|
wxColourData retData = dialog->GetColourData();
|
|
wxColour col = retData.GetColour();
|
|
// wxBrush *brush = wxTheBrushList->FindOrCreateBrush(&col, wxSOLID);
|
|
myCanvas->SetBackgroundColour(col);
|
|
myCanvas->Clear();
|
|
myCanvas->Refresh();
|
|
}
|
|
dialog->Destroy();
|
|
}
|
|
|
|
void MyFrame::ChooseFontGeneric(wxCommandEvent& WXUNUSED(event) )
|
|
{
|
|
wxFontData data;
|
|
data.SetInitialFont(wxGetApp().m_canvasFont);
|
|
data.SetColour(wxGetApp().m_canvasTextColour);
|
|
|
|
wxGenericFontDialog *dialog = new wxGenericFontDialog(this, &data);
|
|
if (dialog->ShowModal() == wxID_OK)
|
|
{
|
|
wxFontData retData = dialog->GetFontData();
|
|
wxGetApp().m_canvasFont = retData.GetChosenFont();
|
|
wxGetApp().m_canvasTextColour = retData.GetColour();
|
|
myCanvas->Refresh();
|
|
}
|
|
dialog->Destroy();
|
|
}
|
|
#endif
|
|
|
|
void MyFrame::MessageBox(wxCommandEvent& WXUNUSED(event) )
|
|
{
|
|
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();
|
|
}
|
|
|
|
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);
|
|
|
|
if (dialog.ShowModal() == wxID_OK)
|
|
{
|
|
wxMessageDialog dialog2(this, dialog.GetValue(), "Got string");
|
|
dialog2.ShowModal();
|
|
}
|
|
}
|
|
|
|
void MyFrame::SingleChoice(wxCommandEvent& WXUNUSED(event) )
|
|
{
|
|
const wxString choices[] = { "One", "Two", "Three", "Four", "Five" } ;
|
|
int n = 5;
|
|
|
|
wxSingleChoiceDialog dialog(this, "This is a small sample\nA single-choice convenience dialog",
|
|
"Please select a value", n, (const wxString *)choices);
|
|
|
|
dialog.SetSelection(2);
|
|
|
|
if (dialog.ShowModal() == wxID_OK)
|
|
{
|
|
wxMessageDialog dialog2(this, dialog.GetStringSelection(), "Got string");
|
|
dialog2.ShowModal();
|
|
}
|
|
}
|
|
|
|
void MyFrame::FileOpen(wxCommandEvent& WXUNUSED(event) )
|
|
{
|
|
wxFileDialog dialog(this, "Testing open file dialog", "", "", "*.txt", 0);
|
|
|
|
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) )
|
|
{
|
|
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) )
|
|
{
|
|
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)
|
|
{
|
|
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;
|
|
}
|
|
|
|
void MyFrame::OnExit(wxCommandEvent& WXUNUSED(event) )
|
|
{
|
|
Close(TRUE);
|
|
}
|
|
|
|
void MyCanvas::OnPaint(wxPaintEvent& WXUNUSED(event) )
|
|
{
|
|
wxPaintDC dc(this);
|
|
dc.SetFont(wxGetApp().m_canvasFont);
|
|
dc.SetTextForeground(wxGetApp().m_canvasTextColour);
|
|
dc.SetBackgroundMode(wxTRANSPARENT);
|
|
dc.DrawText("wxWindows common dialogs test application", 10, 10);
|
|
}
|
|
|
|
BEGIN_EVENT_TABLE(MyCanvas, wxScrolledWindow)
|
|
EVT_PAINT(MyCanvas::OnPaint)
|
|
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)
|
|
EVT_MENU(DIALOGS_TIP, MyFrame::ShowTip)
|
|
#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
|
|
EVT_MENU(wxID_EXIT, MyFrame::OnExit)
|
|
END_EVENT_TABLE()
|
|
|