411 REFERENCE · Wikibooks
Rebol Programming/request-list
Reference material by Wikibooks contributors. This retains its source identity and is not 411 news reporting.
USAGE:
REQUEST-LIST titl alist /offset xy
DESCRIPTION:
Requests a selection from a list.
REQUEST-LIST is a function value.
ARGUMENTS
titl -- (Type: string)
alist -- (Type: block)
REFINEMENTS
/offset
xy -- (Type: any)
SOURCE CODE
request-list: func [
"Requests a selection from a list."
titl [string!]
alist [block!] /offset xy /local rslt list-lay
][
list-lay: layout [
origin 10x10
h3 titl
text-list data alist [rslt: value hide-popup]
btn-cancel #"^[" [rslt: none hide-popup]
]
rslt: none
either offset [inform/offset list-lay xy] [inform list-lay]
rslt
]