[REBOL] Re: Layout
From: gscottjones:mchsi at: 20-Sep-2002 17:18
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
