Tcl/Tk：使用带有 expr 的数组
我在尝试访问 expr 内的 array 时遇到问题。重现错误的代码如下所示，改编自 Donal Fellows 对我的 之前的问题。 namespace eval Ns { } proc Ns::mai…
Tcl 中有获取连续数字数组的简写吗？
例如，在 Perl 中，要获取从 1 到 10 的数字的顺序数组，您可以简单地执行以下操作： @myArray = (1 .. 10); 这两个句点用作此操作的简写，而不是创建…
如何获取Itcl类成员变量的引用？
假设我有以下结构： package require Itcl itcl::class AAA { private variable m_list {} constructor {} { fill m_list list } } 如何获取 m_list …
Clearcase find 命令与 Tcl 脚本和批处理文件结合使用：重定向不起作用
又是我；-) 我尝试从批处理文件启动cleartool find 命令。该批处理文件从 Tcl 脚本获取参数。 批处理文件： SET VERARG="version(\main\LATEST) && !l…
TCL，正则表达式与 ')'，']'或'}'
我正在尝试在 TCL 中编写一个正则表达式来检测字符串末尾的 0 个或多个字符 ')'、']' 或 '}'。 如下所示，使用 a、b 和 c 代替 )、]和 }... % regexp …
如何用“,”分隔而不是 TCL 列表中的空格？
所以我有一个列表，在 TCL 中，项目存储为 {"1" "2" "3"}，以空格分隔。我想将此列表转换为 {"1","2","3"} - 除了通过 foreach 和 lappending 到每个…
如何在TCL中使用正则表达式找出字符串中的一个或多个字符
我需要一个简单的解决方案来确定某些字符是否在 Tcl 中的字符串中。 我的想法是用正则表达式来做到这一点。 我的字符串看起来像：“word_word-word_wo…
使用 Tcl Expect 生成 Ruby IRB 悲惨地以破裂的管道结束！
我只是想打开一个 irb 窗口并输入命令。这曾经有效，但现在不知何故被破坏了： package require Expect set exp::winnt_debug 1 set errorInfo set SP…
如何实现一个功能介于单选按钮和复选按钮之间的按钮？
我想根据用户选择的选项动态禁用或启用checkbutton。我想要的是 radiobutton 和 checkbutton 之间的交叉。 checkbutton .c1 -text "C1" -variable c1 …
