[ALLY] Re: Layout Bind or Context in stylized Layouts
From: larry:ecotope at: 13-Nov-2000 17:55
Hi Jeff
I have been curious about MULTI object as well, it only appeared in recent
exper builds, and so far no docs. For discussion purposes, here is a section
snipped from the BOX style in vid-styles.
multi:
make object! [
text: func [face blk][
if pick blk 1 [
face/text: first blk
face/texts: copy blk
]
]
size: func [face blk][
if pick blk 1 [
if pair? first blk [face/size: first blk]
if integer? first blk [
if none? face/size [face/size: -1x-1]
face/size/x: first blk
]
]
]
file: func [face blk][
if pick blk 1 [face/file: first blk face/image: load-image first
blk]
]
color: func [face blk][
if pick blk 1 [
either flag-face? face text [
set-font face color first blk
if pick blk 2 [face/color: second blk]
] [
face/color: first blk
]
if pick blk 2 [face/colors: copy blk]
]
]
block: func [face blk][
if pick blk 1 [
face/action: func [face value] pick blk 1
if pick blk 2 [face/alt-action: func [face value] pick blk
2]
]
]
]
Hoping for further enlightenment.
-Larry