#include "wx/tooltip.h"
#endif
+ #include "wx/progdlg.h"
+
// We test for wxUSE_DRAG_AND_DROP also, because data objects may not be
// implemented for compilers that can't cope with the OLE parts in
// wxUSE_DRAG_AND_DROP.
public:
MyTextCtrl(wxWindow *parent, wxWindowID id, const wxString &value,
const wxPoint &pos, const wxSize &size, int style = 0)
- : wxTextCtrl(parent, id, value, pos, size, style) { m_hasCapture = FALSE; }
+ : wxTextCtrl(parent, id, value, pos, size, style)
+ {
+ m_hasCapture = FALSE;
+ }
void OnKeyDown(wxKeyEvent& event);
void OnKeyUp(wxKeyEvent& event);
void OnMouseEvent(wxMouseEvent& event);
- bool m_hasCapture;
+ void OnSetFocus(wxFocusEvent& event);
+ void OnKillFocus(wxFocusEvent& event);
+
+ static bool ms_logKey;
+ static bool ms_logChar;
+ static bool ms_logMouse;
+ static bool ms_logText;
+ static bool ms_logFocus;
private:
static inline wxChar GetChar(bool on, wxChar c) { return on ? c : _T('-'); }
- void LogEvent(const wxChar *name, wxKeyEvent& event) const;
+ void LogKeyEvent(const wxChar *name, wxKeyEvent& event) const;
+
+ bool m_hasCapture;
DECLARE_EVENT_TABLE()
};
{
public:
MyPanel(wxFrame *frame, int x, int y, int w, int h);
+ virtual ~MyPanel() { delete wxLog::SetActiveTarget(m_logOld); }
#if wxUSE_CLIPBOARD
void DoPasteFromClipboard();
void DoCopyToClipboard();
#endif // wxUSE_CLIPBOARD
+ void DoRemoveText();
void DoMoveToEndOfText();
void DoMoveToEndOfEntry();
wxTextCtrl *m_log;
+ wxLog *m_logOld;
+
private:
+ // get the currently focused text control or return the default one is no
+ // text ctrl has focus
+ wxTextCtrl *GetFocusedText(wxTextCtrl *textDef);
+
DECLARE_EVENT_TABLE()
};
{ DoAddText(true); }
void OnAddText( wxCommandEvent& event )
{ DoAddText(false); }
+ void OnRemoveText( wxCommandEvent& event )
+ { m_panel->DoRemoveText(); }
void OnMoveToEndOfText( wxCommandEvent &event )
{ m_panel->DoMoveToEndOfText(); }
void OnSetEditable(wxCommandEvent& event);
void OnSetEnabled(wxCommandEvent& event);
+ void OnLogKey(wxCommandEvent& event)
+ {
+ MyTextCtrl::ms_logKey = event.IsChecked();
+ }
+
+ void OnLogChar(wxCommandEvent& event)
+ {
+ MyTextCtrl::ms_logChar = event.IsChecked();
+ }
+
+ void OnLogMouse(wxCommandEvent& event)
+ {
+ MyTextCtrl::ms_logMouse = event.IsChecked();
+ }
+
+ void OnLogText(wxCommandEvent& event)
+ {
+ MyTextCtrl::ms_logText = event.IsChecked();
+ }
+
+ void OnLogFocus(wxCommandEvent& event)
+ {
+ MyTextCtrl::ms_logFocus = event.IsChecked();
+ }
+
+ void OnSetText(wxCommandEvent& event)
+ {
+ m_panel->m_text->SetValue(_T("Hello, world (what else did you expect)?"));
+ }
+
void OnIdle( wxIdleEvent& event );
private:
if ( freeze )
text->Freeze();
+ text->Clear();
+
+ wxProgressDialog dlg(_T("Wait..."), _T("Updating"), 100, this);
for ( int i = 0; i < 100; i++ )
- text->AppendText(wxString::Format("Line %i\n", i));
+ {
+ dlg.Update(i);
+ text->AppendText(wxString::Format(wxT("Line %i\n"), i));
+ }
text->SetInsertionPoint(0);
TEXT_LINE_UP,
TEXT_PAGE_DOWN,
TEXT_PAGE_UP,
+ TEXT_REMOVE,
+ TEXT_SET,
+
+ // log menu
+ TEXT_LOG_KEY,
+ TEXT_LOG_CHAR,
+ TEXT_LOG_MOUSE,
+ TEXT_LOG_TEXT,
+ TEXT_LOG_FOCUS,
+
+ TEXT_END
};
bool MyApp::OnInit()
frame->SetSizeHints( 500, 400 );
wxMenu *file_menu = new wxMenu;
- file_menu->Append(TEXT_CLEAR, "&Clear the log\tCtrl-C",
- "Clear the log window contents");
file_menu->Append(TEXT_SAVE, "&Save file\tCtrl-S",
"Save the text control contents to file");
file_menu->Append(TEXT_LOAD, "&Load file\tCtrl-O",
wxMenu *menuText = new wxMenu;
menuText->Append(TEXT_ADD_SOME, "&Append some text\tCtrl-A");
menuText->Append(TEXT_ADD_FREEZE, "&Append text with freeze/thaw\tShift-Ctrl-A");
+ menuText->Append(TEXT_REMOVE, "&Remove first 10 characters\tCtrl-X");
+ menuText->Append(TEXT_SET, "&Set the first text zone value\tCtrl-E");
+ menuText->AppendSeparator();
menuText->Append(TEXT_MOVE_ENDTEXT, "Move cursor to the end of &text");
menuText->Append(TEXT_MOVE_ENDENTRY, "Move cursor to the end of &entry");
menuText->Append(TEXT_SET_EDITABLE, "Toggle &editable state", "", TRUE);
menuText->Append(TEXT_LINE_UP, "Scroll text one line up");
menuText->Append(TEXT_PAGE_DOWN, "Scroll text one page down");
menuText->Append(TEXT_PAGE_DOWN, "Scroll text one page up");
- menu_bar->Append(menuText, "&Text");
+ menu_bar->Append(menuText, "Te&xt");
+
+ wxMenu *menuLog = new wxMenu;
+ menuLog->Append(TEXT_LOG_KEY, "Log &key events", "", TRUE);
+ menuLog->Append(TEXT_LOG_CHAR, "Log &char events", "", TRUE);
+ menuLog->Append(TEXT_LOG_MOUSE, "Log &mouse events", "", TRUE);
+ menuLog->Append(TEXT_LOG_TEXT, "Log &text events", "", TRUE);
+ menuLog->Append(TEXT_LOG_FOCUS, "Log &focus events", "", TRUE);
+ menuLog->AppendSeparator();
+ menuLog->Append(TEXT_CLEAR, "&Clear the log\tCtrl-C",
+ "Clear the log window contents");
+
+ // select only the interesting events by default
+#if 0
+ menuLog->Check(TEXT_LOG_KEY, TRUE);
+ menuLog->Check(TEXT_LOG_CHAR, TRUE);
+ menuLog->Check(TEXT_LOG_TEXT, TRUE);
+
+ MyTextCtrl::ms_logKey =
+ MyTextCtrl::ms_logChar =
+ MyTextCtrl::ms_logText = TRUE;
+#else
+ menuLog->Check(TEXT_LOG_FOCUS, TRUE);
+ MyTextCtrl::ms_logFocus = TRUE;
+#endif
+ menu_bar->Append(menuLog, "&Log");
frame->SetMenuBar(menu_bar);
EVT_TEXT_MAXLEN(-1, MyTextCtrl::OnTextMaxLen)
EVT_MOUSE_EVENTS(MyTextCtrl::OnMouseEvent)
+
+ EVT_SET_FOCUS(MyTextCtrl::OnSetFocus)
+ EVT_KILL_FOCUS(MyTextCtrl::OnKillFocus)
END_EVENT_TABLE()
-void MyTextCtrl::LogEvent(const wxChar *name, wxKeyEvent& event) const
+bool MyTextCtrl::ms_logKey = FALSE;
+bool MyTextCtrl::ms_logChar = FALSE;
+bool MyTextCtrl::ms_logMouse = FALSE;
+bool MyTextCtrl::ms_logText = FALSE;
+bool MyTextCtrl::ms_logFocus = FALSE;
+
+void MyTextCtrl::LogKeyEvent(const wxChar *name, wxKeyEvent& event) const
{
wxString key;
long keycode = event.KeyCode();
default:
{
if ( wxIsprint((int)keycode) )
- key.Printf( _T("'%c'") , (char)keycode);
+ key.Printf(_T("'%c'"), (char)keycode);
+ else if ( keycode > 0 && keycode < 27 )
+ key.Printf(_("Ctrl-%c"), _T('A') + keycode - 1);
else
- key.Printf( _T("unknown (%ld)"), keycode);
+ key.Printf(_T("unknown (%ld)"), keycode);
}
}
}
void MyTextCtrl::OnMouseEvent(wxMouseEvent& ev)
{
+ ev.Skip();
+
+ if ( !ms_logMouse )
+ return;
+
if ( !ev.Moving() )
{
wxString msg;
wxLogMessage(msg);
}
//else: we're not interested in mouse move events
+}
- ev.Skip();
+void MyTextCtrl::OnSetFocus(wxFocusEvent& event)
+{
+ if ( ms_logFocus )
+ wxLogMessage("%p got focus.", this);
+
+ event.Skip();
+}
+
+void MyTextCtrl::OnKillFocus(wxFocusEvent& event)
+{
+ if ( ms_logFocus )
+ wxLogMessage("%p lost focus", this);
+
+ event.Skip();
}
void MyTextCtrl::OnText(wxCommandEvent& event)
{
+ if ( !ms_logText )
+ return;
+
MyTextCtrl *win = (MyTextCtrl *)event.GetEventObject();
const wxChar *data = (const wxChar *)(win->GetClientData());
if ( data )
void MyTextCtrl::OnChar(wxKeyEvent& event)
{
- LogEvent( _T("Char"), event);
+ if ( ms_logChar )
+ LogKeyEvent( _T("Char"), event);
-/* How are we supposed to test wxTE_PROCESS_TAB with this code?
-
- if ( event.KeyCode() == WXK_TAB )
- {
- WriteText("\t");
- }
- else
- {
- event.Skip();
- }
-*/
event.Skip();
}
void MyTextCtrl::OnKeyUp(wxKeyEvent& event)
{
- LogEvent( _T("Key up"), event);
+ if ( ms_logKey )
+ LogKeyEvent( _T("Key up"), event);
event.Skip();
}
long line, column, pos = GetInsertionPoint();
PositionToXY(pos, &column, &line);
- wxLogMessage( _T("Current position: %ld\n"
- "Current line, column: (%ld, %ld)\n"
- "Number of lines: %ld\n"
- "Current line length: %ld\n"
- "Total text length: %u (%ld)"),
+ wxLogMessage( _T("Current position: %ld\nCurrent line, column: (%ld, %ld)\nNumber of lines: %ld\nCurrent line length: %ld\nTotal text length: %u (%ld)"),
pos,
line, column,
GetNumberOfLines(),
else
{
wxLogDebug( wxT("Stopped capturing mouse and events.") );
- m_hasCapture = TRUE;
+ m_hasCapture = FALSE;
ReleaseMouse();
}
break;
case WXK_F7:
ShowPosition(10);
break;
+
+ case WXK_F10:
+ {
+ long from, to;
+ GetSelection(&from, &to);
+
+ wxString sel = GetStringSelection();
+
+ wxLogMessage(_T("Selection: from %ld to %ld."), from, to);
+ wxLogMessage(_T("Selection = '%s' (len = %u)"),
+ sel.c_str(), sel.length());
+ }
}
- LogEvent( wxT("Key down"), event);
+ if ( ms_logKey )
+ LogKeyEvent( wxT("Key down"), event);
event.Skip();
}
MyPanel::MyPanel( wxFrame *frame, int x, int y, int w, int h )
: wxPanel( frame, -1, wxPoint(x, y), wxSize(w, h) )
{
- m_log = new wxTextCtrl( this, -1, "This is the log window.\n", wxPoint(5,260), wxSize(630,100), wxTE_MULTILINE );
-
- wxLog *old_log = wxLog::SetActiveTarget( new wxLogTextCtrl( m_log ) );
+ m_log = new wxTextCtrl( this, -1, "This is the log window.\n",
+ wxPoint(5,260), wxSize(630,100),
+ wxTE_MULTILINE | wxTE_READONLY /* | wxTE_RICH */);
- delete old_log;
+ m_logOld = wxLog::SetActiveTarget( new wxLogTextCtrl( m_log ) );
// single line text controls
m_horizontal->SetValue("®lu»ouèký kùò zbìsile èe¹tina «»");
break;
- default:
+ case '1':
m_horizontal->SetFont(wxFont(18, wxSWISS, wxNORMAL, wxNORMAL,
FALSE, "",
- wxFONTENCODING_KOI8));
+ wxFONTENCODING_CP1251));
+ m_horizontal->SetValue("Ïðèâåò!");
+ break;
+
+ case '8':
+ m_horizontal->SetFont(wxFont(18, wxSWISS, wxNORMAL, wxNORMAL,
+ FALSE, "",
+ wxFONTENCODING_CP1251));
+#if wxUSE_UNICODE
+ m_horizontal->SetValue(L"\x0412\x0430\x0434\x0438\x043c \x0426");
+#else
m_horizontal->SetValue("ËÁÖÅÔÓÑ ÕÄÁÞÎÙÍ");
+#endif
}
}
else
wxPoint(450, 10), wxSize(230, 230),
wxTE_RICH |
wxTE_MULTILINE |
- wxTE_AUTO_URL |
+ // wxTE_AUTO_URL |
wxHSCROLL);
-#if 0
- m_textrich->SetFont(wxFont(12, wxFONTFAMILY_TELETYPE,
- wxFONTSTYLE_NORMAL, wxFONTWEIGHT_NORMAL));
m_textrich->SetStyle(0, 10, *wxRED);
m_textrich->SetStyle(10, 20, *wxBLUE);
m_textrich->SetStyle(30, 40,
m_textrich->AppendText(_T("And the next 10 characters should be green and italic\n"));
m_textrich->SetDefaultStyle(wxTextAttr(*wxCYAN, *wxBLUE));
m_textrich->AppendText(_T("This text should be cyan on blue\n"));
- m_textrich->SetDefaultStyle(*wxBLUE);
+ m_textrich->SetDefaultStyle(wxTextAttr(*wxBLUE, *wxWHITE));
m_textrich->AppendText(_T("And this should be in blue and the text you ")
_T("type should be in blue as well"));
-#else
- m_textrich->SetDefaultStyle(wxTextAttr(*wxRED));
- m_textrich->AppendText(_T("Red text\n"));
- m_textrich->SetDefaultStyle(wxTextAttr(wxNullColour, *wxLIGHT_GREY));
- m_textrich->AppendText(_T("Red on grey text\n"));
- m_textrich->SetDefaultStyle(wxTextAttr(*wxBLUE));
- m_textrich->AppendText(_T("Blue on grey text\n"));
-#endif
}
void MyPanel::OnSize( wxSizeEvent &event )
event.Skip();
}
+wxTextCtrl *MyPanel::GetFocusedText(wxTextCtrl *textDef)
+{
+ wxWindow *win = FindFocus();
+
+ wxTextCtrl *text = win ? wxDynamicCast(win, wxTextCtrl) : NULL;
+ return text ? text : textDef;
+}
+
#if wxUSE_CLIPBOARD
void MyPanel::DoPasteFromClipboard()
{
m_text->SetFocus();
}
+void MyPanel::DoRemoveText()
+{
+ GetFocusedText(m_multitext)->Remove(0, 10);
+}
+
//----------------------------------------------------------------------
// MyFrame
//----------------------------------------------------------------------
EVT_MENU(TEXT_ABOUT, MyFrame::OnAbout)
EVT_MENU(TEXT_SAVE, MyFrame::OnFileSave)
EVT_MENU(TEXT_LOAD, MyFrame::OnFileLoad)
- EVT_MENU(TEXT_CLEAR, MyFrame::OnLogClear)
+
+ EVT_MENU(TEXT_LOG_KEY, MyFrame::OnLogKey)
+ EVT_MENU(TEXT_LOG_CHAR, MyFrame::OnLogChar)
+ EVT_MENU(TEXT_LOG_MOUSE,MyFrame::OnLogMouse)
+ EVT_MENU(TEXT_LOG_TEXT, MyFrame::OnLogText)
+ EVT_MENU(TEXT_LOG_FOCUS,MyFrame::OnLogFocus)
+ EVT_MENU(TEXT_CLEAR, MyFrame::OnLogClear)
#if wxUSE_TOOLTIPS
EVT_MENU(TEXT_TOOLTIPS_SETDELAY, MyFrame::OnSetTooltipDelay)
EVT_MENU(TEXT_CLIPBOARD_COPY, MyFrame::OnCopyToClipboard)
#endif // wxUSE_CLIPBOARD
+ EVT_MENU(TEXT_REMOVE, MyFrame::OnRemoveText)
EVT_MENU(TEXT_ADD_SOME, MyFrame::OnAddText)
EVT_MENU(TEXT_ADD_FREEZE, MyFrame::OnAddTextFreeze)
EVT_MENU(TEXT_MOVE_ENDTEXT, MyFrame::OnMoveToEndOfText)
EVT_MENU(TEXT_PAGE_DOWN, MyFrame::OnScrollPageDown)
EVT_MENU(TEXT_PAGE_UP, MyFrame::OnScrollPageUp)
+ EVT_MENU(TEXT_SET, MyFrame::OnSetText)
+
EVT_IDLE(MyFrame::OnIdle)
END_EVENT_TABLE()
{
#if wxUSE_FILE
// verify that the fil length is correct (it wasn't under Win95)
- wxFile file("dummy.txt");
- wxLogStatus(this, _T("Successfully saved file "
- "(text len = %ld, file size = %ld)"),
+ wxFile file(wxT("dummy.txt"));
+ wxLogStatus(this, _T("Successfully saved file (text len = %ld, file size = %ld)"),
m_panel->m_textrich->GetValue().length(),
file.Length());
#endif