[REBOL] text-list questions (probably answered before)
From: peoyli:algonet:se at: 17-Apr-2001 15:45
Hello there,
Here is a collection of text-list related problems I have gotten so
far:
1. how do I set the slider to the 'correct' position on a rebuild ?
2. is there a way to disable multi-selection of items in the list ?
3. how do I get rid of the white area below the last entry ?
see the example for solutions on how to keep the previous
item selection, and to have the same visible items in the list after
the rebuild.
-------------
[
REBOL []
list-items: {some items to play around with in the list. Specific problems I
have is all related to rebuilding the list}
list-block: parse list-items " "
build-layout: func [
{Build the test layout}
][
l: layout [
tl: text-list 100x140 data list-block [
if not none? tl/picked [ print first tl/picked ]
]
button "Rebuild" [
old-picked: tl/picked ; save old selection
old-sn: tl/sn ; save old visible area
build-layout ; rebuild
tl/picked: old-picked ; initial selection is what was before
tl/sn: old-sn ; make what was visible before visible again
; how do I set the slider to the same position as before, or to match the tl/sn value
?
view center-face l ; view the layout
]
]
]
build-layout
view center-face l
]
/PeO