Hilfe
SetSliderValue
Aufruf
Parameter
Rückgabewert
Beschreibung
Beispiel
Siehe auch
SetSliderValue slider, wert
Parameter
| slider | Identität eines Slider-Objekts |
| wert | Positionswert (ab 0) |
Rückgabewert
-
Beschreibung
Die Anweisung SetSliderValue setzt die Position von Slider-Objekt fest. Dieser Wert fängt ab 0 an und endet mit maximal eingestelltem Wert (Total minus Sichtbar).
Der Bewegungsbereich kann mit SetSliderRange
eingestellt werden. Aktuelle Position kann mit SliderValue abgefragt werden.
Beispiel
Diese Beispiel erzeugt ein Fenster mit einem Slider. Im Fenstertitel wird die Position des Sliders angezeigt:
window = CreateWindow ("Fenster", 0, 20, 400, 300, 0, 3)
slider = CreateSlider (0, 0, 200, 20, window)
SetSliderRange ( slider, 0, 100 )
Repeat
If GetKey () = 27 Then End
Select WaitEvent ()
Case $803
End
Case $401
SetGadgetText (window, "Sliderposition: " + SliderValue(slider))
End Select
Forever
slider = CreateSlider (0, 0, 200, 20, window)
SetSliderRange ( slider, 0, 100 )
Repeat
If GetKey () = 27 Then End
Select WaitEvent ()
Case $803
End
Case $401
SetGadgetText (window, "Sliderposition: " + SliderValue(slider))
End Select
Forever
Siehe auch
GUI Slider
2D Grafik
GUI