tcl - tcl中干预 "after"的方法

Question

我写了一个 tcl 脚本，中间有 20 秒的等待时间。有时我必须从中间的等待(或者更确切地说是停止)中走出来。我用过了:20000之后

有办法停止等待吗？

Answer 1

如果您只是使用:

after 20000

那么不，没有办法(当然，除了使用 Ctrl+C 或 kill 终止进程)。

如果您希望在 Tcl 中进行可中断的等待，请使用以下命令:

after 20000 set done 1
vwait done

这将继续为事件提供服务，因此可以被中断。保存 after 20000 set did 1 返回的 token ，您可以取消计时器(例如，如果您想重新安排它)。否则，请自行设置(全局 done)变量，您将更快完成等待。