On Fri, Jul 18, 2008 at 2:22 PM, _why <[EMAIL PROTECTED]> wrote: > On Thu, Jul 17, 2008 at 12:28:21PM +0200, Jo Vermeulen wrote: > > I modified it a bit, and I get the rectangles, but when I click OK, the > > window is just blank, it doesn't recreate the rectangles and button. > Here's > > my code: > > Here's an updated version: > > Shoes.app :width => 400, :height => 500 do > rectangles = proc do > 20.times do > nostroke > fill rgb(rand(0.6) + 0.4, rand(0.1) + 0.9, rand(0.2) + 0.8, > rand(0.4) + 0.1) > r = rand(300) + 60 # radius > rect rand(100), rand(200), r, r > end > button "OK", :top => 300, :left => 400 do > # clear wipes out the window and uses the passed block to repaint > # it again. > clear &rectangles > end > end > rectangles.call > end > > I'll update the blog entry as well. Thankyou! >
Works perfectly, thanks! -- Jo
