 |
|
BaselScript |
Beschreibung
Tile = seekbar
Schieber einer Seekbar verschieben.
Die folgenden Parameter werden verwendet:
w - Seekbarbreite in Pixel
max - max. Wert
Position - aktueller Wert (Schieberposition)
Beispiel:
scene = 1 name="tile seekbar"
section init
#volume_max = 100
#volume = 50
draw form
end section
form
tile = text name=#volume_txt x=10 y=540 w=800 h=180 text= "Volume" size = 35 color = blue gravity=center
tile = seekbar name=#sb1 x=10 y =590 w=760 h=200 max=#volume_max position= #volume section=volume
end form
section volume
// get last touch position
#volume = $touch_position()
message #volume
end section
end scene 1
Wenn Schieberegler berührt wird, wird “section volume” aufgerufen.