Changeset 4741 for branches


Ignore:
Timestamp:
Nov 17, 2014 5:35:00 AM (9 years ago)
Author:
ldelgass
Message:

Remove cutplane edges/wireframe controls

File:
1 edited

Legend:

Unmodified
Added
Removed
  • branches/1.3/gui/scripts/vtkvolumeviewer.tcl

    r4740 r4741  
    9898    private method EnterLegend { x y }
    9999    private method EventuallyResize { w h }
     100    private method EventuallyRequestLegend {}
    100101    private method EventuallyRotate { q }
    101102    private method EventuallySetCutplane { axis args }
     
    223224        -axisminorticks                 1
    224225        -background                     black
    225         -cutplaneedges                  0
    226226        -cutplanelighting               1
    227227        -cutplaneopacity                100
    228228        -cutplanesvisible               0
    229         -cutplanewireframe              0
    230229        -legendvisible                  1
    231230        -volumelighting                 1
     
    469468}
    470469
     470itcl::body Rappture::VtkVolumeViewer::EventuallyRequestLegend {} {
     471    if { !$_legendPending } {
     472        set _legendPending 1
     473        $_dispatcher event -idle !legend
     474    }
     475}
     476
    471477set rotate_delay 100
    472478
     
    13771383            SendCmd "axis flymode $mode"
    13781384        }
    1379         "-cutplaneedges" {
    1380             set bool $_settings($what)
    1381             foreach dataset [CurrentDatasets -visible] {
    1382                 SendCmd "$_cutplaneCmd edges $bool $dataset"
    1383             }
    1384         }
    13851385        "-cutplanesvisible" {
    13861386            set bool $_settings($what)
    13871387            foreach dataset [CurrentDatasets -visible] {
    13881388                SendCmd "$_cutplaneCmd visible $bool $dataset"
    1389             }
    1390         }
    1391         "-cutplanewireframe" {
    1392             set bool $_settings($what)
    1393             foreach dataset [CurrentDatasets -visible] {
    1394                 SendCmd "$_cutplaneCmd wireframe $bool $dataset"
    13951389            }
    13961390        }
     
    18721866        -font "Arial 9"
    18731867
    1874     checkbutton $inner.wireframe \
    1875         -text "Show Wireframe" \
    1876         -variable [itcl::scope _settings(-cutplanewireframe)] \
    1877         -command [itcl::code $this AdjustSetting -cutplanewireframe] \
    1878         -font "Arial 9"
    1879 
    18801868    checkbutton $inner.lighting \
    18811869        -text "Enable Lighting" \
    18821870        -variable [itcl::scope _settings(-cutplanelighting)] \
    18831871        -command [itcl::code $this AdjustSetting -cutplanelighting] \
    1884         -font "Arial 9"
    1885 
    1886     checkbutton $inner.edges \
    1887         -text "Show Edges" \
    1888         -variable [itcl::scope _settings(-cutplaneedges)] \
    1889         -command [itcl::code $this AdjustSetting -cutplaneedges] \
    18901872        -font "Arial 9"
    18911873
     
    19841966        0,0 $inner.visible              -anchor w -pady 2 -cspan 4 \
    19851967        1,0 $inner.lighting             -anchor w -pady 2 -cspan 4 \
    1986         2,0 $inner.wireframe            -anchor w -pady 2 -cspan 4 \
    1987         3,0 $inner.edges                -anchor w -pady 2 -cspan 4 \
    1988         4,0 $inner.opacity_l            -anchor w -pady 2 -cspan 3 \
    1989         5,0 $inner.opacity              -fill x   -pady 2 -cspan 3 \
    1990         6,0 $itk_component(xCutButton)  -anchor e -padx 2 -pady 2 \
    1991         7,0 $itk_component(xCutScale)   -fill y \
    1992         6,1 $itk_component(yCutButton)  -anchor e -padx 2 -pady 2 \
    1993         7,1 $itk_component(yCutScale)   -fill y \
    1994         6,2 $itk_component(zCutButton)  -anchor e -padx 2 -pady 2 \
    1995         7,2 $itk_component(zCutScale)   -fill y \
     1968        2,0 $inner.opacity_l            -anchor w -pady 2 -cspan 3 \
     1969        3,0 $inner.opacity              -fill x   -pady 2 -cspan 3 \
     1970        4,0 $itk_component(xCutButton)  -anchor e -padx 2 -pady 2 \
     1971        5,0 $itk_component(xCutScale)   -fill y \
     1972        4,1 $itk_component(yCutButton)  -anchor e -padx 2 -pady 2 \
     1973        5,1 $itk_component(yCutScale)   -fill y \
     1974        4,2 $itk_component(zCutButton)  -anchor e -padx 2 -pady 2 \
     1975        5,2 $itk_component(zCutScale)   -fill y
    19961976
    19971977    blt::table configure $inner r* c* -resize none
    1998     blt::table configure $inner r7 c3 -resize expand
     1978    blt::table configure $inner r5 c3 -resize expand
    19991979}
    20001980
     
    23302310}
    23312311
    2332 
    23332312# ----------------------------------------------------------------------
    23342313# USAGE: _dropdown post
Note: See TracChangeset for help on using the changeset viewer.