【发布时间】：2014-06-24 10:22:03
【问题描述】：
我正在传递数组的名称、键和值。如果数组存在但数组中没有定义键，我正在尝试将键值对附加到数组中。
如何在 tcl 中将一对附加到数组中？
【问题讨论】：
【发布时间】：2014-06-24 10:22:03
【问题描述】：
要将键/值对添加到 Tcl 数组，只需执行以下操作：
set theArray($theKey) $theValue
你也可以使用：
append theArray($theKey) $theValue
如果它们不存在，它将创建键/值对，如果存在则附加到数组中的值。
如果您将各种内容作为参数传递，该过程可能如下所示：
proc appendValueToArray {arrayName keyName valueToAppend} {
upvar 1 $arrayName theArray
append theArray($keyName) $valueToAppend
}
【讨论】：
-
记住 Tcl 的数组是 associative 数组。