[REBOL] Re: dynamic faces
From: sunandadh:aol at: 24-Dec-2001 7:52
> I'd like to modify the data refinement of some progress faces that i've
> created before.
> I can create dynamicaly the faces but how to change the data refinement ?
> Thanx in advance and Merry Christmas :)
Here's a quick hack of your code. It works, but I'm sure others can fix it up
better. what I've done:
1. split the Append into an Append and an append/Only. This is an easy way to
get the extra pair of  around the action facet
2. Simplified some of the expressions
3. Put a Print Mold in immediately before the View. That way you can see what
is about to be viewed.
4. Changed the View Load Monlayout to View Load Mold Monlayout
Without this last change the set-words in your MonLayout block are in the
wrong context, and the slider never updates.
The true experts will probably advise that you start over again, and use
Hope that helps,
monlayout: copy 
for i 1 2 2 [
append monlayout reduce [
to-set-word rejoin ["progress" i ] 'progress 12x100
'button rejoin ["modif " i]
append/only monlayout reduce [
to-set-word join "progress" [i "/data"] 0.5
'show to-word join 'progress i
append monlayout [
button "Source" [source monlayout]
button "Quitter" [quit]
print mold monlayout
view layout load mold monlayout