Changeset 6213 for branches/1.6/gui/scripts/vtkisosurfaceviewer.tcl
- Timestamp:
- Mar 28, 2016, 6:45:39 AM (9 years ago)
- File:
-
- 1 edited
Legend:
- Unmodified
- Added
- Removed
-
branches/1.6/gui/scripts/vtkisosurfaceviewer.tcl
r6212 r6213 129 129 private variable _arcball "" 130 130 131 private variable _dlist "" ;# list of data objects132 private variable _obj2ovride ;# maps dataobj => style override133 private variable _datasets ;# contains all the dataobj-component134 ;# datasets in the server135 private variable _colormaps ;# contains all the colormaps136 ;# in the server.131 private variable _dlist ""; # list of data objects 132 private variable _obj2ovride; # maps dataobj => style override 133 private variable _datasets; # contains all the dataobj-component 134 # datasets in the server 135 private variable _colormaps; # contains all the colormaps 136 # in the server. 137 137 # The name of the current colormap used. The colormap is global to all 138 138 # heightmaps displayed. … … 140 140 private variable _currentNumContours -1 141 141 142 private variable _click ;# info used for rotate operations143 private variable _limits ;# autoscale min/max for all axes144 private variable _view ;# view params for 3D view142 private variable _click; # info used for rotate operations 143 private variable _limits; # autoscale min/max for all axes 144 private variable _view; # view params for 3D view 145 145 private variable _settings 146 146 private variable _changed 147 147 private variable _reset 1; # Connection to server has been reset. 148 148 149 private variable _first "" ;# This is the topmost dataset.149 private variable _first ""; # This is the topmost dataset. 150 150 private variable _start 0 151 151 private variable _title "" … … 161 161 private variable _cutplanePending 0 162 162 private variable _field "" 163 private variable _colorMode "scalar"; 163 private variable _colorMode "scalar"; # Mode of colormap (vmag or scalar) 164 164 private variable _fields 165 165 private variable _curFldName "" 166 166 private variable _curFldLabel "" 167 private variable _mouseOver ""; # what called LegendRangeAction, vmin or vmax 168 private variable _customRangeClick 1; # what called ToggleCustomRange 167 private variable _mouseOver ""; # what called LegendRangeAction: 168 # vmin or vmax 169 private variable _customRangeClick 1; # what called ToggleCustomRange 169 170 170 171 private common _downloadPopup; # download options from popup … … 1699 1700 1700 1701 itcl::body Rappture::VtkIsosurfaceViewer::BuildIsosurfaceTab {} { 1701 1702 1702 set fg [option get $itk_component(hull) font Font] 1703 1703 #set bfg [option get $itk_component(hull) boldFont Font] … … 1801 1801 } 1802 1802 $inner.colormap choices insert end [GetColormapList] 1803 1804 1803 $itk_component(colormap) value "BCGYR" 1805 1804 bind $inner.colormap <<Value>> \ … … 2453 2452 # USAGE: LegendPointToValue <x> <y> 2454 2453 # 2455 # Convert an x,y point on the legend to a numeric isosurfacevalue.2454 # Convert an x,y point on the legend to a numeric field value. 2456 2455 # ---------------------------------------------------------------------- 2457 2456 itcl::body Rappture::VtkIsosurfaceViewer::LegendPointToValue { x y } { 2458 2459 2457 set fname $_curFldName 2460 2458 … … 2800 2798 # ---------------------------------------------------------------------- 2801 2799 itcl::body Rappture::VtkIsosurfaceViewer::LegendRangeValidate {widget which value} { 2802 2803 2800 #check for a valid value 2804 2801 if {[string is double $value] != 1} {
Note: See TracChangeset
for help on using the changeset viewer.