1998-01-16 12:13:05 +00:00
|
|
|
require "tk"
|
|
|
|
|
|
1998-01-16 12:19:22 +00:00
|
|
|
TkButton.new(nil,
|
|
|
|
|
'text' => 'hello',
|
|
|
|
|
'command' => proc{print "hello\n"}).pack('fill'=>'x')
|
|
|
|
|
TkButton.new(nil,
|
|
|
|
|
'text' => 'quit',
|
|
|
|
|
'command' => 'exit').pack('fill'=>'x')
|
|
|
|
|
|
1998-01-16 12:13:05 +00:00
|
|
|
Tk.mainloop
|
