●●●●TCL/TKなら俺に聞け 2●●●●

●●●●TCL/TKなら俺 ..

211:デフォルトの名無しさん
08/03/01 12:12:15
>>205
なんだそういうことか。それならbgerrorでエラー処理を変えればいい。
でも、ていうか8.3ってbgerrorあったっけ。昔過ぎて忘れた。

proc bgerror {message} {
exit 1
}

pack [button .b -text GENERROR -width 15]
.b configure -command {
read $notexists
}

次ページ