[REBOL] Generic unview/only
From: atruter::hih::com::au at: 28-May-2002 17:32
As a public service I offer the following code to those who seek a simple
alternative to the VIEW/VID LIFO unview model (apologies in advance if most
folks have already figured this out . . . it had me stumped for a while so
I thought I'd save someone else the frustration ;) )
<CODE>
REBOL []
show-win: func [handle at] [
view/new/offset set handle layout [
button join "Close " handle compose [unview/only (handle)]
] at
]
show-win 'A 100x100
show-win 'B 200x200
show-win 'C 300x300
show-win 'D 400x400
do-events
</CODE>
Regards,
Ashley
