diff options
Diffstat (limited to 'ext/tk/sample/resource.ja')
| -rw-r--r-- | ext/tk/sample/resource.ja | 12 |
1 files changed, 12 insertions, 0 deletions
diff --git a/ext/tk/sample/resource.ja b/ext/tk/sample/resource.ja new file mode 100644 index 0000000000..61098db4f8 --- /dev/null +++ b/ext/tk/sample/resource.ja @@ -0,0 +1,12 @@ +# +# see Tcl/Tk's "options" manual for "Database Name" and "Database Class" +# +*BtnFrame.borderWidth: 5 +*BtnFrame.relief: ridge +*BtnFrame.Button.background: wheat +*BtnFrame.Button.foreground: red +*hello.text: こんにちは +*quit.text: 終了 +*BTN_CMD.show_msg: {|arg| print "($SAFE=#{$SAFE}) ";\ + print "こんにちは！！ #{arg} のサンプルです．\n"} +*BTN_CMD.bye_msg: {print "($SAFE=#{$SAFE}) さようなら．\n"} |