[ALLY] Re: text-list scrolling from program?

From: carl:cybercraft at: 4-Nov-2000 16:18

Hi Ingo,

On 03-Nov-00, Ingo Hohmann wrote:

> Hi Allies,

> if I set the /picked line in a text-list programmatically,
> this may be scrolled out of the display, how can I let the
> text-list scroll to show the picked line?

I've been playing with lists and know how to scroll them and point
them at any line you want, (see the script below, specifically the
First and Fifth buttons), but I don't know how to show a picked item!
(Well, not properly, anway.)  So, how do you do it? (:

Carl Read.

rebol [
    Title: "List Example"
]

list-block: ["aaa" "bbb" "ccc" "ddd" "eee" "fff" "ggg"]

list-window: view layout [
    the-list: list 206x64 180.180.180 [text 206x15 []]
    data list-block map [text]
    supply [
        face/text: pick list-block count
        face/data: count
    ]
    across
    button "up" [
        list-block: back list-block show the-list
    ]
    button "down" [
        list-block: next list-block show the-list
    ]
    return
    button "first" [
        list-block: head list-block show the-list
    ]
    button "fifth" [
        list-block: skip head list-block 4 show the-list
    ]
]

do list-window

1 · 2 · [3] · 4 · See whole thread