X-Git-Url: https://git.saurik.com/wxWidgets.git/blobdiff_plain/223d09f6b523aac674ef9b72a883dfa8d37c5d4e..0b7e6e7da208b6a95fb23cb50286a09dc90d96d2:/src/msw/control.cpp diff --git a/src/msw/control.cpp b/src/msw/control.cpp index f610c69d77..ce7b2fca18 100644 --- a/src/msw/control.cpp +++ b/src/msw/control.cpp @@ -30,26 +30,24 @@ #include "wx/msw/private.h" -#if (defined(__WIN95__) && !defined(__GNUWIN32__)) || defined(__TWIN32__) || defined(wxUSE_NORLANDER_HEADERS) -#include +#if defined(__WIN95__) && !(defined(__GNUWIN32_OLD__) || defined(__TWIN32__)) + #include #endif -#if !USE_SHARED_LIBRARY IMPLEMENT_ABSTRACT_CLASS(wxControl, wxWindow) BEGIN_EVENT_TABLE(wxControl, wxWindow) EVT_ERASE_BACKGROUND(wxControl::OnEraseBackground) END_EVENT_TABLE() -#endif // Item members wxControl::wxControl() { - m_backgroundColour = *wxWHITE; - m_foregroundColour = *wxBLACK; + m_backgroundColour = *wxWHITE; + m_foregroundColour = *wxBLACK; #if WXWIN_COMPATIBILITY - m_callback = 0; + m_callback = 0; #endif // WXWIN_COMPATIBILITY } @@ -58,15 +56,51 @@ wxControl::~wxControl() m_isBeingDeleted = TRUE; } -bool wxControl::MSWCreateControl(const wxChar *classname, WXDWORD style) + +bool wxControl::Create(wxWindow *parent, wxWindowID id, + const wxPoint& pos, + const wxSize& size, long style, + const wxValidator& validator, + const wxString& name) +{ + bool rval = wxWindow::Create(parent, id, pos, size, style, name); + if (rval) { +#if wxUSE_VALIDATORS + SetValidator(validator); +#endif + } + return rval; +} + +bool wxControl::MSWCreateControl(const wxChar *classname, + WXDWORD style, + const wxPoint& pos, + const wxSize& size, + const wxString& label, + WXDWORD exstyle) { + // VZ: if someone could put a comment here explaining what exactly this is + // needed for, it would be nice... + bool want3D; + + // if no extended style given, determine it ourselves + if ( exstyle == (WXDWORD)-1 ) + { + exstyle = GetExStyle(style, &want3D); + } + + // all controls have these childs (wxWindows creates all controls visible + // by default) + style |= WS_CHILD | WS_VISIBLE; + m_hWnd = (WXHWND)::CreateWindowEx ( - GetExStyle(style), // extended style + exstyle, // extended style classname, // the kind of control to create - NULL, // the window name + label, // the window name style, // the window style - 0, 0, 0, 0, // the window position and size + pos.x, pos.y, // the window position + size.x, size.y, // and size GetHwndOf(GetParent()), // parent (HMENU)GetId(), // child id wxGetInstance(), // app instance @@ -82,6 +116,14 @@ bool wxControl::MSWCreateControl(const wxChar *classname, WXDWORD style) return FALSE; } +#if wxUSE_CTL3D + if ( want3D ) + { + Ctl3dSubclassCtl(GetHwnd()); + m_useCtl3D = TRUE; + } +#endif // wxUSE_CTL3D + // subclass again for purposes of dialog editing mode SubclassWin(m_hWnd); @@ -91,7 +133,7 @@ bool wxControl::MSWCreateControl(const wxChar *classname, WXDWORD style) return TRUE; } -wxSize wxControl::DoGetBestSize() +wxSize wxControl::DoGetBestSize() const { return wxSize(DEFAULT_ITEM_WIDTH, DEFAULT_ITEM_HEIGHT); } @@ -162,32 +204,58 @@ bool wxControl::MSWOnNotify(int idCtrl, void wxControl::OnEraseBackground(wxEraseEvent& event) { - // In general, you don't want to erase the background of a control, - // or you'll get a flicker. - // TODO: move this 'null' function into each control that - // might flicker. + // notice that this 'dumb' implementation may cause flicker for some of the + // controls in which case they should intercept wxEraseEvent and process it + // themselves somehow RECT rect; - ::GetClientRect((HWND) GetHWND(), &rect); + ::GetClientRect(GetHwnd(), &rect); - HBRUSH hBrush = ::CreateSolidBrush(PALETTERGB(GetBackgroundColour().Red(), - GetBackgroundColour().Green(), - GetBackgroundColour().Blue())); - int mode = ::SetMapMode((HDC) event.GetDC()->GetHDC(), MM_TEXT); + HBRUSH hBrush = ::CreateSolidBrush(wxColourToRGB(GetBackgroundColour())); - ::FillRect ((HDC) event.GetDC()->GetHDC(), &rect, hBrush); + HDC hdc = GetHdcOf((*event.GetDC())); + int mode = ::SetMapMode(hdc, MM_TEXT); + + ::FillRect(hdc, &rect, hBrush); ::DeleteObject(hBrush); - ::SetMapMode((HDC) event.GetDC()->GetHDC(), mode); + ::SetMapMode(hdc, mode); } -WXDWORD wxControl::GetExStyle(WXDWORD& style) const +WXHBRUSH wxControl::OnCtlColor(WXHDC pDC, WXHWND pWnd, WXUINT nCtlColor, + WXUINT message, + WXWPARAM wParam, + WXLPARAM lParam) { - bool want3D; - WXDWORD exStyle = Determine3DEffects(WS_EX_CLIENTEDGE, &want3D) ; +#if wxUSE_CTL3D + if ( m_useCtl3D ) + { + HBRUSH hbrush = Ctl3dCtlColorEx(message, wParam, lParam); + return (WXHBRUSH) hbrush; + } +#endif // wxUSE_CTL3D + + HDC hdc = (HDC)pDC; + if (GetParent()->GetTransparentBackground()) + SetBkMode(hdc, TRANSPARENT); + else + SetBkMode(hdc, OPAQUE); + + const wxColour& colBack = GetBackgroundColour(); + ::SetBkColor(hdc, wxColourToRGB(colBack)); + ::SetTextColor(hdc, wxColourToRGB(GetForegroundColour())); + + wxBrush *brush = wxTheBrushList->FindOrCreateBrush(colBack, wxSOLID); + + return (WXHBRUSH)brush->GetResourceHandle(); +} + +WXDWORD wxControl::GetExStyle(WXDWORD& style, bool *want3D) const +{ + WXDWORD exStyle = Determine3DEffects(WS_EX_CLIENTEDGE, want3D); - // Even with extended styles, need to combine with WS_BORDER - // for them to look right. - if ( want3D || wxStyleHasBorder(m_windowStyle) ) + // Even with extended styles, need to combine with WS_BORDER for them to + // look right. + if ( *want3D || wxStyleHasBorder(m_windowStyle) ) style |= WS_BORDER; return exStyle;