// Name: src/palmos/slider.cpp
// Purpose: wxSlider
// Author: William Osborne - minimal working wxPalmOS port
-// Modified by:
+// Modified by: Wlodzimierz ABX Skiba - native implementation
// Created: 10/13/04
// RCS-ID: $Id$
-// Copyright: (c) William Osborne
+// Copyright: (c) William Osborne, Wlodzimierz Skiba
// Licence: wxWindows licence
/////////////////////////////////////////////////////////////////////////////
-#if defined(__GNUG__) && !defined(NO_GCC_PRAGMA)
-#pragma implementation "slider.h"
-#endif
-
// For compilers that support precompilation, includes "wx.h".
#include "wx/wxprec.h"
#include "wx/slider.h"
#endif
-#include "wx/palmos/slider.h"
-#include "wx/palmos/private.h"
+#include "wx/toplevel.h"
+
+#include <Form.h>
+#include <Control.h>
#if wxUSE_EXTENDED_RTTI
WX_DEFINE_FLAGS( wxSliderStyle )
#endif
// Slider
-wxSlider::wxSlider()
+void wxSlider::Init()
{
+ m_oldValue = m_oldPos = 0;
+ m_lineSize = 1;
}
bool wxSlider::Create(wxWindow *parent, wxWindowID id,
const wxValidator& validator,
const wxString& name)
{
- return false;
-}
-
-bool wxSlider::MSWOnScroll(int WXUNUSED(orientation), WXWORD wParam,
- WXWORD WXUNUSED(pos), WXHWND control)
-{
- return false;
+ // wxSL_AUTOTICKS is ignored - always on
+ // wxSL_LABELS is ignored - always off
+ // wxSL_LEFT is ignored - always off
+ // wxSL_RIGHT is ignored - always off
+ // wxSL_TOP is ignored - always off
+ // wxSL_SELRANGE is ignored - always off
+ // wxSL_VERTICAL is impossible in native form
+ wxCHECK_MSG(!(style & wxSL_VERTICAL), false, _T("non vertical slider on PalmOS"));
+
+ if(!wxControl::Create(parent, id, pos, size, style, validator, name))
+ return false;
+
+ FormType* form = (FormType*)GetParentForm();
+ if(form==NULL)
+ return false;
+
+ m_oldValue = m_oldPos = value;
+
+ wxCoord x = pos.x == wxDefaultCoord ? 0 : pos.x,
+ y = pos.y == wxDefaultCoord ? 0 : pos.y,
+ w = size.x == wxDefaultCoord ? 1 : size.x,
+ h = size.y == wxDefaultCoord ? 1 : size.y;
+
+ AdjustForParentClientOrigin(x, y);
+
+ SliderControlType *slider = CtlNewSliderControl (
+ (void **)&form,
+ GetId(),
+ feedbackSliderCtl,
+ NULL,
+ 0,
+ 0,
+ x,
+ y,
+ w,
+ h,
+ minValue,
+ maxValue,
+ 1,
+ value
+ );
+
+ if(slider==NULL)
+ return false;
+
+ SetInitialBestSize(size);
+ Show();
+ return true;
}
wxSlider::~wxSlider()
{
}
-int wxSlider::GetValue() const
+int wxSlider::GetMin() const
{
- return 0;
+ ControlType *control = (ControlType *)GetObjectPtr();
+ if(control==NULL)
+ return 0;
+ uint16_t ret;
+ CtlGetSliderValues(control, &ret, NULL, NULL, NULL);
+ return ret;
}
-void wxSlider::SetValue(int value)
+int wxSlider::GetMax() const
{
+ ControlType *control = (ControlType *)GetObjectPtr();
+ if(control==NULL)
+ return 0;
+ uint16_t ret;
+ CtlGetSliderValues(control, NULL, &ret, NULL, NULL);
+ return ret;
}
-void wxSlider::DoGetSize(int *width, int *height) const
+int wxSlider::GetPageSize() const
{
+ ControlType *control = (ControlType *)GetObjectPtr();
+ if(control==NULL)
+ return 0;
+ uint16_t ret;
+ CtlGetSliderValues(control, NULL, NULL, &ret, NULL);
+ return ret;
}
-void wxSlider::GetPosition(int *x, int *y) const
+int wxSlider::GetValue() const
{
+ ControlType *control = (ControlType *)GetObjectPtr();
+ if(control==NULL)
+ return 0;
+ uint16_t ret;
+ CtlGetSliderValues(control, NULL, NULL, NULL, &ret);
+ return ValueInvertOrNot(ret);
}
-void wxSlider::DoSetSize(int x, int y, int width, int height, int sizeFlags)
+void wxSlider::SetValue(int value)
{
+ SetIntValue(ValueInvertOrNot(value));
+ m_oldValue = m_oldPos = value;
}
-
wxSize wxSlider::DoGetBestSize() const
{
- return wxSize(0,0);
+ // 15 is taken as used in one of official samples
+ // 45 is dummy height tripled, any idea what's better ?
+ return wxSize(45,15);
}
-void wxSlider::SetRange(int minValue, int maxValue)
-{
-}
-
-WXHBRUSH wxSlider::OnCtlColor(WXHDC pDC, WXHWND pWnd, WXUINT nCtlColor,
- WXUINT message, WXWPARAM wParam, WXLPARAM lParam)
+void wxSlider::SetRange(int WXUNUSED(minValue), int WXUNUSED(maxValue))
{
- return 0;
+ // unsupported feature
}
-void wxSlider::SetTickFreq(int n, int pos)
+void wxSlider::SetTickFreq(int WXUNUSED(n), int WXUNUSED(pos))
{
+ // unsupported feature
}
void wxSlider::SetPageSize(int pageSize)
{
-}
-
-int wxSlider::GetPageSize() const
-{
- return 0;
+ ControlType *control = (ControlType *)GetObjectPtr();
+ if(control==NULL)
+ return;
+ uint16_t val = pageSize;
+ CtlSetSliderValues(control, NULL, NULL, &val, NULL);
}
void wxSlider::ClearSel()
{
+ // unsupported feature
}
void wxSlider::ClearTicks()
{
+ // unsupported feature
}
void wxSlider::SetLineSize(int lineSize)
{
+ m_lineSize = lineSize;
}
int wxSlider::GetLineSize() const
{
- return 0;
+ return m_lineSize;
}
int wxSlider::GetSelEnd() const
{
- return 0;
+ // unsupported feature
+ return GetValue();
}
int wxSlider::GetSelStart() const
{
- return 0;
+ // unsupported feature
+ return GetValue();
}
-void wxSlider::SetSelection(int minPos, int maxPos)
+void wxSlider::SetSelection(int WXUNUSED(minPos), int WXUNUSED(maxPos))
{
+ // unsupported feature
}
-void wxSlider::SetThumbLength(int len)
+void wxSlider::SetThumbLength(int WXUNUSED(len))
{
+ // unsupported feature
}
int wxSlider::GetThumbLength() const
{
+ // unsupported feature
return 0;
}
-void wxSlider::SetTick(int tickPos)
+int wxSlider::GetTickFreq() const
{
+ // unsupported feature
+ return GetPageSize();
}
-bool wxSlider::ContainsHWND(WXHWND hWnd) const
+void wxSlider::SetTick(int WXUNUSED(tickPos))
{
- return false;
+ // unsupported feature
}
-void wxSlider::Command (wxCommandEvent & event)
+// ----------------------------------------------------------------------------
+// helpers
+// ----------------------------------------------------------------------------
+
+bool wxSlider::SendUpdatedEvent()
{
+ m_oldPos = GetValue();
+
+ // first thumb event
+ wxScrollEvent eventWxTrack(wxEVT_SCROLL_THUMBRELEASE, GetId());
+ eventWxTrack.SetPosition(m_oldPos);
+ eventWxTrack.SetEventObject(this);
+ bool handled = GetEventHandler()->ProcessEvent(eventWxTrack);
+
+ // then slider event if position changed
+ if( m_oldValue != m_oldPos )
+ {
+ m_oldValue = m_oldPos;
+ wxCommandEvent event(wxEVT_COMMAND_SLIDER_UPDATED, GetId());
+ event.SetEventObject(this);
+ event.SetInt(m_oldPos);
+ return ProcessCommand(event);
+ }
+
+ return handled;
}
-bool wxSlider::Show(bool show)
+bool wxSlider::SendScrollEvent(WXEVENTPTR event)
+{
+ const EventType* palmEvent = (EventType*)event;
+ int newPos = ValueInvertOrNot(palmEvent->data.ctlRepeat.value);
+ if ( newPos == m_oldPos )
+ {
+ // nothing changed since last event
+ return false;
+ }
+
+ m_oldPos = newPos;
+
+ // first track event
+ wxScrollEvent eventWx(wxEVT_SCROLL_THUMBTRACK, GetId());
+ eventWx.SetPosition(newPos);
+ eventWx.SetEventObject(this);
+ return GetEventHandler()->ProcessEvent(eventWx);
+}
+
+void wxSlider::Command (wxCommandEvent & event)
{
- return false;
}
#endif // wxUSE_SLIDER