uiform progress

(progress . args)

The uiform progress element shows a progress bar.

Parameter	Default	Description
height	32	Progress bar height in pixel
value	0.	Progress value (range 0. to 1.)

Example

Example 1: A complete page definition with a progress bar from LNhealth's apps/WidgetDemo

(ex_progress
  "ProgressBar"
  ("Prev" ex_images)
  ("Next" ex_modal)
  (spacer)
  (label text "Making some progress..")
  (spacer)
  (progress value ,(lambda () 
    (let ((val (uiget 'progressval 0.)))
      (uiset 'progressval (if (> val 1.) 0. (+ val 0.01)))
      val)))
  (spacer)
)