Tcl - 字典

字典是用于将值映射到键的布置.传统字典的语法如下所示 :

dict set dictname key value
# or 
dict create dictname key1 value1 key2 value2 .. keyn valuen

创建字典的一些示例如下所示 :

#!/usr/bin/tclsh

dict set colours  colour1 red 
puts $colours
dict set colours  colour2 green
puts $colours

set colours [dict create colour1 "black" colour2 "white"]
puts $colours

执行上述代码时，它会产生以下结果 :

colour1 red
colour1 red colour2 green
colour1 black colour2 white

Dict的大小

语法获得dict的大小显示在下面和下面;

[dict size dictname]

打印尺寸的示例如下所示;

#!/usr/bin/tclsh

set colours [dict create colour1 "black" colour2 "white"]
puts [dict size $colours]

当执行上面的代码时，它产生以下结果 :

2

字典迭代

用于打印键和字典值的简单字典迭代显示在下面 :

#!/usr/bin/tclsh

set colours [dict create colour1 "black" colour2 "white"]
foreach item [dict keys $colours] {
   set value [dict get $colours $item]
   puts $value
}

执行上述代码时，会产生以下结果 :

 black 
 white

Key in Dict的值

在dict中检索key值的语法如下所示 :

[dict get $ dictname $ keyname]

检索密钥值的示例在下面和下面给出;

#!/usr/bin/tclsh

set colours [dict create colour1 "black" colour2 "white"]
set value [dict get $colours colour1]
puts $value

执行上述代码时，会产生以下结果 :

black

Dict中的所有键

检索dict中所有键的语法如下所示 :

[dict keys $dictname]

打印所有键的示例如下所示 :

#!/usr/bin/tclsh

set colours [dict create colour1 "black" colour2 "white"]
set keys [dict keys $colours]
puts $keys

执行上述代码时，它产生以下结果 :

colour1 colour2

全部Dict中的值

检测dict中所有值的语法如下所示低和低;

[dict values $dictname]

一个例子打印所有值显示在下面和下面;

#!/usr/bin/tclsh

set colours [dict create colour1 "black" colour2 "white"]
set values [dict values $colours]
puts $values

执行上述代码时，它会产生以下结果 :

black white

密钥存在于Dict中

检查dict中是否存在密钥的语法如下所示 :

[dict exists $ dictname $ key]

检查dict中是否存在密钥的示例显示在下面 :

#!/usr/bin/tclsh

set colours [dict create colour1 "black" colour2 "white"]
set result [dict exists $colours colour1]
puts $result

执行上述代码时，会产生以下结果 :

 1