关于在 tcl 中执行 *.file
对于此脚本: puts [exec cvs up *.tcl] 我想更新此文件夹下的所有 .tcl 文件。 但我总是收到“cvs update:对 *.tcl 一无所知”错误消息。 我该如何…
tclsh8.5的调试工具/方法
我一直在尝试调试调用特定于供应商的 TCL API 时遇到的一些问题。不用说,API 在某个点会崩溃,并且 stderr 输出还有一些不足之处。另外,标准 /var/l…
无法在 Tcl 中使用 upvar 将变量传递给过程
我需要一个能够从调用者的命名空间访问、读取和更改变量的过程。该变量称为_current_selection。我尝试以几种不同的方式使用 upvar 来做到这一点,但…
在 Tcl Tk 中将鼠标按钮单击绑定到画布上的任意位置
我希望我的画布在单击画布区域上的任意位置时单击鼠标按钮时执行操作。我已经能够绑定单击,但仅当它在现有对象上进行时: $this/zinc bind all [list…
Tcl 脚本无法从 bash shell 脚本执行
我对 bash shell 脚本和 tcl 脚本有一个相对奇怪的问题,从 shell 脚本中调用。 从角度来看,我有一个 shell 脚本,它生成一些其他 shell 脚本,以及 …
如何在线制作滚动文本?
以下是 iwidgets::scrolledtext 的 TCL 代码演示示例。 package require Iwidgets iwidgets::scrolledtext .st \ -labeltext "Scrolledtext Example" …
检查过程是否返回列表或带有子列表的列表
我面临的问题是如何检查程序返回的列表是否由单个列表组成或者内部可能包含子列表。 #simple list set a { 1 2 3 4} # list consisting of sub list s…
TCL 数据捕获问题 - 预计
我想知道如何使用 TCL 获取上一个命令的输出。 我现在有以下结构: exp_send -i $spawn_id "show port-access supplicant\r" set buff "" expect -reg…
我们可以在 tcl 脚本中使用任何过滤器吗?
我有一个关于for循环的问题, for {{set loop 0} {$loop < 100} {incr loop}} { #do someting here } 循环从0到99,我对循环的每个值做一些事情,但是…
在 tcl tk gui 中隐藏和显示框架
我想制作一个可以隐藏和显示交替的框架。问题是 Tk 不提供任何隐藏/解包命令。我使用 vtcl,有一个选项“Window hode”,它仅隐藏顶层窗口。现在我想…
Tcl/Tk:条目 + listbox:如何将其转换为小部件?
我改编了 Brent Welch 书中的代码,以便可以使用 listbox 填充我的 entry 框。下面列出的代码可以改进吗?另外,我想将此代码转换为一个小部件,以便…
Tcl - 递归遍历和FTP上传
如何递归遍历本地文件夹,以便将其中的所有内容上传到所需的 ftp 文件夹?这是我到目前为止所拥有的: package require ftp set host ** set user ** …