Tcl-tk-tcl-dictionary

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 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 exists $dictname $key]

キーがdictに存在するかどうかを確認するための例を以下に示します-

#!/usr/bin/tclsh

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

上記のコードが実行されると、次の結果が生成されます-

1