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

```