Changeset 1220 for trunk/gui/scripts/heightmapviewer.tcl

Timestamp:

Nov 17, 2008, 2:20:16 PM (16 years ago)

Author:

gah

Message:

Improve data read speed of curve object with vectors; Add pan and scrollwheel features to 3d viewers

File:

• trunk/gui/scripts/heightmapviewer.tcl (modified) (1 diff)

trunk/gui/scripts/heightmapviewer.tcl

@@ -738 +738 @@
     }
 
-    #
+    # Reset the screen size.  
+    set w [winfo width $itk_component(3dview)]
+    set h [winfo height $itk_component(3dview)]
+    _send "screen $w $h"
+
     # Reset the camera and other view parameters
-    #
-    _send "camera angle [Euler2XYZ $_view(theta) $_view(phi) $_view(psi)]"
+    set xyz [Euler2XYZ $_view(theta) $_view(phi) $_view(psi)]
+    _send "camera angle $xyz"
     _send "camera zoom $_view(zoom)"