#include "wx/event.h"
#include "wx/app.h"
#include "wx/dcclient.h"
+#include "wx/log.h"
#endif
#include "wx/control.h"
#include "wx/msw/private.h"
-#if (defined(__WIN95__) && !defined(__GNUWIN32__)) || defined(__TWIN32__) || defined(wxUSE_NORLANDER_HEADERS)
-#include <commctrl.h>
+#if defined(__WIN95__) && !(defined(__GNUWIN32_OLD__) || defined(__TWIN32__))
+ #include <commctrl.h>
#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
}
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)
{
+ // want3D tells us whether or not the style specified a 3D border.
+ // If so, under WIN16 we can use Ctl3D to give it an appropriate style.
+ // Sometimes want3D is used to indicate that the non-extended style should have
+ // WS_BORDER.
+ bool want3D = TRUE;
+
+ // if no extended style given, determine it ourselves
+ if ( exstyle == (WXDWORD)-1 )
+ {
+ exstyle = GetExStyle(style, &want3D);
+ }
+
+ // all controls have these styles (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
if ( !m_hWnd )
{
-#ifdef __WXDEBUG__
- wxLogError(wxT("Failed to create a control of class '%s'"), classname);
-#endif // DEBUG
+ wxLogDebug(wxT("Failed to create a control of class '%s'"), classname);
+ wxFAIL_MSG(_T("something is very wrong"));
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);
return TRUE;
}
-wxSize wxControl::DoGetBestSize()
+wxSize wxControl::DoGetBestSize() const
{
return wxSize(DEFAULT_ITEM_WIDTH, DEFAULT_ITEM_HEIGHT);
}
#if WXWIN_COMPATIBILITY
if ( m_callback )
{
- (void)(*m_callback)(this, event);
+ (void)(*m_callback)(*this, event);
return TRUE;
}
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(wxColourToRGB(GetBackgroundColour()));
- HBRUSH hBrush = ::CreateSolidBrush(PALETTERGB(GetBackgroundColour().Red(),
- GetBackgroundColour().Green(),
- GetBackgroundColour().Blue()));
- int mode = ::SetMapMode((HDC) event.GetDC()->GetHDC(), MM_TEXT);
+ HDC hdc = GetHdcOf((*event.GetDC()));
+ int mode = ::SetMapMode(hdc, MM_TEXT);
- ::FillRect ((HDC) event.GetDC()->GetHDC(), &rect, hBrush);
+ ::FillRect(hdc, &rect, hBrush);
::DeleteObject(hBrush);
- ::SetMapMode((HDC) event.GetDC()->GetHDC(), mode);
+ ::SetMapMode(hdc, mode);
+}
+
+WXHBRUSH wxControl::OnCtlColor(WXHDC pDC, WXHWND pWnd, WXUINT nCtlColor,
+ WXUINT message,
+ WXWPARAM wParam,
+ WXLPARAM lParam)
+{
+#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);
+
+ 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) const
+WXDWORD wxControl::GetExStyle(WXDWORD& style, bool *want3D) const
{
- bool want3D;
- WXDWORD exStyle = Determine3DEffects(WS_EX_CLIENTEDGE, &want3D) ;
+ 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;