diff options
Diffstat (limited to 'tests')
| -rw-r--r-- | tests/barelement.tcl | 7 | ||||
| -rw-r--r-- | tests/barpen.tcl | 7 | ||||
| -rw-r--r-- | tests/lineelement.tcl | 9 |
3 files changed, 22 insertions, 1 deletions
diff --git a/tests/barelement.tcl b/tests/barelement.tcl index 247bd79..513a7da 100644 --- a/tests/barelement.tcl +++ b/tests/barelement.tcl @@ -40,7 +40,14 @@ bltTest3 $graph element data1 -showvalues x $dops bltTest3 $graph element data1 -showvalues both $dops #bltTest3 $graph element data2 -stack $dops #bltTest3 $graph element data2 -styles $dops +bltTest3 $graph element data1 -valueanchor nw $dops bltTest3 $graph element data1 -valueanchor n $dops +bltTest3 $graph element data1 -valueanchor ne $dops +bltTest3 $graph element data1 -valueanchor e $dops +bltTest3 $graph element data1 -valueanchor se $dops +bltTest3 $graph element data1 -valueanchor s $dops +bltTest3 $graph element data1 -valueanchor sw $dops +bltTest3 $graph element data1 -valueanchor w $dops bltTest3 $graph element data1 -valuecolor cyan $dops bltTest3 $graph element data1 -valuefont {times 18 bold italic} $dops bltTest3 $graph element data1 -valueformat "%e" $dops diff --git a/tests/barpen.tcl b/tests/barpen.tcl index 2a02e50..e313a81 100644 --- a/tests/barpen.tcl +++ b/tests/barpen.tcl @@ -25,7 +25,14 @@ bltTest3 $graph pen foo -showerrorbars no $dops bltTest3 $graph pen foo -showvalues none $dops bltTest3 $graph pen foo -showvalues x $dops bltTest3 $graph pen foo -showvalues both $dops +bltTest3 $graph pen foo -valueanchor nw $dops bltTest3 $graph pen foo -valueanchor n $dops +bltTest3 $graph pen foo -valueanchor ne $dops +bltTest3 $graph pen foo -valueanchor e $dops +bltTest3 $graph pen foo -valueanchor se $dops +bltTest3 $graph pen foo -valueanchor s $dops +bltTest3 $graph pen foo -valueanchor sw $dops +bltTest3 $graph pen foo -valueanchor w $dops bltTest3 $graph pen foo -valuecolor cyan $dops bltTest3 $graph pen foo -valuefont {times 18 bold italic} $dops bltTest3 $graph pen foo -valueformat "%e" $dops diff --git a/tests/lineelement.tcl b/tests/lineelement.tcl index 734a8ab..95b732b 100644 --- a/tests/lineelement.tcl +++ b/tests/lineelement.tcl @@ -5,7 +5,7 @@ set graph [bltLineGraph $w] $graph element configure data1 -dash {8 3} -showvalues y -smooth step -symbol circle -outline yellow -outlinewidth 3 -pixels 10 -$graph pen create foo -showvalues y -symbol circle -dashes {8 3} -color purple +$graph pen create foo -showvalues y -symbol circle -dashes {8 3} -color purple -linewidth 2 $graph element activate data3 echo "Testing Line Element.." @@ -53,7 +53,14 @@ bltTest3 $graph element data1 -symbol splus $dops bltTest3 $graph element data1 -symbol square $dops bltTest3 $graph element data1 -symbol triangle $dops bltTest3 $graph element data2 -trace both $dops +bltTest3 $graph element data1 -valueanchor nw $dops bltTest3 $graph element data1 -valueanchor n $dops +bltTest3 $graph element data1 -valueanchor ne $dops +bltTest3 $graph element data1 -valueanchor e $dops +bltTest3 $graph element data1 -valueanchor se $dops +bltTest3 $graph element data1 -valueanchor s $dops +bltTest3 $graph element data1 -valueanchor sw $dops +bltTest3 $graph element data1 -valueanchor w $dops bltTest3 $graph element data1 -valuecolor cyan $dops bltTest3 $graph element data1 -valuefont {times 18 bold italic} $dops bltTest3 $graph element data1 -valueformat "%e" $dops |