X-Git-Url: https://git.saurik.com/wxWidgets.git/blobdiff_plain/dbf28859114db0126c97c74cb8db5305f400fdf8..2dace059ee7aefeea0f2b843f1808b117f112795:/src/msw/textctrl.cpp diff --git a/src/msw/textctrl.cpp b/src/msw/textctrl.cpp index 0ff8cd4407..96ff0f3edd 100644 --- a/src/msw/textctrl.cpp +++ b/src/msw/textctrl.cpp @@ -28,6 +28,8 @@ #pragma hdrstop #endif +#if wxUSE_TEXTCTRL + #ifndef WX_PRECOMP #include "wx/textctrl.h" #include "wx/settings.h" @@ -54,14 +56,17 @@ #include #include -#if wxUSE_IOSTREAMH -# include -#else -# include +#if wxUSE_RICHEDIT && (!defined(__GNUWIN32_OLD__) || defined(__CYGWIN10__)) + #include #endif -#if wxUSE_RICHEDIT && !defined(__GNUWIN32_OLD__) - #include +// old mingw32 doesn't define this +#ifndef CFM_CHARSET + #define CFM_CHARSET 0x08000000 +#endif // CFM_CHARSET + +#ifndef CFM_BACKCOLOR + #define CFM_BACKCOLOR 0x04000000 #endif // ---------------------------------------------------------------------------- @@ -126,7 +131,6 @@ BEGIN_EVENT_TABLE(wxTextCtrl, wxControl) #endif END_EVENT_TABLE() - // ============================================================================ // implementation // ============================================================================ @@ -159,7 +163,11 @@ bool wxTextCtrl::Create(wxWindow *parent, wxWindowID id, // translate wxWin style flags to MSW ones, checking for consistency while // doing it - long msStyle = ES_LEFT | WS_VISIBLE | WS_CHILD | WS_TABSTOP /* | WS_CLIPSIBLINGS */ ; + long msStyle = ES_LEFT | WS_VISIBLE | WS_CHILD | WS_TABSTOP; + + if ( m_windowStyle & wxCLIP_SIBLINGS ) + msStyle |= WS_CLIPSIBLINGS; + if ( m_windowStyle & wxTE_MULTILINE ) { wxASSERT_MSG( !(m_windowStyle & wxTE_PROCESS_ENTER), @@ -378,29 +386,34 @@ wxString wxTextCtrl::GetValue() const #if wxUSE_RICHEDIT if ( m_isRich ) { - int len = GetWindowTextLength(GetHwnd()) + 1; - wxString str; - wxChar *p = str.GetWriteBuf(len); - TEXTRANGE textRange; - textRange.chrg.cpMin = 0; - textRange.chrg.cpMax = -1; - textRange.lpstrText = p; + int len = GetWindowTextLength(GetHwnd()); + if ( len ) + { + // alloc one extra WORD as needed by the control + wxChar *p = str.GetWriteBuf(++len); - (void)SendMessage(GetHwnd(), EM_GETTEXTRANGE, 0, (LPARAM)&textRange); + TEXTRANGE textRange; + textRange.chrg.cpMin = 0; + textRange.chrg.cpMax = -1; + textRange.lpstrText = p; - // believe it or not, but EM_GETTEXTRANGE uses just CR ('\r') for the - // newlines which is neither Unix nor Windows style (Win95 with - // riched20.dll shows this behaviour) - convert it to something - // reasonable - for ( ; *p; p++ ) - { - if ( *p == _T('\r') ) - *p = _T('\n'); - } + (void)SendMessage(GetHwnd(), EM_GETTEXTRANGE, 0, (LPARAM)&textRange); - str.UngetWriteBuf(); + // believe it or not, but EM_GETTEXTRANGE uses just CR ('\r') for + // the newlines which is neither Unix nor Windows style (Win95 with + // riched20.dll shows this behaviour) - convert it to something + // reasonable + for ( ; *p; p++ ) + { + if ( *p == _T('\r') ) + *p = _T('\n'); + } + + str.UngetWriteBuf(); + } + //else: no text at all, leave the string empty return str; } @@ -441,6 +454,17 @@ void wxTextCtrl::WriteText(const wxString& value) { wxString valueDos = wxTextFile::Translate(value, wxTextFileType_Dos); +#if wxUSE_RICHEDIT + // ensure that the new text will be in the default style + if ( IsRich() && + (m_defaultStyle.HasFont() || m_defaultStyle.HasTextColour()) ) + { + long start, end; + GetSelection(&start, &end); + SetStyle(start, end, m_defaultStyle ); + } +#endif // wxUSE_RICHEDIT + SendMessage(GetHwnd(), EM_REPLACESEL, 0, (LPARAM)valueDos.c_str()); AdjustSpaceLimit(); @@ -616,18 +640,19 @@ void wxTextCtrl::GetSelection(long* from, long* to) const *from = charRange.cpMin; *to = charRange.cpMax; - - return; } -#endif - DWORD dwStart, dwEnd; - WPARAM wParam = (WPARAM) (DWORD*) & dwStart; // receives starting position - LPARAM lParam = (LPARAM) (DWORD*) & dwEnd; // receives ending position + else +#endif // rich/!rich + { + DWORD dwStart, dwEnd; + WPARAM wParam = (WPARAM) &dwStart; // receives starting position + LPARAM lParam = (LPARAM) &dwEnd; // receives ending position - ::SendMessage(GetHwnd(), EM_GETSEL, wParam, lParam); + ::SendMessage(GetHwnd(), EM_GETSEL, wParam, lParam); - *from = dwStart; - *to = dwEnd; + *from = dwStart; + *to = dwEnd; + } } bool wxTextCtrl::IsEditable() const @@ -822,7 +847,7 @@ wxString wxTextCtrl::GetLineText(long lineNo) const wxString str; wxChar *buf = str.GetWriteBuf(len); - *(WORD *)buf = len; + *(WORD *)buf = (WORD)len; len = (size_t)::SendMessage(GetHwnd(), EM_GETLINE, lineNo, (LPARAM)buf); buf[len] = 0; @@ -962,10 +987,17 @@ bool wxTextCtrl::MSWCommand(WXUINT param, WXWORD WXUNUSED(id)) return TRUE; } -WXHBRUSH wxTextCtrl::OnCtlColor(WXHDC pDC, WXHWND pWnd, WXUINT nCtlColor, +WXHBRUSH wxTextCtrl::OnCtlColor(WXHDC pDC, WXHWND WXUNUSED(pWnd), WXUINT WXUNUSED(nCtlColor), +#if wxUSE_CTL3D WXUINT message, WXWPARAM wParam, - WXLPARAM lParam) + WXLPARAM lParam +#else + WXUINT WXUNUSED(message), + WXWPARAM WXUNUSED(wParam), + WXLPARAM WXUNUSED(lParam) +#endif + ) { #if wxUSE_CTL3D if ( m_useCtl3D ) @@ -1074,7 +1106,7 @@ wxSize wxTextCtrl::DoGetBestSize() const int hText = EDIT_HEIGHT_FROM_CHAR_HEIGHT(cy); if ( m_windowStyle & wxTE_MULTILINE ) { - hText *= wxMin(GetNumberOfLines(), 5); + hText *= wxMax(GetNumberOfLines(), 5); } //else: for single line control everything is ok @@ -1135,12 +1167,13 @@ void wxTextCtrl::OnUpdateRedo(wxUpdateUIEvent& event) event.Enable( CanRedo() ); } +// the rest of the file only deals with the rich edit controls +#if wxUSE_RICHEDIT + // ---------------------------------------------------------------------------- // colour setting for the rich edit controls // ---------------------------------------------------------------------------- -#if wxUSE_RICHEDIT - // Watcom C++ doesn't define this #ifndef SCF_ALL #define SCF_ALL 0x0004 @@ -1186,14 +1219,128 @@ bool wxTextCtrl::SetForegroundColour(const wxColour& colour) return TRUE; } -#endif // wxUSE_RICHEDIT +// ---------------------------------------------------------------------------- +// styling support for rich edit controls +// ---------------------------------------------------------------------------- + +bool wxTextCtrl::SetStyle(long start, long end, const wxTextAttr& style) +{ + if ( !IsRich() ) + { + // can't do it with normal text control + return FALSE; + } + + // the rich text control doesn't handle setting background colour, so don't + // even try if it's the only thing we want to change + if ( wxRichEditModule::GetLoadedVersion() < 2 && + !style.HasFont() && !style.HasTextColour() ) + { + // nothing to do: return TRUE if there was really nothing to do and + // FALSE if we failed to set bg colour + return !style.HasBackgroundColour(); + } + + // order the range if needed + if ( start > end ) + { + long tmp = start; + start = end; + end = tmp; + } + + // we can only change the format of the selection, so select the range we + // want and restore the old selection later + long startOld, endOld; + GetSelection(&startOld, &endOld); + + // but do we really have to change the selection? + bool changeSel = start != startOld || end != endOld; + + if ( changeSel ) + SendMessage(GetHwnd(), EM_SETSEL, (WPARAM) start, (LPARAM) end); + + // initialize CHARFORMAT struct +#if wxUSE_RICHEDIT2 + CHARFORMAT2 cf; +#else + CHARFORMAT cf; +#endif + wxZeroMemory(cf); + cf.cbSize = sizeof(cf); + + if ( style.HasFont() ) + { + cf.dwMask |= CFM_FACE | CFM_SIZE | CFM_CHARSET | + CFM_ITALIC | CFM_BOLD | CFM_UNDERLINE; + + // fill in data from LOGFONT but recalculate lfHeight because we need + // the real height in twips and not the negative number which + // wxFillLogFont() returns (this is correct in general and works with + // the Windows font mapper, but not here) + LOGFONT lf; + wxFillLogFont(&lf, &style.GetFont()); + cf.yHeight = 20*style.GetFont().GetPointSize(); // 1 pt = 20 twips + cf.bCharSet = lf.lfCharSet; + cf.bPitchAndFamily = lf.lfPitchAndFamily; + wxStrncpy( cf.szFaceName, lf.lfFaceName, WXSIZEOF(cf.szFaceName) ); + + // also deal with underline/italic/bold attributes: note that we must + // always set CFM_ITALIC &c bits in dwMask, even if we don't set the + // style to allow clearing it + if ( lf.lfItalic ) + { + cf.dwEffects |= CFE_ITALIC; + } + + if ( lf.lfWeight == FW_BOLD ) + { + cf.dwEffects |= CFE_BOLD; + } + + if ( lf.lfUnderline ) + { + cf.dwEffects |= CFE_UNDERLINE; + } + + // strikeout fonts are not supported by wxWindows + } + + if ( style.HasTextColour() ) + { + cf.dwMask |= CFM_COLOR; + cf.crTextColor = wxColourToRGB(style.GetTextColour()); + } + +#if wxUSE_RICHEDIT2 + if ( wxRichEditModule::GetLoadedVersion() > 1 && style.HasBackgroundColour() ) + { + cf.dwMask |= CFM_BACKCOLOR; + cf.crBackColor = wxColourToRGB(style.GetBackgroundColour()); + } +#endif // wxUSE_RICHEDIT2 + + // do format the selection + bool ok = ::SendMessage(GetHwnd(), EM_SETCHARFORMAT, + SCF_SELECTION, (LPARAM)&cf) != 0; + if ( !ok ) + { + wxLogDebug(_T("SendMessage(EM_SETCHARFORMAT, SCF_SELECTION) failed")); + } + + if ( changeSel ) + { + // restore the original selection + SendMessage(GetHwnd(), EM_SETSEL, (WPARAM)startOld, (LPARAM)endOld); + } + + return ok; +} // ---------------------------------------------------------------------------- // wxRichEditModule // ---------------------------------------------------------------------------- -#if wxUSE_RICHEDIT - bool wxRichEditModule::OnInit() { // don't do anything - we will load it when needed @@ -1253,3 +1400,4 @@ bool wxRichEditModule::Load(int version) #endif // wxUSE_RICHEDIT +#endif // wxUSE_TEXTCTRL