Changeset 4735 for trunk/gui/scripts/vtkvolumeviewer.tcl
- Timestamp:
- Nov 17, 2014, 1:56:13 AM (10 years ago)
- File:
-
- 1 edited
Legend:
- Unmodified
- Added
- Removed
-
trunk/gui/scripts/vtkvolumeviewer.tcl
r4730 r4735 2232 2232 set tag $dataobj-$cname 2233 2233 array set styles { 2234 -color BCGYR2235 - volumelighting12236 - volumeoutline02237 -v olumevisible12234 -color BCGYR 2235 -lighting 1 2236 -outline 0 2237 -visible 1 2238 2238 } 2239 2239 array set styles [$dataobj style $cname] 2240 SendCmd "volume add $tag" 2241 set _settings($cname-volumelighting) $styles(-volumelighting) 2242 set _settings($cname-volumeoutline) $styles(-volumeoutline) 2243 set _settings($cname-volumevisible) $styles(-volumevisible) 2240 set _settings($cname-volumelighting) $styles(-lighting) 2241 set _settings($cname-volumeoutline) $styles(-outline) 2242 set _settings($cname-volumevisible) $styles(-visible) 2244 2243 2245 2244 $itk_component(colormap) value $styles(-color) 2245 2246 SendCmd "outline add $tag" 2247 SendCmd "outline visible $styles(-outline) $tag" 2246 2248 2247 2249 SendCmd "$_cutplaneCmd add $tag" 2248 2250 SendCmd "$_cutplaneCmd visible 0 $tag" 2249 SendCmd "volume lighting $styles(-volumelighting) $tag" 2251 2252 SendCmd "volume add $tag" 2253 SendCmd "volume lighting $styles(-lighting) $tag" 2254 SendCmd "volume visible $styles(-visible) $tag" 2255 2250 2256 SetInitialTransferFunction $dataobj $cname 2251 2257 SendCmd "volume colormap $cname $tag" 2252 2258 SendCmd "$_cutplaneCmd colormap $cname-opaque $tag" 2253 SendCmd "outline add $tag"2254 SendCmd "outline visible $styles(-volumeoutline) $tag"2255 2259 } 2256 2260
Note: See TracChangeset
for help on using the changeset viewer.