X-Git-Url: https://git.saurik.com/wxWidgets.git/blobdiff_plain/eff005236db0ba365ba40878733266f5d552ea55..c3016fd626994c6f9f555e03076a497eb1f5797c:/samples/text/text.cpp diff --git a/samples/text/text.cpp b/samples/text/text.cpp index dece7ff5a5..30a3dc55df 100644 --- a/samples/text/text.cpp +++ b/samples/text/text.cpp @@ -61,20 +61,32 @@ class MyTextCtrl : public wxTextCtrl 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 OnChar(wxKeyEvent& event); + void OnText(wxCommandEvent& event); + void OnTextURL(wxTextUrlEvent& event); + void OnTextMaxLen(wxCommandEvent& event); + void OnMouseEvent(wxMouseEvent& event); - bool m_hasCapture; + static bool ms_logKey; + static bool ms_logChar; + static bool ms_logMouse; + static bool ms_logText; private: static inline wxChar GetChar(bool on, wxChar c) { return on ? c : _T('-'); } void LogEvent(const wxChar *name, wxKeyEvent& event) const; + bool m_hasCapture; + DECLARE_EVENT_TABLE() }; @@ -88,6 +100,7 @@ public: void DoCopyToClipboard(); #endif // wxUSE_CLIPBOARD + void DoRemoveText(); void DoMoveToEndOfText(); void DoMoveToEndOfEntry(); @@ -98,6 +111,7 @@ public: MyTextCtrl *m_enter; MyTextCtrl *m_tab; MyTextCtrl *m_readonly; + MyTextCtrl *m_limited; MyTextCtrl *m_multitext; MyTextCtrl *m_horizontal; @@ -107,6 +121,10 @@ public: wxTextCtrl *m_log; 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() }; @@ -133,12 +151,38 @@ public: { DoAddText(true); } void OnAddText( wxCommandEvent& event ) { DoAddText(false); } + void OnRemoveText( wxCommandEvent& event ) + { m_panel->DoRemoveText(); } void OnMoveToEndOfText( wxCommandEvent &event ) { m_panel->DoMoveToEndOfText(); } void OnMoveToEndOfEntry( wxCommandEvent &event ) { m_panel->DoMoveToEndOfEntry(); } + void OnScrollLineDown(wxCommandEvent& event) + { + if ( !m_panel->m_textrich->LineDown() ) + wxLogMessage(_T("Already at the bottom")); + } + + void OnScrollLineUp(wxCommandEvent& event) + { + if ( !m_panel->m_textrich->LineUp() ) + wxLogMessage(_T("Already at the top")); + } + + void OnScrollPageDown(wxCommandEvent& event) + { + if ( !m_panel->m_textrich->PageDown() ) + wxLogMessage(_T("Already at the bottom")); + } + + void OnScrollPageUp(wxCommandEvent& event) + { + if ( !m_panel->m_textrich->PageUp() ) + wxLogMessage(_T("Already at the top")); + } + void OnLogClear(wxCommandEvent& event); void OnFileSave(wxCommandEvent& event); void OnFileLoad(wxCommandEvent& event); @@ -146,6 +190,31 @@ public: 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 OnSetText(wxCommandEvent& event) + { + m_panel->m_text->SetValue(_T("Hello, world (what else did you expect)?")); + } + void OnIdle( wxIdleEvent& event ); private: @@ -156,7 +225,7 @@ private: text->Freeze(); for ( int i = 0; i < 100; i++ ) - text->AppendText(wxString::Format("Line %i\n", i)); + text->AppendText(wxString::Format(wxT("Line %i\n"), i)); text->SetInsertionPoint(0); @@ -201,7 +270,21 @@ enum TEXT_MOVE_ENDTEXT, TEXT_MOVE_ENDENTRY, TEXT_SET_EDITABLE, - TEXT_SET_ENABLED + TEXT_SET_ENABLED, + TEXT_LINE_DOWN, + 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_END }; bool MyApp::OnInit() @@ -212,8 +295,6 @@ 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", @@ -248,13 +329,34 @@ bool MyApp::OnInit() 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_SET_ENABLED, "Toggle e&nabled state", "", TRUE); menuText->Check(TEXT_SET_EDITABLE, TRUE); menuText->Check(TEXT_SET_ENABLED, TRUE); - menu_bar->Append(menuText, "&Text"); + menuText->AppendSeparator(); + menuText->Append(TEXT_LINE_DOWN, "Scroll text one line down"); + 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, "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->AppendSeparator(); + menuLog->Append(TEXT_CLEAR, "&Clear the log\tCtrl-C", + "Clear the log window contents"); + menuLog->Check(TEXT_LOG_KEY, TRUE); + menuLog->Check(TEXT_LOG_CHAR, TRUE); + menuLog->Check(TEXT_LOG_TEXT, TRUE); + menu_bar->Append(menuLog, "&Log"); frame->SetMenuBar(menu_bar); @@ -274,10 +376,19 @@ BEGIN_EVENT_TABLE(MyTextCtrl, wxTextCtrl) EVT_KEY_DOWN(MyTextCtrl::OnKeyDown) EVT_KEY_UP(MyTextCtrl::OnKeyUp) EVT_CHAR(MyTextCtrl::OnChar) + EVT_TEXT(-1, MyTextCtrl::OnText) + EVT_TEXT_URL(-1, MyTextCtrl::OnTextURL) + EVT_TEXT_MAXLEN(-1, MyTextCtrl::OnTextMaxLen) + EVT_MOUSE_EVENTS(MyTextCtrl::OnMouseEvent) END_EVENT_TABLE() +bool MyTextCtrl::ms_logKey = TRUE; +bool MyTextCtrl::ms_logChar = TRUE; +bool MyTextCtrl::ms_logMouse = FALSE; +bool MyTextCtrl::ms_logText = TRUE; + void MyTextCtrl::LogEvent(const wxChar *name, wxKeyEvent& event) const { wxString key; @@ -390,9 +501,11 @@ void MyTextCtrl::LogEvent(const wxChar *name, wxKeyEvent& event) const 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); } } } @@ -406,8 +519,47 @@ void MyTextCtrl::LogEvent(const wxChar *name, wxKeyEvent& event) const GetChar( event.MetaDown(), _T('M') ) ); } +static wxString GetMouseEventDesc(const wxMouseEvent& ev) +{ + // click event + wxString button; + bool dbl, up; + if ( ev.LeftDown() || ev.LeftUp() || ev.LeftDClick() ) + { + button = _T("Left"); + dbl = ev.LeftDClick(); + up = ev.LeftUp(); + } + else if ( ev.MiddleDown() || ev.MiddleUp() || ev.MiddleDClick() ) + { + button = _T("Middle"); + dbl = ev.MiddleDClick(); + up = ev.MiddleUp(); + } + else if ( ev.RightDown() || ev.RightUp() || ev.RightDClick() ) + { + button = _T("Right"); + dbl = ev.RightDClick(); + up = ev.RightUp(); + } + else + { + return _T("Unknown mouse event"); + } + + return wxString::Format(_T("%s mouse button %s"), + button.c_str(), + dbl ? _T("double clicked") + : up ? _T("released") : _T("clicked")); +} + void MyTextCtrl::OnMouseEvent(wxMouseEvent& ev) { + ev.Skip(); + + if ( !ms_logMouse ) + return; + if ( !ev.Moving() ) { wxString msg; @@ -421,37 +573,7 @@ void MyTextCtrl::OnMouseEvent(wxMouseEvent& ev) } else { - // click event - wxString button; - bool dbl, up; - if ( ev.LeftDown() || ev.LeftUp() || ev.LeftDClick() ) - { - button = _T("Left"); - dbl = ev.LeftDClick(); - up = ev.LeftUp(); - } - else if ( ev.MiddleDown() || ev.MiddleUp() || ev.MiddleDClick() ) - { - button = _T("Middle"); - dbl = ev.MiddleDClick(); - up = ev.MiddleUp(); - } - else if ( ev.RightDown() || ev.RightUp() || ev.RightDClick() ) - { - button = _T("Right"); - dbl = ev.RightDClick(); - up = ev.RightUp(); - } - else - { - wxLogStatus(_T("Unknown mouse event")); - return; - } - - msg.Printf(_T("%s mouse button %s"), - button.c_str(), - dbl ? _T("double clicked") - : up ? _T("released") : _T("clicked")); + msg = GetMouseEventDesc(ev); } msg << _T(" at (") << ev.GetX() << _T(", ") << ev.GetY() << _T(") ") @@ -467,12 +589,13 @@ void MyTextCtrl::OnMouseEvent(wxMouseEvent& ev) wxLogMessage(msg); } //else: we're not interested in mouse move events - - ev.Skip(); } void MyTextCtrl::OnText(wxCommandEvent& event) { + if ( !ms_logText ) + return; + MyTextCtrl *win = (MyTextCtrl *)event.GetEventObject(); const wxChar *data = (const wxChar *)(win->GetClientData()); if ( data ) @@ -485,27 +608,39 @@ void MyTextCtrl::OnText(wxCommandEvent& event) } } -void MyTextCtrl::OnChar(wxKeyEvent& event) +void MyTextCtrl::OnTextMaxLen(wxCommandEvent& event) { - LogEvent( _T("Char"), event); + wxLogMessage(_T("You can't enter more characters into this control.")); +} -/* How are we supposed to test wxTE_PROCESS_TAB with this code? +void MyTextCtrl::OnTextURL(wxTextUrlEvent& event) +{ + const wxMouseEvent& ev = event.GetMouseEvent(); + + // filter out mouse moves, too many of them + if ( ev.Moving() ) + return; + + long start = event.GetURLStart(), + end = event.GetURLEnd(); + + wxLogMessage(_T("Mouse event over URL '%s': %s"), + GetValue().Mid(start, end - start).c_str(), + GetMouseEventDesc(ev).c_str()); +} + +void MyTextCtrl::OnChar(wxKeyEvent& event) +{ + if ( ms_logChar ) + LogEvent( _T("Char"), event); - 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 ) + LogEvent( _T("Key up"), event); event.Skip(); } @@ -520,11 +655,7 @@ void MyTextCtrl::OnKeyDown(wxKeyEvent& event) 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(), @@ -554,7 +685,7 @@ void MyTextCtrl::OnKeyDown(wxKeyEvent& event) else { wxLogDebug( wxT("Stopped capturing mouse and events.") ); - m_hasCapture = TRUE; + m_hasCapture = FALSE; ReleaseMouse(); } break; @@ -571,9 +702,22 @@ void MyTextCtrl::OnKeyDown(wxKeyEvent& event) 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 ) + LogEvent( wxT("Key down"), event); event.Skip(); } @@ -589,7 +733,9 @@ END_EVENT_TABLE() 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 ); + m_log = new wxTextCtrl( this, -1, "This is the log window.\n", + wxPoint(5,260), wxSize(630,100), + wxTE_MULTILINE | wxTE_READONLY /* | wxTE_RICH */); wxLog *old_log = wxLog::SetActiveTarget( new wxLogTextCtrl( m_log ) ); @@ -612,6 +758,10 @@ MyPanel::MyPanel( wxFrame *frame, int x, int y, int w, int h ) m_readonly = new MyTextCtrl( this, -1, "Read only", wxPoint(10,90), wxSize(140,-1), wxTE_READONLY ); + m_limited = new MyTextCtrl(this, -1, "Max 8 ch", + wxPoint(10, 130), wxSize(140, -1)); + m_limited->SetMaxLength(8); + // multi line text controls m_horizontal = new MyTextCtrl( this, -1, "Multiline text control with a horizontal scrollbar.", @@ -629,11 +779,22 @@ MyPanel::MyPanel( wxFrame *frame, int x, int y, int w, int h ) 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 @@ -665,11 +826,15 @@ MyPanel::MyPanel( wxFrame *frame, int x, int y, int w, int h ) m_textrich = new MyTextCtrl(this, -1, "Allows more than 30Kb of text\n" "(even under broken Win9x)\n" "and a very very very very very " - "very very very long line to test" + "very very very long line to test " "wxHSCROLL style", wxPoint(450, 10), wxSize(230, 230), - wxTE_RICH | wxTE_MULTILINE | wxHSCROLL); + wxTE_RICH | + wxTE_MULTILINE | + // wxTE_AUTO_URL | + wxHSCROLL); +#if 1 m_textrich->SetStyle(0, 10, *wxRED); m_textrich->SetStyle(10, 20, *wxBLUE); m_textrich->SetStyle(30, 40, @@ -681,9 +846,19 @@ MyPanel::MyPanel( wxFrame *frame, int x, int y, int w, int h ) 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->SetFont(wxFont(12, wxFONTFAMILY_TELETYPE, + wxFONTSTYLE_NORMAL, wxFONTWEIGHT_NORMAL)); + 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 ) @@ -693,6 +868,14 @@ 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() { @@ -794,6 +977,11 @@ void MyPanel::DoMoveToEndOfEntry() m_text->SetFocus(); } +void MyPanel::DoRemoveText() +{ + GetFocusedText(m_multitext)->Remove(0, 10); +} + //---------------------------------------------------------------------- // MyFrame //---------------------------------------------------------------------- @@ -803,7 +991,12 @@ BEGIN_EVENT_TABLE(MyFrame, wxFrame) 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_CLEAR, MyFrame::OnLogClear) #if wxUSE_TOOLTIPS EVT_MENU(TEXT_TOOLTIPS_SETDELAY, MyFrame::OnSetTooltipDelay) @@ -815,6 +1008,7 @@ BEGIN_EVENT_TABLE(MyFrame, wxFrame) 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) @@ -823,6 +1017,13 @@ BEGIN_EVENT_TABLE(MyFrame, wxFrame) EVT_MENU(TEXT_SET_EDITABLE, MyFrame::OnSetEditable) EVT_MENU(TEXT_SET_ENABLED, MyFrame::OnSetEnabled) + EVT_MENU(TEXT_LINE_DOWN, MyFrame::OnScrollLineDown) + EVT_MENU(TEXT_LINE_UP, MyFrame::OnScrollLineUp) + 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() @@ -916,6 +1117,7 @@ void MyFrame::OnSetEnabled(wxCommandEvent& WXUNUSED(event)) m_panel->m_password->Enable(enabled); m_panel->m_multitext->Enable(enabled); m_panel->m_readonly->Enable(enabled); + m_panel->m_limited->Enable(enabled); m_panel->m_textrich->Enable(enabled); } @@ -925,9 +1127,8 @@ void MyFrame::OnFileSave(wxCommandEvent& event) { #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