trunk/ext/tk/sample/demos-jp/hello


1
2
3
4
5
6
7
8
9
10

#!/usr/bin/env ruby
# -*- coding: euc-jp -*-
require 'tk'

TkButton.new(nil,
	'text'=>"こんにちは、世界",
	'command'=>proc{print "こんにちは、世界\n"; exit}
).pack

Tk.mainloop