source base.tcl set w .line set graph [bltLineGraph $w] $graph legend selection set data2 $graph legend focus data1 $graph legend configure -selectrelief groove echo "Testing Legend..." $graph legend configure #bltTest2 $graph legend -activebackground #bltTest2 $graph legend -activeborderwidth #bltTest2 $graph legend -activeforeground #bltTest2 $graph legend -activerelief bltTest2 $graph legend -anchor s bltTest2 $graph legend -bg pink bltTest2 $graph legend -background cyan bltTest2 $graph legend -borderwidth 20 bltTest2 $graph legend -bd 20 bltTest2 $graph legend -columns 2 #bltTest2 $graph legend -exportselection bltTest2 $graph legend -focusdashes "8 3" bltTest2 $graph legend -focusforeground red bltTest2 $graph legend -font "times 18 bold italic" bltTest2 $graph legend -fg yellow bltTest2 $graph legend -foreground purple bltTest2 $graph legend -hide yes bltTest2 $graph legend -ipadx 20 bltTest2 $graph legend -ipady 20 #bltTest2 $graph legend -nofocusselectbackground #bltTest2 $graph legend -nofocusselectforeground bltTest2 $graph legend -padx 20 bltTest2 $graph legend -pady 20 bltTest2 $graph legend -position rightmargin bltTest2 $graph legend -position leftmargin bltTest2 $graph legend -position topmargin bltTest2 $graph legend -position bottommargin bltTest2 $graph legend -position plotarea bltTest2 $graph legend -position xy bltTest2 $graph legend -x 250 bltTest2 $graph legend -y 100 bltTest2 $graph legend -raised yes bltTest2 $graph legend -relief groove bltTest2 $graph legend -rows 1 #bltTest2 $graph legend -selectbackground bltTest2 $graph legend -selectborderwidth 3 #bltTest2 $graph legend -selectcommand #bltTest2 $graph legend -selectforeground #bltTest2 $graph legend -selectmode bltTest2 $graph legend -selectrelief flat bltTest2 $graph legend -title "Hello World" bltTest2 $graph legend -titlecolor red bltTest2 $graph legend -titlefont "times 24 bold italic" #bltCmd $graph legend activate #bltCmd $graph legend bind bltCmd $graph legend cget -fg bltCmd $graph legend configure bltCmd $graph legend configure -fg #bltCmd $graph legend curselection #bltCmd $graph legend deactivate bltCmd $graph legend focus data1 bltCmd $graph legend focus #bltCmd $graph legend get data1 bltCmd $graph legend selection anchor data1 bltCmd $graph legend selection mark data1 bltCmd $graph legend selection includes data2 bltCmd $graph legend selection present bltCmd $graph legend selection set data1 data2 bltCmd $graph legend selection clear data1 data2 bltCmd $graph legend selection set data1 data2 bltCmd $graph legend selection toggle data1 data2 bltCmd $graph legend selection set data1 data2 bltCmd $graph legend selection clearall echo "done" bltPlotDestroy $w