[REBOL] Re: 'text-list information please!
From: ammonjohnson:ya:hoo at: 27-Dec-2001 15:55
This might help, it is a text-list with a custom update function created by
Gregg Irwin (Excellent Job!)
s: stylize [obj-list: text-list 125x240
with [
update-slider: does [
sld/data: 0 ; reset slider to top
sn: 0 ; force text to re-display correctly
sld/redrag lc / max 1 length? head lines
show sld
]
]
]
My-Lay: layout [
styles s
list: obj-list "Some Text" "For The List"
button "Change list" [
list/line-list: none
list/lines: ["Some Other" "Text" "For Example"]
list/update-slider
show list
]
]
HTH
Ammon
----- Original Message -----
From: "alan parman" <[reboler--programmer--net]>
To: <[rebol-list--rebol--com]>
Sent: Thursday, December 27, 2001 1:48 PM
Subject: [REBOL] 'text-list information please!
> What holds the data for the section of the text-list/data that is actually
visible.
> I've "probe mold"-ed and "probe first"-ed til I'm blue in the face and
can't seem to find it.
> I am using the following function to change the data in a text-list and
everything seems okay except for what is actually show in the list.
> If you scroll down in a long list, then change the list, everything
changes except what part of the list is currently shown. I need to move the
slider to jump to the top of the list.
> function follows:
>
> tell-list: func [fce value][
> append clear fce/data copy value
> clear fce/picked
> fce/sld/data: 0
> fce/line-list: none
> fce/sld/redrag fce/lc / max 1 length? head fce/lines ;resets slider size
> show fce
> ]
>
> --
>
> _______________________________________________
> Sign-up for your own FREE Personalized E-mail at Mail.com
> http://www.mail.com/?sr=signup
>
> 1 cent a minute calls anywhere in the U.S.!
>
http://www.getpennytalk.com/cgi-bin/adforward.cgi?p_key=RG9853KJ&url=http://
www.getpennytalk.com