tcltk添加coulnm到tablelist可变

Question

tablelist::tablelist .t -columns { 0 "Name" 0 "Age" 0 "sex" 0 "ROLLNO" } -width 250 -height 15 -selectmode single 

我们添加新列“位置”如果我添加为变量，并传递给insertcolumnlist如下

set new_column "Location" 
.t insertcolumnlist 4 {0 $new_column } 

它给下面的错误

能读取“new_column”：没有这样的变量

如何将变量传递给insertcolumnlist？

谢谢。

Answer 1

大括号可以防止一般的替换。使用引号代替或[list]（不是使用引号通常是更好的）将允许替换：

.t insertcolumnlist 4 "0 $new_column" 

或

.t insertcolumnlist 4 [list 0 $new_column]