Tcl - Dictionnaire

Un dictionnaire est un arrangement permettant de mapper des valeurs sur des clés. La syntaxe du dictionnaire conventionnel est indiquée ci-dessous -

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

Quelques exemples de création d'un dictionnaire sont présentés ci-dessous -

#!/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

Lorsque le code ci-dessus est exécuté, il produit le résultat suivant -

colour1 red
colour1 red colour2 green
colour1 black colour2 white

Taille du dicton

La syntaxe pour obtenir la taille de dict est indiquée ci-dessous -

[dict size dictname]

Un exemple d'impression de la taille est présenté ci-dessous -

#!/usr/bin/tclsh

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

Lorsque le code ci-dessus est exécuté, il produit le résultat suivant -

2

Itération du dictionnaire

Une itération de dictionnaire simple pour imprimer les clés et la valeur du dictionnaire est indiquée ci-dessous -

#!/usr/bin/tclsh

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

Lorsque le code ci-dessus est exécuté, il produit le résultat suivant -

black
white

Valeur pour Key in Dict

La syntaxe pour récupérer la valeur de la clé dans dict est indiquée ci-dessous -

[dict get $dictname $keyname]

Un exemple pour récupérer la valeur de la clé est donné ci-dessous -

#!/usr/bin/tclsh

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

Lorsque le code ci-dessus est exécuté, il produit le résultat suivant -

black

Toutes les clés dans Dict

La syntaxe pour récupérer toutes les clés dans dict est indiquée ci-dessous -

[dict keys $dictname]

Un exemple d'impression de toutes les touches est illustré ci-dessous -

#!/usr/bin/tclsh

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

Lorsque le code ci-dessus est exécuté, il produit le résultat suivant -

colour1 colour2

Toutes les valeurs dans Dict

La syntaxe pour récupérer toutes les valeurs dans dict est indiquée ci-dessous -

[dict values $dictname]

Un exemple d'impression de toutes les valeurs est présenté ci-dessous -

#!/usr/bin/tclsh

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

Lorsque le code ci-dessus est exécuté, il produit le résultat suivant -

black white

La clé existe dans Dict

La syntaxe pour vérifier si une clé existe dans dict est indiquée ci-dessous -

[dict exists $dictname $key]

Un exemple pour vérifier si une clé existe dans dict est montré ci-dessous -

#!/usr/bin/tclsh

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

Lorsque le code ci-dessus est exécuté, il produit le résultat suivant -

1