- Timestamp:
- Jan 30, 2015, 9:07:08 AM (10 years ago)
- Location:
- branches/1.4
- Files:
-
- 2 edited
Legend:
- Unmodified
- Added
- Removed
-
branches/1.4
-
branches/1.4/gui/scripts/vtkisosurfaceviewer.tcl
r4943 r4966 2197 2197 SendCmd "cutplane add $tag" 2198 2198 SendCmd "cutplane color [Color2RGB $itk_option(-plotforeground)] $tag" 2199 foreach axis {x y z} { 2200 set pos [expr $_settings(-${axis}cutplaneposition) * 0.01] 2201 set visible $_settings(-${axis}cutplanevisible) 2202 SendCmd "cutplane slice $axis $pos" 2203 SendCmd "cutplane axis $axis $visible" 2204 } 2199 2205 SendCmd "cutplane visible $style(-cutplanesvisible) $tag" 2200 2206
Note: See TracChangeset
for help on using the changeset viewer.