Changeset 5240

Timestamp:

Apr 15, 2015, 5:01:14 AM (5 years ago)

Author:

ldelgass

Message:

minor ticks setting for axis in vtkvolume

File:

• branches/1.3/gui/scripts/vtkvolumeviewer.tcl (modified) (4 diffs)

branches/1.3/gui/scripts/vtkvolumeviewer.tcl

@@ -214 +214 @@
 
     array set _settings {
+        axis-minorticks         1
         axis-xgrid              0
         axis-ygrid              0
@@ -936 +937 @@
         set _first ""
         InitSettings axis-xgrid axis-ygrid axis-zgrid axisFlyMode \
-            axesVisible axisLabels
+            axesVisible axisLabels axis-minorticks
         StopBufferingCommands
         SendCmd "imgflush"
@@ -1329 +1330 @@
             set bool $_settings($what)
             SendCmd "axis labels all $bool"
+        }
+        "axis-minorticks" {
+            set bool $_settings($what)
+            SendCmd "axis minticks all $bool"
         }
         "axis-xgrid" - "axis-ygrid" - "axis-zgrid" {
@@ -1684 +1689 @@
         -variable [itcl::scope _settings(axis-zgrid)] \
         -command [itcl::code $this AdjustSetting axis-zgrid] \
+        -font "Arial 9"
+    checkbutton $inner.minorticks \
+        -text "Minor Ticks" \
+        -variable [itcl::scope _settings(axis-minorticks)] \
+        -command [itcl::code $this AdjustSetting axis-minorticks] \
         -font "Arial 9"