1 /////////////////////////////////////////////////////////////////////////////
2 // Name: src/palmos/slider.cpp
4 // Author: William Osborne - minimal working wxPalmOS port
5 // Modified by: Wlodzimierz ABX Skiba - native implementation
8 // Copyright: (c) William Osborne, Wlodzimierz Skiba
9 // Licence: wxWindows licence
10 /////////////////////////////////////////////////////////////////////////////
12 // For compilers that support precompilation, includes "wx.h".
13 #include "wx/wxprec.h"
21 #include "wx/slider.h"
28 #include "wx/toplevel.h"
33 #if wxUSE_EXTENDED_RTTI
34 WX_DEFINE_FLAGS( wxSliderStyle
)
36 wxBEGIN_FLAGS( wxSliderStyle
)
37 // new style border flags, we put them first to
38 // use them for streaming out
39 wxFLAGS_MEMBER(wxBORDER_SIMPLE
)
40 wxFLAGS_MEMBER(wxBORDER_SUNKEN
)
41 wxFLAGS_MEMBER(wxBORDER_DOUBLE
)
42 wxFLAGS_MEMBER(wxBORDER_RAISED
)
43 wxFLAGS_MEMBER(wxBORDER_STATIC
)
44 wxFLAGS_MEMBER(wxBORDER_NONE
)
46 // old style border flags
47 wxFLAGS_MEMBER(wxSIMPLE_BORDER
)
48 wxFLAGS_MEMBER(wxSUNKEN_BORDER
)
49 wxFLAGS_MEMBER(wxDOUBLE_BORDER
)
50 wxFLAGS_MEMBER(wxRAISED_BORDER
)
51 wxFLAGS_MEMBER(wxSTATIC_BORDER
)
52 wxFLAGS_MEMBER(wxBORDER
)
54 // standard window styles
55 wxFLAGS_MEMBER(wxTAB_TRAVERSAL
)
56 wxFLAGS_MEMBER(wxCLIP_CHILDREN
)
57 wxFLAGS_MEMBER(wxTRANSPARENT_WINDOW
)
58 wxFLAGS_MEMBER(wxWANTS_CHARS
)
59 wxFLAGS_MEMBER(wxFULL_REPAINT_ON_RESIZE
)
60 wxFLAGS_MEMBER(wxALWAYS_SHOW_SB
)
61 wxFLAGS_MEMBER(wxVSCROLL
)
62 wxFLAGS_MEMBER(wxHSCROLL
)
64 wxFLAGS_MEMBER(wxSL_HORIZONTAL
)
65 wxFLAGS_MEMBER(wxSL_VERTICAL
)
66 wxFLAGS_MEMBER(wxSL_AUTOTICKS
)
67 wxFLAGS_MEMBER(wxSL_LABELS
)
68 wxFLAGS_MEMBER(wxSL_LEFT
)
69 wxFLAGS_MEMBER(wxSL_TOP
)
70 wxFLAGS_MEMBER(wxSL_RIGHT
)
71 wxFLAGS_MEMBER(wxSL_BOTTOM
)
72 wxFLAGS_MEMBER(wxSL_BOTH
)
73 wxFLAGS_MEMBER(wxSL_SELRANGE
)
75 wxEND_FLAGS( wxSliderStyle
)
77 IMPLEMENT_DYNAMIC_CLASS_XTI(wxSlider
, wxControl
,"wx/slider.h")
79 wxBEGIN_PROPERTIES_TABLE(wxSlider
)
80 wxEVENT_RANGE_PROPERTY( Scroll
, wxEVT_SCROLL_TOP
, wxEVT_SCROLL_ENDSCROLL
, wxScrollEvent
)
81 wxEVENT_PROPERTY( Updated
, wxEVT_COMMAND_SLIDER_UPDATED
, wxCommandEvent
)
83 wxPROPERTY( Value
, int , SetValue
, GetValue
, 0, 0 /*flags*/ , wxT("Helpstring") , wxT("group"))
84 wxPROPERTY( Minimum
, int , SetMin
, GetMin
, 0 , 0 /*flags*/ , wxT("Helpstring") , wxT("group"))
85 wxPROPERTY( Maximum
, int , SetMax
, GetMax
, 0 , 0 /*flags*/ , wxT("Helpstring") , wxT("group"))
86 wxPROPERTY( PageSize
, int , SetPageSize
, GetLineSize
, 1 , 0 /*flags*/ , wxT("Helpstring") , wxT("group"))
87 wxPROPERTY( LineSize
, int , SetLineSize
, GetLineSize
, 1 , 0 /*flags*/ , wxT("Helpstring") , wxT("group"))
88 wxPROPERTY( ThumbLength
, int , SetThumbLength
, GetThumbLength
, 1 , 0 /*flags*/ , wxT("Helpstring") , wxT("group"))
89 wxPROPERTY_FLAGS( WindowStyle
, wxSliderStyle
, long , SetWindowStyleFlag
, GetWindowStyleFlag
, EMPTY_MACROVALUE
, 0 /*flags*/ , wxT("Helpstring") , wxT("group")) // style
90 wxEND_PROPERTIES_TABLE()
92 wxBEGIN_HANDLERS_TABLE(wxSlider
)
93 wxEND_HANDLERS_TABLE()
95 wxCONSTRUCTOR_8( wxSlider
, wxWindow
* , Parent
, wxWindowID
, Id
, int , Value
, int , Minimum
, int , Maximum
, wxPoint
, Position
, wxSize
, Size
, long , WindowStyle
)
97 IMPLEMENT_DYNAMIC_CLASS(wxSlider
, wxControl
)
101 void wxSlider::Init()
103 m_oldValue
= m_oldPos
= 0;
107 bool wxSlider::Create(wxWindow
*parent
, wxWindowID id
,
108 int value
, int minValue
, int maxValue
,
110 const wxSize
& size
, long style
,
111 const wxValidator
& validator
,
112 const wxString
& name
)
114 // wxSL_AUTOTICKS is ignored - always on
115 // wxSL_LABELS is ignored - always off
116 // wxSL_LEFT is ignored - always off
117 // wxSL_RIGHT is ignored - always off
118 // wxSL_TOP is ignored - always off
119 // wxSL_SELRANGE is ignored - always off
120 // wxSL_VERTICAL is impossible in native form
121 wxCHECK_MSG(!(style
& wxSL_VERTICAL
), false, _T("non vertical slider on PalmOS"));
123 if(!wxControl::Create(parent
, id
, pos
, size
, style
, validator
, name
))
126 FormType
* form
= (FormType
*)GetParentForm();
130 m_oldValue
= m_oldPos
= value
;
132 wxCoord x
= pos
.x
== wxDefaultCoord
? 0 : pos
.x
,
133 y
= pos
.y
== wxDefaultCoord
? 0 : pos
.y
,
134 w
= size
.x
== wxDefaultCoord
? 1 : size
.x
,
135 h
= size
.y
== wxDefaultCoord
? 1 : size
.y
;
137 AdjustForParentClientOrigin(x
, y
);
139 SliderControlType
*slider
= CtlNewSliderControl (
159 SetInitialBestSize(size
);
164 wxSlider::~wxSlider()
168 int wxSlider::GetMin() const
170 ControlType
*control
= (ControlType
*)GetObjectPtr();
174 CtlGetSliderValues(control
, &ret
, NULL
, NULL
, NULL
);
178 int wxSlider::GetMax() const
180 ControlType
*control
= (ControlType
*)GetObjectPtr();
184 CtlGetSliderValues(control
, NULL
, &ret
, NULL
, NULL
);
188 int wxSlider::GetPageSize() const
190 ControlType
*control
= (ControlType
*)GetObjectPtr();
194 CtlGetSliderValues(control
, NULL
, NULL
, &ret
, NULL
);
198 int wxSlider::GetValue() const
200 ControlType
*control
= (ControlType
*)GetObjectPtr();
204 CtlGetSliderValues(control
, NULL
, NULL
, NULL
, &ret
);
205 return ValueInvertOrNot(ret
);
208 void wxSlider::SetValue(int value
)
210 SetIntValue(ValueInvertOrNot(value
));
211 m_oldValue
= m_oldPos
= value
;
214 wxSize
wxSlider::DoGetBestSize() const
216 // 15 is taken as used in one of official samples
217 // 45 is dummy height tripled, any idea what's better ?
218 return wxSize(45,15);
222 void wxSlider::SetRange(int WXUNUSED(minValue
), int WXUNUSED(maxValue
))
224 // unsupported feature
227 void wxSlider::SetTickFreq(int WXUNUSED(n
), int WXUNUSED(pos
))
229 // unsupported feature
232 void wxSlider::SetPageSize(int pageSize
)
234 ControlType
*control
= (ControlType
*)GetObjectPtr();
237 uint16_t val
= pageSize
;
238 CtlSetSliderValues(control
, NULL
, NULL
, &val
, NULL
);
241 void wxSlider::ClearSel()
243 // unsupported feature
246 void wxSlider::ClearTicks()
248 // unsupported feature
251 void wxSlider::SetLineSize(int lineSize
)
253 m_lineSize
= lineSize
;
256 int wxSlider::GetLineSize() const
261 int wxSlider::GetSelEnd() const
263 // unsupported feature
267 int wxSlider::GetSelStart() const
269 // unsupported feature
273 void wxSlider::SetSelection(int WXUNUSED(minPos
), int WXUNUSED(maxPos
))
275 // unsupported feature
278 void wxSlider::SetThumbLength(int WXUNUSED(len
))
280 // unsupported feature
283 int wxSlider::GetThumbLength() const
285 // unsupported feature
289 int wxSlider::GetTickFreq() const
291 // unsupported feature
292 return GetPageSize();
295 void wxSlider::SetTick(int WXUNUSED(tickPos
))
297 // unsupported feature
300 // ----------------------------------------------------------------------------
302 // ----------------------------------------------------------------------------
304 bool wxSlider::SendUpdatedEvent()
306 m_oldPos
= GetValue();
309 wxScrollEvent
eventWxTrack(wxEVT_SCROLL_THUMBRELEASE
, GetId());
310 eventWxTrack
.SetPosition(m_oldPos
);
311 eventWxTrack
.SetEventObject(this);
312 bool handled
= GetEventHandler()->ProcessEvent(eventWxTrack
);
314 // then slider event if position changed
315 if( m_oldValue
!= m_oldPos
)
317 m_oldValue
= m_oldPos
;
318 wxCommandEvent
event(wxEVT_COMMAND_SLIDER_UPDATED
, GetId());
319 event
.SetEventObject(this);
320 event
.SetInt(m_oldPos
);
321 return ProcessCommand(event
);
327 bool wxSlider::SendScrollEvent(WXEVENTPTR event
)
329 const EventType
* palmEvent
= (EventType
*)event
;
330 int newPos
= ValueInvertOrNot(palmEvent
->data
.ctlRepeat
.value
);
331 if ( newPos
== m_oldPos
)
333 // nothing changed since last event
340 wxScrollEvent
eventWx(wxEVT_SCROLL_THUMBTRACK
, GetId());
341 eventWx
.SetPosition(newPos
);
342 eventWx
.SetEventObject(this);
343 return GetEventHandler()->ProcessEvent(eventWx
);
346 void wxSlider::Command (wxCommandEvent
& event
)
350 #endif // wxUSE_SLIDER