// Created: 17/09/98
// RCS-ID: $Id$
// Copyright: (c) Julian Smart
-// Licence: wxWindows licence
+// Licence: wxWindows licence
/////////////////////////////////////////////////////////////////////////////
#ifdef __GNUG__
m_backgroundColour = parent->GetBackgroundColour();
m_foregroundColour = parent->GetForegroundColour();
SetValidator(validator);
-
+
m_windowStyle = style;
if ( id == -1 )
- m_windowId = (int)NewControlId();
+ m_windowId = (int)NewControlId();
else
- m_windowId = id;
+ m_windowId = id;
int x = pos.x;
int y = pos.y;
void wxScrollBar::Command(wxCommandEvent& event)
{
- SetPosition(event.m_commandInt);
+ SetThumbPosition(event.m_commandInt);
ProcessCommand(event);
}
void wxScrollBar::ChangeFont(bool keepOriginalSize)
{
// TODO
+ // Do anything for a scrollbar? A font will never be seen.
}
void wxScrollBar::ChangeBackgroundColour()
{
- // TODO
+ wxWindow::ChangeBackgroundColour();
+
+ XtVaSetValues ((Widget) GetMainWidget(),
+ XmNtroughColor, m_backgroundColour.AllocColour(XtDisplay((Widget) GetMainWidget())),
+ NULL);
}
void wxScrollBar::ChangeForegroundColour()
{
- // TODO
+ wxWindow::ChangeForegroundColour();
}
static void wxScrollBarCallback(Widget widget, XtPointer clientData,