- Timestamp:
- Sep 13, 2013, 2:51:22 PM (11 years ago)
- Location:
- trunk/gui/scripts
- Files:
-
- 8 edited
Legend:
- Unmodified
- Added
- Removed
-
trunk/gui/scripts/cloud.tcl
r3922 r3923 20 20 private variable _xmlobj ""; # ref to XML obj with device data 21 21 private variable _cloud ""; # lib obj representing this cloud 22 private variable _units " m m m" ;# system of units for x, y, z22 private variable _units "" ; # system of units for x, y, z 23 23 private variable _axis2label; # 24 24 private variable _axis2units; # … … 116 116 set _units [$_cloud get units] 117 117 set first [lindex $_units 0] 118 set list {} 118 119 foreach u $_units axis { x y z } { 119 120 if { $u != "" } { … … 122 123 set _axis2units($axis) $first 123 124 } 124 } 125 lappend list $_axis2units($axis) 126 } 127 set _units $list 125 128 foreach label [$_cloud get labels] axis { x y z } { 126 129 if { $label != "" } { … … 148 151 foreach axis {x y z} units $_units { 149 152 set value [Rappture::Units::convert [set $axis] \ 150 -context $units -to $units -units off] 151 153 -context $units -to $units -units off] 152 154 set $axis $value; # Set the (x/y/z) coordinate to 153 155 # converted value. -
trunk/gui/scripts/visviewer.tcl
r3812 r3923 628 628 set inner [frame $itk_component(plotarea).view.splash] 629 629 $inner configure -relief raised -bd 2 630 label $inner.text1 -text " Rendering...\nPlease wait." \630 label $inner.text1 -text "Working...\nPlease wait." \ 631 631 -font "Arial 10" 632 632 label $inner.icon -
trunk/gui/scripts/vtkglyphviewer.tcl
r3899 r3923 1718 1718 "static_triad" "static" \ 1719 1719 "closest_triad" "closest" \ 1720 "furthest_triad" "f urthest" \1720 "furthest_triad" "farthest" \ 1721 1721 "outer_edges" "outer" 1722 1722 $itk_component(axisMode) value "static" -
trunk/gui/scripts/vtkheightmapviewer.tcl
r3917 r3923 218 218 axisFlymode "static" 219 219 axisMinorTicks 1 220 stretchToFit 1220 stretchToFit 0 221 221 axisLabels 1 222 222 axisVisible 1 … … 1041 1041 1042 1042 foreach axis { x y z } { 1043 set label [$_first hints ${axis}label] 1043 if { $axis == "z" } { 1044 set label [$_first hints label] 1045 } else { 1046 set label [$_first hints ${axis}label] 1047 } 1048 puts stderr "axis=$axis label=$label" 1044 1049 if { $label == "" } { 1045 1050 if {$axis == "z"} { … … 1053 1058 } 1054 1059 } 1060 puts stderr "[list axis name $axis $label]" 1055 1061 # May be a space in the axis label. 1056 1062 SendCmd [list axis name $axis $label] … … 1441 1447 return 1442 1448 } 1443 set label [$_first hints zlabel]1449 set label [$_first hints label] 1444 1450 if { $label == "" } { 1445 1451 if { [string match "component*" $_curFldName] } { … … 2077 2083 "static_triad" "static" \ 2078 2084 "closest_triad" "closest" \ 2079 "furthest_triad" "f urthest" \2085 "furthest_triad" "farthest" \ 2080 2086 "outer_edges" "outer" 2081 2087 $itk_component(axisflymode) value "static" -
trunk/gui/scripts/vtkisosurfaceviewer.tcl
r3899 r3923 440 440 441 441 eval itk_initialize $args 442 443 EnableWaitDialog 500 442 444 Connect 443 445 update … … 1772 1774 "static_triad" "static" \ 1773 1775 "closest_triad" "closest" \ 1774 "furthest_triad" "f urthest" \1776 "furthest_triad" "farthest" \ 1775 1777 "outer_edges" "outer" 1776 1778 $itk_component(axisMode) value "static" -
trunk/gui/scripts/vtkstreamlinesviewer.tcl
r3899 r3923 1822 1822 "static_triad" "static" \ 1823 1823 "closest_triad" "closest" \ 1824 "furthest_triad" "f urthest" \1824 "furthest_triad" "farthest" \ 1825 1825 "outer_edges" "outer" 1826 1826 $itk_component(axismode) value "static" -
trunk/gui/scripts/vtkviewer.tcl
r3899 r3923 1952 1952 "static_triad" "static" \ 1953 1953 "closest_triad" "closest" \ 1954 "furthest_triad" "f urthest" \1954 "furthest_triad" "farthest" \ 1955 1955 "outer_edges" "outer" 1956 1956 $itk_component(axismode) value "static" -
trunk/gui/scripts/vtkvolumeviewer.tcl
r3899 r3923 1703 1703 "static_triad" "static" \ 1704 1704 "closest_triad" "closest" \ 1705 "furthest_triad" "f urthest" \1705 "furthest_triad" "farthest" \ 1706 1706 "outer_edges" "outer" 1707 1707 $itk_component(axismode) value "static"
Note: See TracChangeset
for help on using the changeset viewer.