tcl

2热度

2回答

set x "ONE" set y 1 set z ONE # This is probably the easiest and cleanest form of the command # to remember: switch $x { "$z" { set y1 [expr {$y+1}] puts "MATCH \$z. $y + $z is $

-1热度

2回答

如何解析列表中的Tcl“list as string”？

通过一些未知的原因，在下面的代码行 set result [[$sqlCmd execute] allrows -as lists] 变量 result 得到字符串，它看起来像列表：{2 3 4 5} 如果我写puts "result $result => [llength $result]"它打印{2 3 4 5} => 1 如果我写puts [list $result]，它打印{{2 3 4

0热度

1回答

TCL多捕获组简化csv字符串解析与正则表达式

我想解析简化的CSV格式与TCL正则表达式。我选择了regexp进行分割以执行基本格式一致性测试。我的问题是，我想使用计数量词，但想要从匹配中排除'，'。我的测试线： set line "2017/08/21 16:06:20.0, REALTIME, late by 0.3, EOS450D, 1/640, F/8.0, ISO 100, Partial 450D 0.0%" 到目前为止

0热度

1回答

lset无法正常工作

我的脚本中有一个lset命令出现此问题。 Wheter我发出命令来替换列表中的特定值，我最终显示列表的所有元素。 lset gamma_aa [expr int($index)] 0 而不是将列表中的$索引值更改为0值将在命令窗口中显示整个列表！列表创建使用L重复 set gamma_aa [lrepeat [expr int($nbrx*$nbry)] 0.] 一个列表我错过了什么？

1热度

1回答

正在执行的tcltest测试的名称

我想获取当前在Tcl脚本中执行的tcltesttest的名称。例如，下面的代码应该是打印测试的名称： #!/usr/bin/tclsh package require tcltest tcltest::test testFunction {} -body { puts [lindex [info level 0] 0] set a 1 } -result 1 但是，

1热度

3回答

TCL ::如何将反斜杠“\”作为常规字符

我无法将反斜杠作为常规字符打印。看跌期权 “\” 感谢。

1热度

1回答

在tcl脚本中编写proc avg ns2_new

我在ns2软件中编写了一个场景，其中有5个固定节点和1个移动接收器。移动接收器应该收集节点的信息。我想计算平均平均值（energy_level，节点上的节点数量&）并将其存储在移动接收器中。我写的代码没有任何错误，但没有打印出来。我的代码&跟踪文件在附件我必须计算这个平均值与tcl脚本代码中的proc而不是awk code.Please帮助我。 proc create_common_ap

0热度

2回答

的Tcl：内的多个条件语句if语句

只是尽在脚本中一些基本的检查...产生一个错误，如果$ ARGC不是1或2。我想： if { ($argc != 1) || ($argc != 2) } { puts "ERROR: \$argc should be either 1 or 2.\n"; exit 1 } 和 if { ($argc != 1 || $argc != 2) } { puts "ER

0热度

1回答

如何调整窗口小部件的大小，例如框架，标签，窗口内部的文本以及tcl中的窗口大小tk GUI

我是tcl \ tk中的新手，我正在开发一个使用它的UI。 UI窗口具有一个框架，该框架具有根据表中的列数填充的动态数量的标签和文本小部件。每列有一个入口小部件，用户在其中键入的数据填充表中的每一列。然而，我面临的问题是，我无法找到一种方法，使窗口内的窗口小部件的大小和位置根据窗口的大小自行调整。也就是说，如果用户通过拖动和放大窗口来放大窗口，则窗口内的窗口小部件也应该增加大小并根据窗口大小调整

0热度

1回答

TCL/TK：条目显示在右侧的文本

是否可以在条目中显示字符串，而不是左侧？ Fox示例中有一个字符串“/temp/test/2017/0910/test.txt”，并且该条目无法显示总字符串。如果我想在不改变输入宽度的情况下显示字符串的右侧部分，该怎么办？谢谢！ global path set path "/temp/test/2017/0910/test.txt" entry .e -textvariable path g