!
!  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 "(0 >>>) ";\
                          print "こんにちは！！ #{arg} のサンプルです．";\
                          print "(<<< 0)\n"}
*BTN_CMD.bye_msg:  {print "(0 >>>) さようなら．(<<< 0)\n"}
