User`s guide

btn.smov = 8
btn.sup = 9
btn.dclk = 3
; Slide bar position and start-up values
x = 20
y = 60
length = 200
max.pos = 100
arrow_inc = 10
handle_pos = 50
; Enable monitoring of slide bars and pointer drags
FSET (glun) "/event object move_b2"
; Display the slide bar
GSLIDE (glun, 0) 1 = x, y, length, max_pos, arrow_inc, handle_pos
; Begin monitoring events and take action when the slide bar ; is moved.
Monitor
; events until a double click is detected, then delete the
; slide bar
DO
GETEVENT (glun) event[]
IF (event[0] == btn.smov) OR (event[0] == btn.sup THEN
; Your code to monitor the slide bar value (event[2]) goes
; here
END
UNTIL event[0] == btn.dclk
; Delete the slide bar
GSLIDE (glun, 1) 1
Creating a Slide Bar
V+Language User's Guide, v17.0
Page 256