From: "B-E-P"
> Thanks for your answer Carl,
> I had a look to
> http://www.rebol.com/how-to/subpanels.html
> but it's only a part of my answer.
> In fact I want to dynamically add a text
> followed by a box to a panel for each new entry
> to a Personal Information Manager. I was thinking
> that I could define a layout with these faces,
> and insert it to my main panel.
> Maybe there is a different way to do it, I don't know.
> so please au-secours!!! :-)

Hi, Bertrand,

I am not sure that I know exactly what you are looking for, but maybe it is
somewhere in this example.

data: ["Scott" "123 Main" "Carl" "456 Maple" "Bertrand" "789 Oak"]

lo-func: func [] [
    layout [
        origin 0x0
        text data/1
        area data/2
    ]
]

lo: layout [
    origin 10x10
    b: box 200x200
    button "Previous" [
        if not head? data [
            data: skip data -2
            b/pane: lo-func
            show b
        ]
    ]
    button "Next" [
        if not tail? data: skip data 2 [
            b/pane: lo-func
            show b
        ]
    ]
    do [b/pane: lo-func]
]

view lo

--Scott Jones

-- 
To unsubscribe from this list, please send an email to
[EMAIL PROTECTED] with "unsubscribe" in the 
subject, without the quotes.

Reply via email to