Mailing List Archive: 49091 messages
  • Home
  • Script library
  • AltME Archive
  • Mailing list
  • Articles Index
  • Site search
 

[REBOL] Re: dynamic faces

From: sunandadh:aol at: 24-Dec-2001 7:52

Hi Fabrice,
> 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 :) > Fab
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 Compose Hope that helps, Sunanda. unview/all monlayout: copy [] for i 1 2 2 [ append monlayout reduce [ to-set-word rejoin ["progress" i ] 'progress 12x100 'button rejoin ["modif " i] ];end-append append/only monlayout reduce [ to-set-word join "progress" [i "/data"] 0.5 'show to-word join 'progress i ]; append/only ];end-for append monlayout [ below button "Source" [source monlayout] button "Quitter" [quit] ];end-append print mold monlayout view layout load mold monlayout