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

Dict 中鍵的值

在 dict 中檢索鍵值的語法如下所示：

[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