Utilisation de proc pour dupliquer les paramètres dans Tcl

Question

Je veux faire plusieurs objets, tous avec les mêmes paramètres, donc j'ai essayé de les stocker dans un proc qui les renvoie. Mais l'interpréteur évalue le résultat retourné comme un paramètre, au lieu de plusieurs. mon proc est:

proc element_param {} { 
    return "-filled 1\ 
     -visible 1\ 
     -linewidth 1\ 
     -linecolor yellow\ 
     -fillcolor yellow\ 
     -relief roundraised\ 
     -linewidth 2" 
} 

et je l'utilise avec:

$this/zinc add rectangle 1 [list "100" "100" "200" "200"] [element_param] 

Comment puis-je les transforme en plusieurs paramètres différents?

Answer 1

Avec tcl 8.5 et ci-dessus utilisent le {*} opérateur pour élargir la liste des paramètres:

$this/zinc add rectangle 1 $coords {*}[element_param] 

avec les versions précédentes, vous pouvez étendre la liste à l'aide eval:

eval [linsert [element_param] 0 $this/zinc add rectangle 1 $coords] 

qui est équivalent.