uiform slider

(slider . args)

The uiform slider element creates a slider.

Parameter	Default	Description
id	#f	Variable to store current value
labels	'("" "") No labels	List of 2 (left and right ends) or 3 (left, middle, and right) labels to show above the slider
min	0	Minimum slider value (left end)
max	100	Maximum slider value (right end)
default	""	Default slider value
h	(+ (uiget 'rowh) 20) (20 larger than a regular row)	The height of the slider plus labels above it
number	#t	Whether to label the slider box with the current value
location	'db	Slider variable storage location
required	#f	Whether this field is required

Example

A complete page definition with different slider options, from LNhealth's apps/WidgetDemo

(ex_sliders
  "Sliders"
  ("Prev" ex_sensors)
  #f
  (spacer height 70)
  (label text "Simple small blank slider")
  (slider id dummy_slide1 number #f location ui h 48)
  (spacer height 5)
  ,(lambda ()
     (let ((value (uiget 'dummy_slide1 50)))
       `(label text ,(string-append "Value is " (number->string value)))))
  (spacer height 70)
  (label text "Labelled slider")
  (spacer height 5)
  (slider id dummy_slide2 labels ("Left" "Middle" "Right") min 0 max 10)
)