set Name [unique2 $Composite.tixSel]
set Parent $Name
#------------------------------------------
tixSelect $Name 
$Name add sgi -text "SGI" 
$Name add sun -text "SUN"
$Name add hp -text "HP"
$Name config -value {sgi}
place $Name -x 56 -y 56 -anchor nw
