procを使ってTclのパラメータを複製する

Question

私はいくつかのオブジェクトをすべて同じパラメータで作成したいので、それらを返すprocに保存しようとしました。しかし、通訳者は結果をいくつかではなく1つのパラメータとして評価します。

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

と私はそれを使用する：私のprocがあり、私はいくつかの異なるパラメータにそれらを有効にするにはどうすればよい

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

？ TCL 8.5および使用上記で

Answer 1

パラメータのリストを展開するには、{*}演算子：以前のバージョンとの

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

あなたはevalのを使用してリストを展開することができます

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

同等です。