#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
IMPLEMENT_ABSTRACT_CLASS(wxControl, wxWindow)
bool wxControl::Create(wxWindow *parent, wxWindowID id,
const wxPoint& pos,
const wxSize& size, long style,
-#if wxUSE_VALIDATORS
const wxValidator& validator,
-#endif
const wxString& name)
{
bool rval = wxWindow::Create(parent, id, pos, size, style, name);
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;
+ // 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 childs (wxWindows creates all controls visible
+ // all controls have these styles (wxWindows creates all controls visible
// by default)
style |= WS_CHILD | WS_VISIBLE;
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 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(GetHwnd(), &rect);
else
SetBkMode(hdc, OPAQUE);
- const wxColour& colBack = GetBackgroundColour();
+ wxColour colBack = GetBackgroundColour();
+
::SetBkColor(hdc, wxColourToRGB(colBack));
::SetTextColor(hdc, wxColourToRGB(GetForegroundColour()));