CreateSlider

CreateSlider

Command Index · BlitzPlus · Gadgets

CreateSlider:Int32 x:Int32, y:Int32, width:Int32, height:Int32, group:Int32, style:Int32=1

Parameter	Mode	Type	Default	Description
x	In	Int32	required	Horizontal position inside the group.
y	In	Int32	required	Vertical position inside the group.
width	In	Int32	required	Width of the slider.
height	In	Int32	required	Height of the slider.
group	In	Int32	required	Window, panel, tabber or canvas that holds it.
style	In	Int32	1	1 for horizontal or 2 for vertical, plus 65536 for not following the group. Defaults to 1.

Returns: A handle for the slider.

Description

Makes a scroll bar the user can drag. Style 1 is horizontal and 2 is vertical, and 65536 can be added to not follow the group when it is resized. The range is set with SetSliderRange and a $401 event with the new value arrives when it moves. SliderValue reads it at any time.

Examples

Graphics 320, 240, 32, 2
win = CreateWindow("Slider", 10, 10, 300, 140, Desktop(), 3)
sl  = CreateSlider(10, 10, 270, 22, win, 1)
SetSliderRange sl, 10, 110
Repeat
	e = WaitEvent()
	If e = $401 Then SetGadgetText win, "Value " + SliderValue(sl)
Until e = $803

Media

Related Commands

CreateButton, CreateComboBox, CreateHtmlView 〔BlitzLLVM〕, CreateLabel, CreateListBox, CreatePanel, CreateProgBar, CreateTabber

Command Index · BlitzPlus · Gadgets