X-Git-Url: https://git.saurik.com/wxWidgets.git/blobdiff_plain/c41ea66a5de1e88529e0ce2e629f5757b219b97d..4fcd60c72f6b90f5063f7000ff5a80a9004055a3:/samples/text/text.cpp diff --git a/samples/text/text.cpp b/samples/text/text.cpp index 4406fecbfb..2c3a30455f 100644 --- a/samples/text/text.cpp +++ b/samples/text/text.cpp @@ -9,7 +9,6 @@ ///////////////////////////////////////////////////////////////////////////// #ifdef __GNUG__ - #pragma interface "text.cpp" #pragma implementation "text.cpp" #endif @@ -62,20 +61,31 @@ 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; 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() }; @@ -99,6 +109,7 @@ public: MyTextCtrl *m_enter; MyTextCtrl *m_tab; MyTextCtrl *m_readonly; + MyTextCtrl *m_limited; MyTextCtrl *m_multitext; MyTextCtrl *m_horizontal; @@ -130,18 +141,80 @@ public: { m_panel->DoCopyToClipboard(); } #endif // wxUSE_CLIPBOARD + void OnAddTextFreeze( wxCommandEvent& event ) + { DoAddText(true); } + void OnAddText( wxCommandEvent& event ) + { DoAddText(false); } + 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); + 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 OnIdle( wxIdleEvent& event ); private: + void DoAddText(bool freeze) + { + wxTextCtrl *text = m_panel->m_textrich; + if ( freeze ) + text->Freeze(); + + for ( int i = 0; i < 100; i++ ) + text->AppendText(wxString::Format(wxT("Line %i\n"), i)); + + text->SetInsertionPoint(0); + + if ( freeze ) + text->Thaw(); + } + MyPanel *m_panel; DECLARE_EVENT_TABLE() @@ -173,21 +246,34 @@ enum TEXT_TOOLTIPS_SETDELAY = 300, TEXT_TOOLTIPS_ENABLE, - // move menu - TEXT_MOVE_ENDTEXT = 400, - TEXT_MOVE_ENDENTRY + // text menu + TEXT_ADD_SOME = 400, + TEXT_ADD_FREEZE, + TEXT_MOVE_ENDTEXT, + TEXT_MOVE_ENDENTRY, + TEXT_SET_EDITABLE, + TEXT_SET_ENABLED, + TEXT_LINE_DOWN, + TEXT_LINE_UP, + TEXT_PAGE_DOWN, + TEXT_PAGE_UP, + + // log menu + TEXT_LOG_KEY, + TEXT_LOG_CHAR, + TEXT_LOG_MOUSE, + + TEXT_END }; bool MyApp::OnInit() { // Create the main frame window MyFrame *frame = new MyFrame((wxFrame *) NULL, - "Text wxWindows sample", 50, 50, 660, 420); + "Text wxWindows sample", 50, 50, 700, 420); 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", @@ -219,10 +305,33 @@ bool MyApp::OnInit() menu_bar->Append(menuClipboard, "&Clipboard"); #endif // wxUSE_CLIPBOARD - wxMenu *menuMove = new wxMenu; - menuMove->Append(TEXT_MOVE_ENDTEXT, "To the end of &text"); - menuMove->Append(TEXT_MOVE_ENDENTRY, "To the end of &entry"); - menu_bar->Append(menuMove, "&Move"); + 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_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); + 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->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_MOUSE, TRUE); + menu_bar->Append(menuLog, "&Log"); frame->SetMenuBar(menu_bar); @@ -242,10 +351,18 @@ 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 = TRUE; + void MyTextCtrl::LogEvent(const wxChar *name, wxKeyEvent& event) const { wxString key; @@ -374,8 +491,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 ( !MyTextCtrl::ms_logMouse ) + return; + if ( !ev.Moving() ) { wxString msg; @@ -389,37 +545,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(") ") @@ -435,8 +561,6 @@ void MyTextCtrl::OnMouseEvent(wxMouseEvent& ev) wxLogMessage(msg); } //else: we're not interested in mouse move events - - ev.Skip(); } void MyTextCtrl::OnText(wxCommandEvent& event) @@ -447,29 +571,45 @@ void MyTextCtrl::OnText(wxCommandEvent& event) { wxLogMessage(_T("Text changed in control '%s'"), data); } + else + { + wxLogMessage(_T("Text changed in some control")); + } } -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 ( MyTextCtrl::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 ( MyTextCtrl::ms_logKey ) + LogEvent( _T("Key up"), event); event.Skip(); } @@ -484,15 +624,12 @@ 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: %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(), GetLineLength(line), + GetValue().length(), GetLastPosition()); } break; @@ -527,10 +664,18 @@ void MyTextCtrl::OnKeyDown(wxKeyEvent& event) WriteText("\n"); break; - default: - LogEvent( wxT("Key down"), event); + case WXK_F6: + SetValue("F6 was just pressed."); + break; + + case WXK_F7: + ShowPosition(10); + break; } + if ( MyTextCtrl::ms_logKey ) + LogEvent( wxT("Key down"), event); + event.Skip(); } @@ -554,7 +699,8 @@ MyPanel::MyPanel( wxFrame *frame, int x, int y, int w, int h ) // single line text controls m_text = new MyTextCtrl( this, -1, "Single line.", - wxPoint(10,10), wxSize(140,-1), 0); + wxPoint(10,10), wxSize(140,-1), + wxTE_PROCESS_ENTER); m_text->SetForegroundColour(*wxBLUE); m_text->SetBackgroundColour(*wxLIGHT_GREY); (*m_text) << " Appended."; @@ -567,18 +713,47 @@ 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.", wxPoint(10,170), wxSize(140,70), wxTE_MULTILINE | wxHSCROLL ); - m_horizontal->SetFont(wxFont(18, wxSWISS, wxNORMAL, wxNORMAL, - FALSE, "", wxFONTENCODING_KOI8)); + + // a little hack to use the command line argument for encoding testing + if ( wxTheApp->argc == 2 ) + { + switch ( wxTheApp->argv[1][0] ) + { + case '2': + m_horizontal->SetFont(wxFont(18, wxSWISS, wxNORMAL, wxNORMAL, + FALSE, "", + wxFONTENCODING_ISO8859_2)); + m_horizontal->SetValue("®lu»ouèký kùò zbìsile èe¹tina «»"); + break; + + default: + m_horizontal->SetFont(wxFont(18, wxSWISS, wxNORMAL, wxNORMAL, + FALSE, "", + wxFONTENCODING_KOI8)); + m_horizontal->SetValue("ËÁÖÅÔÓÑ ÕÄÁÞÎÙÍ"); + } + } + else + { + m_horizontal->SetValue("Text in default encoding"); + } m_multitext = new MyTextCtrl( this, -1, "Multi line.", wxPoint(180,10), wxSize(240,70), wxTE_MULTILINE ); + m_multitext->SetFont(*wxITALIC_FONT); (*m_multitext) << " Appended."; m_multitext->SetInsertionPoint(0); m_multitext->WriteText( "Prepended. " ); + m_multitext->SetForegroundColour(*wxRED); + m_multitext->SetBackgroundColour(*wxLIGHT_GREY); #if wxUSE_TOOLTIPS m_multitext->SetToolTip("Press F1 here for statitics, F4 for capture and uncapture mouse."); @@ -593,9 +768,41 @@ MyPanel::MyPanel( wxFrame *frame, int x, int y, int w, int h ) m_enter->SetClientData((void *)_T("enter")); m_textrich = new MyTextCtrl(this, -1, "Allows more than 30Kb of text\n" - "(even under broken Win9x)", - wxPoint(450, 10), wxSize(200, 230), - wxTE_RICH | wxTE_MULTILINE); + "(even under broken Win9x)\n" + "and a very very very very very " + "very very very long line to test " + "wxHSCROLL style", + wxPoint(450, 10), wxSize(230, 230), + 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, + wxTextAttr(*wxGREEN, wxNullColour, *wxITALIC_FONT)); + m_textrich->SetDefaultStyle(wxTextAttr()); + m_textrich->AppendText(_T("\n\nFirst 10 characters should be in red\n")); + m_textrich->AppendText(_T("Next 10 characters should be in blue\n")); + m_textrich->AppendText(_T("Next 10 characters should be normal\n")); + 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->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 ) @@ -715,6 +922,10 @@ 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_LOG_KEY, MyFrame::OnLogKey) + EVT_MENU(TEXT_LOG_CHAR, MyFrame::OnLogChar) + EVT_MENU(TEXT_LOG_MOUSE, MyFrame::OnLogMouse) EVT_MENU(TEXT_CLEAR, MyFrame::OnLogClear) #if wxUSE_TOOLTIPS @@ -727,9 +938,19 @@ BEGIN_EVENT_TABLE(MyFrame, wxFrame) EVT_MENU(TEXT_CLIPBOARD_COPY, MyFrame::OnCopyToClipboard) #endif // wxUSE_CLIPBOARD + EVT_MENU(TEXT_ADD_SOME, MyFrame::OnAddText) + EVT_MENU(TEXT_ADD_FREEZE, MyFrame::OnAddTextFreeze) EVT_MENU(TEXT_MOVE_ENDTEXT, MyFrame::OnMoveToEndOfText) EVT_MENU(TEXT_MOVE_ENDENTRY, MyFrame::OnMoveToEndOfEntry) + 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_IDLE(MyFrame::OnIdle) END_EVENT_TABLE() @@ -803,15 +1024,38 @@ void MyFrame::OnLogClear(wxCommandEvent& WXUNUSED(event)) m_panel->m_log->Clear(); } +void MyFrame::OnSetEditable(wxCommandEvent& WXUNUSED(event)) +{ + static bool s_editable = TRUE; + + s_editable = !s_editable; + m_panel->m_text->SetEditable(s_editable); + m_panel->m_password->SetEditable(s_editable); + m_panel->m_multitext->SetEditable(s_editable); + m_panel->m_textrich->SetEditable(s_editable); +} + +void MyFrame::OnSetEnabled(wxCommandEvent& WXUNUSED(event)) +{ + bool enabled = m_panel->m_text->IsEnabled(); + enabled = !enabled; + + m_panel->m_text->Enable(enabled); + 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); +} + void MyFrame::OnFileSave(wxCommandEvent& event) { if ( m_panel->m_textrich->SaveFile("dummy.txt") ) { #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