+++ /dev/null
-/////////////////////////////////////////////////////////////////////////////
-// Name: src/palmos/slider.cpp
-// Purpose: wxSlider
-// Author: William Osborne - minimal working wxPalmOS port
-// Modified by: Wlodzimierz ABX Skiba - native implementation
-// Created: 10/13/04
-// RCS-ID: $Id$
-// Copyright: (c) William Osborne, Wlodzimierz Skiba
-// Licence: wxWindows licence
-/////////////////////////////////////////////////////////////////////////////
-
-// For compilers that support precompilation, includes "wx.h".
-#include "wx/wxprec.h"
-
-#ifdef __BORLANDC__
-#pragma hdrstop
-#endif
-
-#if wxUSE_SLIDER
-
-#include "wx/slider.h"
-
-#ifndef WX_PRECOMP
- #include "wx/utils.h"
- #include "wx/brush.h"
- #include "wx/toplevel.h"
-#endif
-
-#include <Form.h>
-#include <Control.h>
-
-// Slider
-void wxSlider::Init()
-{
- m_oldValue = m_oldPos = 0;
- m_lineSize = 1;
-}
-
-bool wxSlider::Create(wxWindow *parent, wxWindowID id,
- int value, int minValue, int maxValue,
- const wxPoint& pos,
- const wxSize& size, long style,
- const wxValidator& validator,
- const wxString& name)
-{
- // 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, wxT("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);
-
-#ifdef __WXPALMOS6__
- SliderControlType *slider = CtlNewSliderControl (
- (void **)&form,
- GetId(),
- feedbackSliderCtl,
- NULL,
- 0,
- 0,
- x,
- y,
- w,
- h,
- minValue,
- maxValue,
- 1,
- value
- );
-#else // __WXPALMOS5__
- //SliderControlType *CtlNewSliderControl (void **formPP, UInt16 ID, ControlStyleType style, DmResID thumbID,
- // DmResID backgroundID, Coord x, Coord y, Coord width, Coord height, UInt16 minValue, UInt16 maxValue,
- // UInt16 pageSize, UInt16 value);
- SliderControlType *slider = CtlNewSliderControl ((void **)&form,
- GetId(),
- feedbackSliderCtl,//style
- 0,//thumbID
- 0,//backgroundid
- x, y, w, h, minValue, maxValue, 1, value);
-#endif // __WXPALMOS6__/__WXPALMOS5__
-
- if(slider==NULL)
- return false;
-
- SetInitialSize(size);
- Show();
- return true;
-}
-
-wxSlider::~wxSlider()
-{
-}
-
-int wxSlider::GetMin() const
-{
- ControlType *control = (ControlType *)GetObjectPtr();
- if(control==NULL)
- return 0;
- uint16_t ret;
- CtlGetSliderValues(control, &ret, NULL, NULL, NULL);
- return ret;
-}
-
-int wxSlider::GetMax() const
-{
- ControlType *control = (ControlType *)GetObjectPtr();
- if(control==NULL)
- return 0;
- uint16_t ret;
- CtlGetSliderValues(control, NULL, &ret, NULL, NULL);
- return ret;
-}
-
-int wxSlider::GetPageSize() const
-{
- ControlType *control = (ControlType *)GetObjectPtr();
- if(control==NULL)
- return 0;
- uint16_t ret;
- CtlGetSliderValues(control, NULL, NULL, &ret, NULL);
- return ret;
-}
-
-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::SetValue(int value)
-{
- SetIntValue(ValueInvertOrNot(value));
- m_oldValue = m_oldPos = value;
-}
-
-wxSize wxSlider::DoGetBestSize() const
-{
- // 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 WXUNUSED(minValue), int WXUNUSED(maxValue))
-{
- // unsupported feature
-}
-
-void wxSlider::DoSetTickFreq(int WXUNUSED(n))
-{
- // unsupported feature
-}
-
-void wxSlider::SetPageSize(int pageSize)
-{
- 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 m_lineSize;
-}
-
-int wxSlider::GetSelEnd() const
-{
- // unsupported feature
- return GetValue();
-}
-
-int wxSlider::GetSelStart() const
-{
- // unsupported feature
- return GetValue();
-}
-
-void wxSlider::SetSelection(int WXUNUSED(minPos), int WXUNUSED(maxPos))
-{
- // unsupported feature
-}
-
-void wxSlider::SetThumbLength(int WXUNUSED(len))
-{
- // unsupported feature
-}
-
-int wxSlider::GetThumbLength() const
-{
- // unsupported feature
- return 0;
-}
-
-int wxSlider::GetTickFreq() const
-{
- // unsupported feature
- return GetPageSize();
-}
-
-void wxSlider::SetTick(int WXUNUSED(tickPos))
-{
- // unsupported feature
-}
-
-// ----------------------------------------------------------------------------
-// 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 = HandleWindowEvent(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::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 HandleWindowEvent(eventWx);
-}
-
-void wxSlider::Command (wxCommandEvent & event)
-{
-}
-
-#endif // wxUSE_SLIDER
projects / wxWidgets.git / blobdiff