Xojo Documentation Xojo Documentation

For web apps, see WebSlider.

Class (inherits from RectControl)

The slider control used by desktop applications. As the user moves the slider, the Value property changes. To create a vertical slider, make the height greater than the width.

Events

Close GotFocus MouseExit ConstructContextualMenu KeyDown MouseMove ContextualMenuAction KeyUp MouseUp DragEnter LostFocus MouseWheel DragExit MouseDown Open DragOver MouseDrag ValueChanged DropObject MouseEnter

Properties

Active LockRight TabIndex AllowAutoDeactivate LockTop TickMarkStyle AllowLiveScrolling MaximumValue Tooltip AllowTabStop MinimumValue Top Enabled MouseCursor Transparent Handle MouseX TrueWindow Height MouseY Value Index Name Visible Left PageStep Width LineStep PanelIndex Window LockBottom Parent LockLeft Scope

Methods

AcceptFileDrop AcceptTextDrop Invalidate AcceptPictureDrop Close Refresh AcceptRawDataDrop DrawInto SetFocus

Notes

Sliders default to a height of 23 pixels so they use the normal size on all platforms.

On macOS Sierra (10.12) and later, vertical sliders no longer appear automatically when the height is greater than the width. To enable a vertical slider, put this code in the Open event handler for the Slider:

Declare Sub setVertical Lib "Cocoa" Selector "setVertical:" (windowRef As Integer, id As Boolean)
setVertical(Me.Handle, True)

Examples

Changing the maximum value of a Slider at runtime:

Slider1.MaximumValue = 200

Setting the text of TextField1 to the value of the slider when the user scrolls.

Sub ValueChanged()
TextField1.Value = Str(Slider1.Value)
End Sub

See Also

RectControl class; Scrollbar control; TickMarkStyles enum.