hello4.tk

来自「Linux程序设计(原书第2版)源码」· TK 代码 · 共 9 行

#!/usr/bin/wish -f

option readfile hello.def
pack [button .b -text "Hello\nWorld!!!" \
                -justify center \
                -width 20 \
                -command {puts "Hi"}]
bind .b <Control-Button-1> {puts "Help!"}