Lines Matching refs:fill
27 pack $w.buttons -side bottom -fill x -pady 2m
33 pack $w.c -side top -expand yes -fill both
37 $c create rectangle 245 195 255 205 -outline black -fill red
58 -outline black -fill $color -width 1]
76 -outline black -fill red]
79 -font -*-times-medium-r-normal--*-240-*-*-*-*-*-* -fill brown
91 -font -*-times-medium-r-normal--*-240-*-*-*-*-*-* -fill brown
94 $c bind config <Leave> "$c itemconf current -fill \$textConfigFill"
100 set textConfigFill [lindex [$w itemconfig current -fill] 4]
101 $w itemconfig current -fill black