X-Git-Url: https://git.saurik.com/wxWidgets.git/blobdiff_plain/a37d422a667124e4cb9c7413deda637d3b1926ec..038072e2f1eaf2bf32d748a71234d767ebba8919:/src/msw/textctrl.cpp diff --git a/src/msw/textctrl.cpp b/src/msw/textctrl.cpp index c6beb418d7..0de8b105d5 100644 --- a/src/msw/textctrl.cpp +++ b/src/msw/textctrl.cpp @@ -259,6 +259,11 @@ bool wxTextCtrl::Create(wxWindow *parent, wxWindowID id, else { msStyle |= ES_AUTOVSCROLL; + // Experimental: this seems to help with the scroll problem. See messages from Jekabs Andrushaitis + // wx-dev list, entitled "[wx-dev] wxMSW-EVT_KEY_DOWN and wxMSW-wxTextCtrl" and "[wx-dev] TextCtrl (RichEdit)" + // Unfortunately, showing the selection in blue when the control doesn't have + // the focus is non-standard behaviour, and we need to find another workaround. + //msStyle |= ES_NOHIDESEL ; m_isRich = TRUE; int ver = wxRichEditModule::GetLoadedVersion(); @@ -614,8 +619,13 @@ void wxTextCtrl::SetInsertionPoint(long pos) SendMessage(hWnd, EM_SETSEL, 0, MAKELPARAM(pos, pos)); #endif // Win32/16 - static const wxChar *nothing = _T(""); - SendMessage(hWnd, EM_REPLACESEL, 0, (LPARAM)nothing); +#if wxUSE_RICHEDIT + if ( !m_isRich) +#endif + { + static const wxChar *nothing = _T(""); + SendMessage(hWnd, EM_REPLACESEL, 0, (LPARAM)nothing); + } } void wxTextCtrl::SetInsertionPointEnd() @@ -878,6 +888,11 @@ wxString wxTextCtrl::GetLineText(long lineNo) const return str; } +void wxTextCtrl::SetMaxLength(unsigned long len) +{ + ::SendMessage(GetHwnd(), EM_LIMITTEXT, len, 0); +} + // ---------------------------------------------------------------------------- // Undo/redo // ---------------------------------------------------------------------------- @@ -1020,8 +1035,8 @@ bool wxTextCtrl::MSWCommand(WXUINT param, WXWORD WXUNUSED(id)) case EN_KILLFOCUS: { wxFocusEvent event(param == EN_KILLFOCUS ? wxEVT_KILL_FOCUS - : wxEVT_SET_FOCUS, - m_windowId); + : wxEVT_SET_FOCUS, + m_windowId); event.SetEventObject( this ); GetEventHandler()->ProcessEvent(event); } @@ -1038,7 +1053,13 @@ bool wxTextCtrl::MSWCommand(WXUINT param, WXWORD WXUNUSED(id)) case EN_MAXTEXT: // the text size limit has been hit - increase it - AdjustSpaceLimit(); + if ( !AdjustSpaceLimit() ) + { + wxCommandEvent event(wxEVT_COMMAND_TEXT_MAXLEN, m_windowId); + InitCommandEvent(event); + event.SetString(GetValue()); + ProcessCommand(event); + } break; // the other notification messages are not processed @@ -1127,11 +1148,27 @@ void wxTextCtrl::OnEraseBackground(wxEraseEvent& event) } #endif -void wxTextCtrl::AdjustSpaceLimit() +bool wxTextCtrl::AdjustSpaceLimit() { #ifndef __WIN16__ - unsigned int len = ::GetWindowTextLength(GetHwnd()), - limit = ::SendMessage(GetHwnd(), EM_GETLIMITTEXT, 0, 0); + unsigned int limit = ::SendMessage(GetHwnd(), EM_GETLIMITTEXT, 0, 0); + + // HACK: we try to automatically extend the limit for the amount of text + // to allow (interactively) entering more than 64Kb of text under + // Win9x but we shouldn't reset the text limit which was previously + // set explicitly with SetMaxLength() + // + // we could solve this by storing the limit we set in wxTextCtrl but + // to save space we prefer to simply test here the actual limit + // value: we consider that SetMaxLength() can only be called for + // values < 32Kb + if ( limit < 0x8000 ) + { + // we've got more text than limit set by SetMaxLength() + return FALSE; + } + + unsigned int len = ::GetWindowTextLength(GetHwnd()); if ( len >= limit ) { limit = len + 0x8000; // 32Kb @@ -1156,6 +1193,9 @@ void wxTextCtrl::AdjustSpaceLimit() } } #endif // !Win16 + + // we changed the limit + return TRUE; } bool wxTextCtrl::AcceptsFocus() const