// Licence: wxWindows licence
/////////////////////////////////////////////////////////////////////////////
-// ============================================================================
-// declarations
-// ============================================================================
-
-// ----------------------------------------------------------------------------
-// headers
-// ----------------------------------------------------------------------------
-#ifdef __GNUG__
- #pragma implementation "caret.cpp"
- #pragma interface "caret.cpp"
-#endif
-
// For compilers that support precompilation, includes "wx/wx.h".
-#include <wx/wxprec.h>
+#include "wx/wxprec.h"
#ifdef __BORLANDC__
#pragma hdrstop
// for all others, include the necessary headers (this file is usually all you
// need because it includes almost all <standard< wxWindows headers
#ifndef WX_PRECOMP
- #include <wx/wx.h>
-
- #include <wx/log.h>
+ #include "wx/wx.h"
+ #include "wx/log.h"
#endif
#include "wx/caret.h"
+#include "wx/numdlg.h"
// ----------------------------------------------------------------------------
// ressources
// ----------------------------------------------------------------------------
// the application icon
-#if defined(__WXGTK__) || defined(__WXMOTIF__)
+#if defined(__WXGTK__) || defined(__WXX11__) || defined(__WXMOTIF__) || defined(__WXMAC__) || defined(__WXMGL__)
#include "mondrian.xpm"
#endif
virtual bool OnInit();
};
-// Define a new frame type: this is going to be our main frame
-class MyFrame : public wxFrame
-{
-public:
- // ctor(s)
- MyFrame(const wxString& title, const wxPoint& pos, const wxSize& size);
-
- // event handlers (these functions should _not_ be virtual)
- void OnQuit(wxCommandEvent& event);
- void OnAbout(wxCommandEvent& event);
-
-private:
- // any class wishing to process wxWindows events must use this macro
- DECLARE_EVENT_TABLE()
-};
-
// MyCanvas is a canvas on which you can type
class MyCanvas: public wxScrolledWindow
{
wxChar& CharAt(int x, int y) { return *(m_text + x + m_xChars * y); }
+ // operations
+ void SetFontSize(int fontSize);
+ void CreateCaret();
+ void MoveCaret(int x, int y);
+
// caret movement
void Home() { m_xCaret = 0; }
void End() { m_xCaret = m_xChars - 1; }
void OnChar( wxKeyEvent &event );
private:
- wxCaret m_caret;
+ // move the caret to m_xCaret, m_yCaret
+ void DoMoveCaret();
+
+ // update the geometry
+ void ChangeSize();
+
wxFont m_font;
// the margin around the text (looks nicer)
DECLARE_EVENT_TABLE()
};
+
+// Define a new frame type: this is going to be our main frame
+class MyFrame : public wxFrame
+{
+public:
+ // ctor(s)
+ MyFrame(const wxString& title, const wxPoint& pos, const wxSize& size);
+
+ // event handlers (these functions should _not_ be virtual)
+ void OnQuit(wxCommandEvent& event);
+ void OnAbout(wxCommandEvent& event);
+ void OnSetBlinkTime(wxCommandEvent& event);
+ void OnSetFontSize(wxCommandEvent& event);
+ void OnCaretMove(wxCommandEvent& event);
+
+private:
+ MyCanvas *m_canvas;
+
+ // any class wishing to process wxWindows events must use this macro
+ DECLARE_EVENT_TABLE()
+};
+
// ----------------------------------------------------------------------------
// constants
// ----------------------------------------------------------------------------
enum
{
// menu items
- Minimal_Quit = 1,
- Minimal_About,
- Minimal_Test1,
- Minimal_Test2,
+ Caret_Quit = 1,
+ Caret_About,
+ Caret_SetBlinkTime,
+ Caret_SetFontSize,
+ Caret_Move,
// controls start here (the numbers are, of course, arbitrary)
- Minimal_Text = 1000,
+ Caret_Text = 1000
};
// ----------------------------------------------------------------------------
// handlers) which process them. It can be also done at run-time, but for the
// simple menu events like this the static method is much simpler.
BEGIN_EVENT_TABLE(MyFrame, wxFrame)
- EVT_MENU(Minimal_Quit, MyFrame::OnQuit)
- EVT_MENU(Minimal_About, MyFrame::OnAbout)
+ EVT_MENU(Caret_Quit, MyFrame::OnQuit)
+ EVT_MENU(Caret_About, MyFrame::OnAbout)
+ EVT_MENU(Caret_SetBlinkTime, MyFrame::OnSetBlinkTime)
+ EVT_MENU(Caret_SetFontSize, MyFrame::OnSetFontSize)
+ EVT_MENU(Caret_Move, MyFrame::OnCaretMove)
END_EVENT_TABLE()
// Create a new application object: this macro will allow wxWindows to create
// `Main program' equivalent: the program execution "starts" here
bool MyApp::OnInit()
{
- // Create the main application window
- MyFrame *frame = new MyFrame("Minimal wxWindows App",
+ // create and show the main application window
+ MyFrame *frame = new MyFrame(_T("Caret wxWindows sample"),
wxPoint(50, 50), wxSize(450, 340));
- // Show it and tell the application that it's our main window
- // @@@ what does it do exactly, in fact? is it necessary here?
frame->Show(TRUE);
- SetTopWindow(frame);
// success: wxApp::OnRun() will be called which will enter the main message
// loop and the application will run. If we returned FALSE here, the
// create a menu bar
wxMenu *menuFile = new wxMenu;
- menuFile->Append(Minimal_About, "&About...\tCtrl-A", "Show about dialog");
+ menuFile->Append(Caret_SetBlinkTime, _T("&Blink time...\tCtrl-B"));
+ menuFile->Append(Caret_SetFontSize, _T("&Font size...\tCtrl-S"));
+ menuFile->Append(Caret_Move, _T("&Move caret\tCtrl-C"));
menuFile->AppendSeparator();
- menuFile->Append(Minimal_Quit, "E&xit\tAlt-X", "Quit this program");
+ menuFile->Append(Caret_About, _T("&About...\tCtrl-A"), _T("Show about dialog"));
+ menuFile->AppendSeparator();
+ menuFile->Append(Caret_Quit, _T("E&xit\tAlt-X"), _T("Quit this program"));
// now append the freshly created menu to the menu bar...
wxMenuBar *menuBar = new wxMenuBar;
- menuBar->Append(menuFile, "&File");
+ menuBar->Append(menuFile, _T("&File"));
// ... and attach this menu bar to the frame
SetMenuBar(menuBar);
- (void) new MyCanvas( this );
+ m_canvas = new MyCanvas(this);
// create a status bar just for fun (by default with 1 pane only)
CreateStatusBar(2);
- SetStatusText("Welcome to wxWindows!");
+ SetStatusText(_T("Welcome to wxWindows!"));
}
void MyFrame::OnAbout(wxCommandEvent& WXUNUSED(event))
{
- wxString msg;
- msg.Printf( _T("This is the about dialog of minimal sample.\n")
- _T("Welcome to %s")
-#ifdef wxBETA_NUMBER
- _T(" (beta %d)!")
-#endif // wxBETA_NUMBER
- , wxVERSION_STRING
-#ifdef wxBETA_NUMBER
- , wxBETA_NUMBER
-#endif // wxBETA_NUMBER
- );
-
- wxMessageBox(msg, "About Minimal", wxOK | wxICON_INFORMATION, this);
+ wxMessageBox(_T("The caret wxWindows sample.\n© 1999 Vadim Zeitlin"),
+ _T("About Caret"), wxOK | wxICON_INFORMATION, this);
+}
+
+void MyFrame::OnCaretMove(wxCommandEvent& WXUNUSED(event))
+{
+ m_canvas->MoveCaret(10, 10);
+}
+
+void MyFrame::OnSetBlinkTime(wxCommandEvent& WXUNUSED(event))
+{
+ long blinkTime = wxGetNumberFromUser
+ (
+ _T("The caret blink time is the time between two blinks"),
+ _T("Time in milliseconds:"),
+ _T("wxCaret sample"),
+ wxCaret::GetBlinkTime(), 0, 10000,
+ this
+ );
+ if ( blinkTime != -1 )
+ {
+ wxCaret::SetBlinkTime((int)blinkTime);
+ m_canvas->CreateCaret();
+ wxLogStatus(this, _T("Blink time set to %ld milliseconds."), blinkTime);
+ }
}
+void MyFrame::OnSetFontSize(wxCommandEvent& WXUNUSED(event))
+{
+ long fontSize = wxGetNumberFromUser
+ (
+ _T("The font size also determines the caret size so\nthis demonstrates resizing the caret."),
+ _T("Font size (in points):"),
+ _T("wxCaret sample"),
+ 12, 1, 100,
+ this
+ );
+
+ if ( fontSize != -1 )
+ {
+ m_canvas->SetFontSize((int)fontSize);
+ }
+}
// ----------------------------------------------------------------------------
// MyCanvas
{
m_text = (wxChar *)NULL;
- SetBackgroundColour(* wxWHITE);
-
- m_font = *wxNORMAL_FONT;
-
- wxClientDC dc(this);
- dc.SetFont( m_font );
- m_heightChar = dc.GetCharHeight();
- m_widthChar = dc.GetCharWidth();
+ SetBackgroundColour(*wxWHITE);
- m_caret.Create( this, m_widthChar, m_heightChar );
+ SetFontSize(12);
m_xCaret = m_yCaret =
m_xChars = m_yChars = 0;
m_xMargin = m_yMargin = 5;
- m_caret.Move(m_xMargin, m_yMargin);
- m_caret.Show();
+
+ CreateCaret();
}
MyCanvas::~MyCanvas()
free(m_text);
}
-void MyCanvas::OnSize( wxSizeEvent &event )
+void MyCanvas::CreateCaret()
{
- m_xChars = (event.GetSize().x - 2*m_xMargin) / m_widthChar;
- m_yChars = (event.GetSize().y - 2*m_yMargin) / m_heightChar;
+ wxCaret *caret = new wxCaret(this, m_widthChar, m_heightChar);
+ SetCaret(caret);
+
+ caret->Move(m_xMargin, m_yMargin);
+ caret->Show();
+}
+
+void MyCanvas::SetFontSize(int fontSize)
+{
+ m_font = wxFont(fontSize, wxFONTFAMILY_TELETYPE,
+ wxFONTSTYLE_NORMAL, wxFONTWEIGHT_NORMAL);
+
+ wxClientDC dc(this);
+ dc.SetFont(m_font);
+ m_heightChar = dc.GetCharHeight();
+ m_widthChar = dc.GetCharWidth();
+
+ wxCaret *caret = GetCaret();
+ if ( caret )
+ {
+ caret->SetSize(m_widthChar, m_heightChar);
+
+ ChangeSize();
+ }
+}
+
+void MyCanvas::MoveCaret(int x, int y)
+{
+ m_xCaret = x;
+ m_yCaret = y;
+
+ DoMoveCaret();
+}
+
+void MyCanvas::DoMoveCaret()
+{
+ wxLogStatus(_T("Caret is at (%d, %d)"), m_xCaret, m_yCaret);
+
+ GetCaret()->Move(m_xMargin + m_xCaret * m_widthChar,
+ m_yMargin + m_yCaret * m_heightChar);
+}
+
+void MyCanvas::OnSize(wxSizeEvent& event)
+{
+ ChangeSize();
+
+ event.Skip();
+}
+
+void MyCanvas::ChangeSize()
+{
+ wxSize size = GetClientSize();
+ m_xChars = (size.x - 2*m_xMargin) / m_widthChar;
+ m_yChars = (size.y - 2*m_yMargin) / m_heightChar;
if ( !m_xChars )
m_xChars = 1;
if ( !m_yChars )
free(m_text);
m_text = (wxChar *)calloc(m_xChars * m_yChars, sizeof(wxChar));
- wxString msg;
- msg.Printf(_T("Panel size is (%d, %d)"), m_xChars, m_yChars);
+ wxFrame *frame = wxDynamicCast(GetParent(), wxFrame);
- ((wxFrame *)GetParent())->SetStatusText(msg, 1);
+ if ( frame && frame->GetStatusBar() )
+ {
+ wxString msg;
+ msg.Printf(_T("Panel size is (%d, %d)"), m_xChars, m_yChars);
- event.Skip();
+ frame->SetStatusText(msg, 1);
+ }
}
+// NB: this method is horrible inefficient especially because the caret
+// needs to be redrawn often and in this case we only have to redraw
+// the caret location and not the entire window - in a real program we
+// would use GetUpdateRegion() and iterate over rectangles it contains
void MyCanvas::OnPaint( wxPaintEvent &WXUNUSED(event) )
{
+ wxCaretSuspend cs(this);
wxPaintDC dc( this );
PrepareDC( dc );
+ dc.Clear();
dc.SetFont( m_font );
void MyCanvas::OnChar( wxKeyEvent &event )
{
- switch ( event.KeyCode() )
+ switch ( event.GetKeyCode() )
{
case WXK_LEFT:
PrevChar();
break;
default:
- if ( wxIsprint(event.KeyCode()) )
+ if ( !event.AltDown() && wxIsprint(event.GetKeyCode()) )
{
- CharAt(m_xCaret, m_yCaret) = (wxChar)event.KeyCode();
+ wxChar ch = (wxChar)event.GetKeyCode();
+ CharAt(m_xCaret, m_yCaret) = ch;
+
+ wxCaretSuspend cs(this);
+ wxClientDC dc(this);
+ dc.SetFont(m_font);
+ dc.SetBackgroundMode(wxSOLID); // overwrite old value
+ dc.DrawText(ch, m_xMargin + m_xCaret * m_widthChar,
+ m_yMargin + m_yCaret * m_heightChar );
+
NextChar();
}
else
{
- // don't refresh
- return;
+ event.Skip();
}
}
- wxLogStatus(_T("Caret is at (%d, %d)"), m_xCaret, m_yCaret);
-
- m_caret.Move(m_xMargin + m_xCaret * m_widthChar,
- m_yMargin + m_yCaret * m_heightChar);
-
- Refresh();
+ DoMoveCaret();
}