diff options
author | joye <joye> | 2014-05-21 19:03:48 (GMT) |
---|---|---|
committer | joye <joye> | 2014-05-21 19:03:48 (GMT) |
commit | af45850d31b3e6584ca2c737ff78f9c793668c46 (patch) | |
tree | 27803f143b7f979a52f7dd3401f37124ea7cabe4 /tests | |
parent | cd469b4255c3b34ab0adf63169a1811d4971f53e (diff) | |
download | blt-af45850d31b3e6584ca2c737ff78f9c793668c46.zip blt-af45850d31b3e6584ca2c737ff78f9c793668c46.tar.gz blt-af45850d31b3e6584ca2c737ff78f9c793668c46.tar.bz2 |
*** empty log message ***
Diffstat (limited to 'tests')
-rw-r--r-- | tests/axis.tcl | 4 | ||||
-rw-r--r-- | tests/bargraph.tcl | 2 | ||||
-rw-r--r-- | tests/base.tcl | 13 | ||||
-rw-r--r-- | tests/linegraph.tcl | 2 | ||||
-rw-r--r-- | tests/textmarker.tcl | 4 |
5 files changed, 12 insertions, 13 deletions
diff --git a/tests/axis.tcl b/tests/axis.tcl index 1e3b1de..0c2176f 100644 --- a/tests/axis.tcl +++ b/tests/axis.tcl @@ -3,7 +3,7 @@ source base.tcl set w .line set graph [bltLineGraph $w] -$graph axis configure x -bd 2 -background cyan -title "X Axis" -limitsformat "%g" +$graph axis configure x -bd 2 -background cyan -title "X\nAxis" -limitsformat "%g" $graph axis configure y -bd 2 -background cyan bltCmd $graph axis activate y @@ -34,7 +34,7 @@ bltTest3 $graph axis x -gridminorcolor blue bltTest3 $graph axis x -gridminordashes {8 3} bltTest3 $graph axis x -gridminorlinewidth 2 bltTest3 $graph axis x -hide yes -##bltTest3 $graph axis x -justify left +bltTest3 $graph axis x -justify left bltTest3 $graph axis x -labeloffset yes bltTest3 $graph axis x -limitscolor red bltTest3 $graph axis x -limitsfont "times 18 bold italic" diff --git a/tests/bargraph.tcl b/tests/bargraph.tcl index 032c0cd..a4d0097 100644 --- a/tests/bargraph.tcl +++ b/tests/bargraph.tcl @@ -31,7 +31,7 @@ bltTest $graph -height 300 #bltTest $graph -highlightcolor #bltTest $graph -highlightthickness bltTest $graph -invertxy yes -#bltTest $graph -justify +bltTest $graph -justify left bltTest $graph -leftmargin 50 bltTest $graph -lm 50 bltTest $graph -plotbackground cyan diff --git a/tests/base.tcl b/tests/base.tcl index f963003..6cc63c3 100644 --- a/tests/base.tcl +++ b/tests/base.tcl @@ -1,4 +1,5 @@ -set sleep 1000 +#set sleep 1000 +set sleep 500 proc bltPlot {w title} { toplevel $w @@ -90,12 +91,11 @@ proc bltElements {graph} { proc bltBarGraph {w} { global sleep - set title "Bar Graph" - bltPlot $w $title + bltPlot $w "Bar Graph" set graph [blt::barchart ${w}.gr \ -width 600 \ -height 500 \ - -title $title \ + -title "Bar\nGraph" \ -barwidth .2 \ -barmode aligned \ ] @@ -110,12 +110,11 @@ proc bltBarGraph {w} { proc bltLineGraph {w} { global sleep - set title "Line Graph" - bltPlot $w $title + bltPlot $w "Line Graph" set graph [blt::graph ${w}.gr \ -width 600 \ -height 500 \ - -title $title \ + -title "Line\nGraph" \ ] pack $graph -expand yes -fill both bltElements $graph diff --git a/tests/linegraph.tcl b/tests/linegraph.tcl index 6a79e2c..574282c 100644 --- a/tests/linegraph.tcl +++ b/tests/linegraph.tcl @@ -26,7 +26,7 @@ bltTest $graph -height 300 #bltTest $graph -highlightcolor #bltTest $graph -highlightthickness bltTest $graph -invertxy yes -#bltTest $graph -justify +bltTest $graph -justify left bltTest $graph -leftmargin 50 bltTest $graph -lm 50 bltTest $graph -plotbackground cyan diff --git a/tests/textmarker.tcl b/tests/textmarker.tcl index a72b767..12b5f23 100644 --- a/tests/textmarker.tcl +++ b/tests/textmarker.tcl @@ -4,7 +4,7 @@ set w .line set graph [bltLineGraph $w] set mm [$graph marker create text tt -element data2 \ - -coords {1.5 100} -text {Text Marker} -font {24}] + -coords {1.5 100} -text "Text\nMarker" -font {24}] $graph element configure data1 -hide yes echo "Testing Text Marker..." @@ -20,7 +20,7 @@ bltTest3 $graph marker $mm -fg cyan bltTest3 $graph marker $mm -fill yellow bltTest3 $graph marker $mm -font {times 24 bold italic} bltTest3 $graph marker $mm -foreground blue -bltTest3 $graph marker $mm -justify right +bltTest3 $graph marker $mm -justify left bltTest3 $graph marker $mm -hide yes bltTest3 $graph marker $mm -mapx x2 bltTest3 $graph marker $mm -mapy y2 |