/////////////////////////////////////////////////////////////////////////////
// For compilers that support precompilation, includes "wx/wx.h".
-#include <wx/wxprec.h>
+#include "wx/wxprec.h"
#ifdef __BORLANDC__
#pragma hdrstop
// ressources
// ----------------------------------------------------------------------------
// the application icon
-#if defined(__WXGTK__) || defined(__WXMOTIF__)
+#if defined(__WXGTK__) || defined(__WXMOTIF__) || defined(__WXMAC__)
#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 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:
+ // move the caret to m_xCaret, m_yCaret
+ void DoMoveCaret();
+
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 OnCaretMove(wxCommandEvent& event);
+
+private:
+ MyCanvas *m_canvas;
+
+ // any class wishing to process wxWindows events must use this macro
+ DECLARE_EVENT_TABLE()
+};
+
// ----------------------------------------------------------------------------
// constants
// ----------------------------------------------------------------------------
// menu items
Caret_Quit = 1,
Caret_About,
- Caret_Test1,
- Caret_Test2,
+ Caret_SetBlinkTime,
+ Caret_Move,
// controls start here (the numbers are, of course, arbitrary)
Caret_Text = 1000
BEGIN_EVENT_TABLE(MyFrame, wxFrame)
EVT_MENU(Caret_Quit, MyFrame::OnQuit)
EVT_MENU(Caret_About, MyFrame::OnAbout)
+ EVT_MENU(Caret_SetBlinkTime, MyFrame::OnSetBlinkTime)
+ 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
+ // create and show the main application window
MyFrame *frame = new MyFrame("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(Caret_SetBlinkTime, "&Blink time...\tCtrl-B");
+ menuFile->Append(Caret_Move, "&Move caret\tCtrl-C");
+ menuFile->AppendSeparator();
menuFile->Append(Caret_About, "&About...\tCtrl-A", "Show about dialog");
menuFile->AppendSeparator();
menuFile->Append(Caret_Quit, "E&xit\tAlt-X", "Quit this program");
// ... 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);
void MyFrame::OnAbout(wxCommandEvent& WXUNUSED(event))
{
- wxMessageBox(_T("This is the about dialog of caret sample."), "About Caret", 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);
+ }
+}
// ----------------------------------------------------------------------------
// MyCanvas
{
m_text = (wxChar *)NULL;
- SetBackgroundColour(* wxWHITE);
+ SetBackgroundColour(*wxWHITE);
+
+ m_font = wxFont(12, wxFONTFAMILY_TELETYPE,
+ wxFONTSTYLE_NORMAL, wxFONTWEIGHT_NORMAL);
+
+ m_xCaret = m_yCaret =
+ m_xChars = m_yChars = 0;
+
+ m_xMargin = m_yMargin = 5;
+
+ CreateCaret();
+}
- m_font = *wxNORMAL_FONT;
+MyCanvas::~MyCanvas()
+{
+ free(m_text);
+}
+void MyCanvas::CreateCaret()
+{
wxClientDC dc(this);
- dc.SetFont( m_font );
+ dc.SetFont(m_font);
m_heightChar = dc.GetCharHeight();
m_widthChar = dc.GetCharWidth();
wxCaret *caret = new wxCaret(this, m_widthChar, m_heightChar);
SetCaret(caret);
- m_xCaret = m_yCaret =
- m_xChars = m_yChars = 0;
-
- m_xMargin = m_yMargin = 5;
caret->Move(m_xMargin, m_yMargin);
caret->Show();
}
-MyCanvas::~MyCanvas()
+void MyCanvas::MoveCaret(int x, int y)
{
- free(m_text);
+ 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 )
event.Skip();
}
+// 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 );
default:
if ( !event.AltDown() && wxIsprint(event.KeyCode()) )
{
- CharAt(m_xCaret, m_yCaret) = (wxChar)event.KeyCode();
+ wxChar ch = (wxChar)event.KeyCode();
+ 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
{
event.Skip();
-
- // don't refresh
- return;
}
}
- 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);
-
- Refresh();
+ DoMoveCaret();
}