From: Chris Alfeld <chris.alfeld@...>
Date: 2006-04-01T08:50:47+09:00
Subject: Re: Questions about Tk - Newbie

# This can be shortened at the expense of clarity.

require 'tk'

root = TkRoot.new
v = TkVariable.new('Foo')
e = TkEntry.new(root,'textvariable'=>v)
e.pack
b = TkButton.new(root,'text'=>'PrintFoo','command'=>proc {print v.value + "\n"})
b.pack

Tk.mainloop