How do I display a value in a Rollout?
The following script is a test bed for value display in different User Interface elements.
It is intended to show how to update UI properties to give feedback to the user.
Copy the code into a new Script Editor, press Ctrl+E to evaluate and press the "Generate
New RANDOM Value" multiple times to see different methods to display the value in
the Rollout.
SCRIPT
|
rollout test_digits "Display Values"
(
group "Display"
(
spinner spinner_item "The Value:" range:[0,1000,0] align:#center fieldwidth:50
edittext edit_text_item "The Value:" text:""width:100 align:#center
button button_item "No Value" width:100 align:#center
label label_item "No Value" align:#center
progressbar progress_bar_item height:10 width:180 color:(color 255 100 100) orient:#horizontal
listbox list_box_item items:#()
)
button start_test "Generate New RANDOM Value..."
progressbar progress_bar2_item height:90 width:10 color:(color 255 100 100) orient:#vertical pos:[12,20]
on start_test pressed do
(
minValue = 0
maxValue = 100
theValue = random minValue maxValue
sliderTime = theValue
spinner_item.value = theValue
edit_text_item.text = theValue as string
button_item.text = theValue as string
label_item.text = theValue as string
progress_bar_item.value = 100.0*theValue/maxValue
progress_bar_item.color = color (255.0*theValue/maxValue) 128 0
progress_bar2_item.value = 100.0*theValue/maxValue
list_box_item.items = append list_box_item.items ("Value is now "+theValue as string)
list_box_item.selection = list_box_item.items.count
)--end on
)--end rollout
createDialog test_digits 200 300
|