add new functionality
authorca
Mon, 09 Feb 1998 11:47:09 +0100
changeset 751 616686a9b678
parent 750 83350b3b5d67
child 752 271edd188ab6
add new functionality
GraphColumnView2DSpec.st
GraphColumnView3DSpec.st
GraphColumnViewSpec.st
--- a/GraphColumnView2DSpec.st	Mon Feb 09 11:45:19 1998 +0100
+++ b/GraphColumnView2DSpec.st	Mon Feb 09 11:47:09 1998 +0100
@@ -50,104 +50,7 @@
 
 !GraphColumnView2DSpec class methodsFor:'interface specs'!
 
-basicsMiscSpec
-    "this window spec was automatically generated by the ST/X UIPainter"
-
-    "do not manually edit this - the painter/builder may not be able to
-     handle the specification if its corrupted."
-
-    "
-     UIPainter new openOnClass:self andSelector:#basicsMiscSpec
-     self new openInterface:#basicsMiscSpec
-    "
-
-    <resource: #canvas>
-
-    ^
-     
-       #(#FullSpec
-          #'window:' 
-           #(#WindowSpec
-              #'name:' 'Graph 2D Misc'
-              #'layout:' #(#LayoutFrame 219 0 193 0 559 0 417 0)
-              #'label:' 'Graph 2D Misc'
-              #'min:' #(#Point 10 10)
-              #'max:' #(#Point 1160 870)
-              #'bounds:' #(#Rectangle 219 193 560 418)
-              #'usePreferredExtent:' false
-          )
-          #'component:' 
-           #(#SpecCollection
-              #'collection:' 
-               #(
-                 #(#LabelSpec
-                    #'name:' 'buttonCallbacks'
-                    #'layout:' #(#LayoutOrigin 20 0 29 0)
-                    #'label:' 'Button Event Callbacks:'
-                    #'adjust:' #left
-                    #'resizeForLabel:' true
-                )
-                 #(#LabelSpec
-                    #'name:' 'singleClickLabel'
-                    #'layout:' #(#AlignmentOrigin 135 0 67 0 1 0.5)
-                    #'label:' 'Single Click:'
-                    #'adjust:' #right
-                    #'resizeForLabel:' true
-                )
-                 #(#InputFieldSpec
-                    #'name:' 'singleClickField'
-                    #'layout:' #(#LayoutFrame 139 0 55 0 -2 1 80 0)
-                    #'model:' #actionBlock
-                )
-                 #(#LabelSpec
-                    #'name:' 'doubleClickLabel'
-                    #'layout:' #(#AlignmentOrigin 135 0 95 0 1 0.5)
-                    #'label:' 'Double Click:'
-                    #'adjust:' #right
-                    #'resizeForLabel:' true
-                )
-                 #(#InputFieldSpec
-                    #'name:' 'doubleClickField'
-                    #'layout:' #(#LayoutFrame 139 0 83 0 -2 1 108 0)
-                    #'model:' #doubleClickBlock
-                )
-                 #(#LabelSpec
-                    #'name:' 'releaseButtonLabel'
-                    #'layout:' #(#AlignmentOrigin 135 0 124 0 1 0.5)
-                    #'label:' 'Release Button:'
-                    #'adjust:' #right
-                    #'resizeForLabel:' true
-                )
-                 #(#InputFieldSpec
-                    #'name:' 'releaseButtonField'
-                    #'layout:' #(#LayoutFrame 139 0 112 0 -2 1 137 0)
-                    #'model:' #buttonReleaseBlock
-                )
-                 #(#LabelSpec
-                    #'name:' 'menuAccessLabel'
-                    #'layout:' #(#AlignmentOrigin 135 0 202 0 1 0.5)
-                    #'label:' 'Menu Access:'
-                    #'adjust:' #right
-                    #'resizeForLabel:' true
-                )
-                 #(#InputFieldSpec
-                    #'name:' 'menuAccessField'
-                    #'layout:' #(#LayoutFrame 139 0 190 0 -2 1 215 0)
-                    #'model:' #menuAccessBlock
-                )
-                 #(#LabelSpec
-                    #'name:' 'menuCallbacks'
-                    #'layout:' #(#LayoutOrigin 20 0 165 0)
-                    #'label:' 'Menu Callbacks:'
-                    #'adjust:' #left
-                    #'resizeForLabel:' true
-                )
-              )
-          )
-      )
-!
-
-detailsEditSpec
+XXdetailsEditSpec
     "this window spec was automatically generated by the ST/X UIPainter"
 
     "do not manually edit this - the painter/builder may not be able to
@@ -286,6 +189,235 @@
               )
           )
       )
+!
+
+YYdetailsEditSpec
+    "this window spec was automatically generated by the ST/X UIPainter"
+
+    "do not manually edit this - the painter/builder may not be able to
+     handle the specification if its corrupted."
+
+    "
+     UIPainter new openOnClass:self andSelector:#detailsEditSpec
+     self new openInterface:#detailsEditSpec
+    "
+
+    <resource: #canvas>
+
+    ^
+
+       #(#FullSpec
+          #'window:' 
+           #(#WindowSpec
+              #'name:' 'Graph 2D Detail'
+              #'layout:' #(#LayoutFrame 6 0 142 0 379 0 445 0)
+              #'label:' 'Graph 2D Detail'
+              #'min:' #(#Point 10 10)
+              #'max:' #(#Point 1160 870)
+              #'bounds:' #(#Rectangle 6 142 380 446)
+              #'usePreferredExtent:' false
+          )
+          #'component:' 
+           #(#SpecCollection
+              #'collection:' 
+               #(
+                 #(#UISubSpecification
+                    #'name:' 'subDetailsSpec'
+                    #'layout:' #(#LayoutFrame 0 0.0 0 0 0 1.0 210 0)
+                    #'minorKey:' #subDetailsEditSpec
+                )
+                 #(#CheckBoxSpec
+                    #'name:' 'showGrid'
+                    #'layout:' #(#Point 27 259)
+                    #'tabable:' true
+                    #'model:' #showGrid
+                    #'label:' 'Show Grid'
+                )
+                 #(#LabelSpec
+                    #'name:' 'zoomZLabel'
+                    #'layout:' #(#AlignmentOrigin 157 0 220 0 1 0.5)
+                    #'label:' 'Zoom-Z Factor:'
+                    #'adjust:' #left
+                    #'resizeForLabel:' true
+                )
+                 #(#InputFieldSpec
+                    #'name:' 'zoomZField'
+                    #'layout:' #(#LayoutFrame 161 0 210 0 -2 1.0 232 0)
+                    #'model:' #zoomZ
+                )
+              )
+          )
+      )
+
+!
+
+basicsMiscSpec
+    "this window spec was automatically generated by the ST/X UIPainter"
+
+    "do not manually edit this - the painter/builder may not be able to
+     handle the specification if its corrupted."
+
+    "
+     UIPainter new openOnClass:self andSelector:#basicsMiscSpec
+     self new openInterface:#basicsMiscSpec
+    "
+
+    <resource: #canvas>
+
+    ^
+     
+       #(#FullSpec
+          #'window:' 
+           #(#WindowSpec
+              #'name:' 'Graph 2D Misc'
+              #'layout:' #(#LayoutFrame 219 0 193 0 559 0 417 0)
+              #'label:' 'Graph 2D Misc'
+              #'min:' #(#Point 10 10)
+              #'max:' #(#Point 1160 870)
+              #'bounds:' #(#Rectangle 219 193 560 418)
+              #'usePreferredExtent:' false
+          )
+          #'component:' 
+           #(#SpecCollection
+              #'collection:' 
+               #(
+                 #(#LabelSpec
+                    #'name:' 'buttonCallbacks'
+                    #'layout:' #(#LayoutOrigin 20 0 29 0)
+                    #'label:' 'Button Event Callbacks:'
+                    #'adjust:' #left
+                    #'resizeForLabel:' true
+                )
+                 #(#LabelSpec
+                    #'name:' 'singleClickLabel'
+                    #'layout:' #(#AlignmentOrigin 135 0 67 0 1 0.5)
+                    #'label:' 'Single Click:'
+                    #'adjust:' #right
+                    #'resizeForLabel:' true
+                )
+                 #(#InputFieldSpec
+                    #'name:' 'singleClickField'
+                    #'layout:' #(#LayoutFrame 139 0 55 0 -2 1 80 0)
+                    #'model:' #actionBlock
+                )
+                 #(#LabelSpec
+                    #'name:' 'doubleClickLabel'
+                    #'layout:' #(#AlignmentOrigin 135 0 95 0 1 0.5)
+                    #'label:' 'Double Click:'
+                    #'adjust:' #right
+                    #'resizeForLabel:' true
+                )
+                 #(#InputFieldSpec
+                    #'name:' 'doubleClickField'
+                    #'layout:' #(#LayoutFrame 139 0 83 0 -2 1 108 0)
+                    #'model:' #doubleClickBlock
+                )
+                 #(#LabelSpec
+                    #'name:' 'releaseButtonLabel'
+                    #'layout:' #(#AlignmentOrigin 135 0 124 0 1 0.5)
+                    #'label:' 'Release Button:'
+                    #'adjust:' #right
+                    #'resizeForLabel:' true
+                )
+                 #(#InputFieldSpec
+                    #'name:' 'releaseButtonField'
+                    #'layout:' #(#LayoutFrame 139 0 112 0 -2 1 137 0)
+                    #'model:' #buttonReleaseBlock
+                )
+                 #(#LabelSpec
+                    #'name:' 'menuAccessLabel'
+                    #'layout:' #(#AlignmentOrigin 135 0 202 0 1 0.5)
+                    #'label:' 'Menu Access:'
+                    #'adjust:' #right
+                    #'resizeForLabel:' true
+                )
+                 #(#InputFieldSpec
+                    #'name:' 'menuAccessField'
+                    #'layout:' #(#LayoutFrame 139 0 190 0 -2 1 215 0)
+                    #'model:' #menuAccessBlock
+                )
+                 #(#LabelSpec
+                    #'name:' 'menuCallbacks'
+                    #'layout:' #(#LayoutOrigin 20 0 165 0)
+                    #'label:' 'Menu Callbacks:'
+                    #'adjust:' #left
+                    #'resizeForLabel:' true
+                )
+              )
+          )
+      )
+!
+
+detailsEditSpec
+    "this window spec was automatically generated by the ST/X UIPainter"
+
+    "do not manually edit this - the painter/builder may not be able to
+     handle the specification if its corrupted."
+
+    "
+     UIPainter new openOnClass:GraphColumnView2DSpec andSelector:#detailsEditSpec
+     GraphColumnView2DSpec new openInterface:#detailsEditSpec
+    "
+
+    <resource: #canvas>
+
+    ^
+     
+       #(#FullSpec
+          #'window:' 
+           #(#WindowSpec
+              #'name:' 'Graph 2D Detail'
+              #'layout:' #(#LayoutFrame 114 0 536 0 487 0 839 0)
+              #'label:' 'Graph 2D Detail'
+              #'min:' #(#Point 10 10)
+              #'max:' #(#Point 1160 870)
+              #'bounds:' #(#Rectangle 114 536 488 840)
+              #'usePreferredExtent:' false
+          )
+          #'component:' 
+           #(#SpecCollection
+              #'collection:' 
+               #(
+                 #(#UISubSpecification
+                    #'name:' 'subDetailsSpec'
+                    #'layout:' #(#LayoutFrame 0 0.0 0 0 0 1.0 210 0)
+                    #'majorKey:' #GraphColumnViewSpec
+                    #'minorKey:' #subDetailsEditSpec
+                )
+                 #(#CheckBoxSpec
+                    #'name:' 'showGrid'
+                    #'layout:' #(#Point 27 259)
+                    #'tabable:' true
+                    #'model:' #showGrid
+                    #'label:' 'Show Grid'
+                )
+                 #(#InputFieldSpec
+                    #'name:' 'extentXfield'
+                    #'layout:' #(#LayoutFrame 161 0 224 0 190 0 246 0)
+                    #'model:' #gridX
+                )
+                 #(#InputFieldSpec
+                    #'name:' 'extentYfield'
+                    #'layout:' #(#LayoutFrame 217 0 224 0 246 0 246 0)
+                    #'model:' #gridY
+                )
+                 #(#LabelSpec
+                    #'name:' 'extentYlabel'
+                    #'layout:' #(#AlignmentOrigin 214 0 234 0 1 0.5)
+                    #'label:' 'Y:'
+                    #'adjust:' #left
+                    #'resizeForLabel:' true
+                )
+                 #(#LabelSpec
+                    #'name:' 'extentXlabel'
+                    #'layout:' #(#AlignmentOrigin 157 0 234 0 1 0.5)
+                    #'label:' 'Grid Extent X:'
+                    #'adjust:' #left
+                    #'resizeForLabel:' true
+                )
+              )
+          )
+      )
 ! !
 
 !GraphColumnView2DSpec methodsFor:'accessing'!
@@ -445,5 +577,5 @@
 !GraphColumnView2DSpec class methodsFor:'documentation'!
 
 version
-    ^ '$Header: /cvs/stx/stx/libwidg2/GraphColumnView2DSpec.st,v 1.2 1998-02-07 15:51:11 ca Exp $'
+    ^ '$Header: /cvs/stx/stx/libwidg2/GraphColumnView2DSpec.st,v 1.3 1998-02-09 10:47:09 ca Exp $'
 ! !
--- a/GraphColumnView3DSpec.st	Mon Feb 09 11:45:19 1998 +0100
+++ b/GraphColumnView3DSpec.st	Mon Feb 09 11:47:09 1998 +0100
@@ -31,6 +31,7 @@
     ^ #(
             (Basics    basicsEditSpec)
             (Details   detailsEditSpec)
+            (Misc      basicsMiscSpec)
        )
 
 
@@ -38,6 +39,83 @@
 
 !GraphColumnView3DSpec class methodsFor:'interface specs'!
 
+basicsMiscSpec
+    "this window spec was automatically generated by the ST/X UIPainter"
+
+    "do not manually edit this - the painter/builder may not be able to
+     handle the specification if its corrupted."
+
+    "
+     UIPainter new openOnClass:GraphColumnView3DSpec andSelector:#basicsMiscSpec
+     GraphColumnView3DSpec new openInterface:#basicsMiscSpec
+    "
+
+    <resource: #canvas>
+
+    ^
+     
+       #(#FullSpec
+          #'window:' 
+           #(#WindowSpec
+              #'name:' 'Graph 2D Detail'
+              #'layout:' #(#LayoutFrame 530 0 165 0 914 0 671 0)
+              #'label:' 'Graph 2D Detail'
+              #'min:' #(#Point 10 10)
+              #'max:' #(#Point 1160 870)
+              #'bounds:' #(#Rectangle 530 165 915 672)
+              #'usePreferredExtent:' false
+          )
+          #'component:' 
+           #(#SpecCollection
+              #'collection:' 
+               #(
+                 #(#LabelSpec
+                    #'name:' 'RotationLabel'
+                    #'layout:' #(#Point 22 21)
+                    #'label:' 'Rotation:'
+                    #'resizeForLabel:' true
+                )
+                 #(#LabelSpec
+                    #'name:' 'XLabel'
+                    #'layout:' #(#AlignmentOrigin 75 0 62 0 1 0.5)
+                    #'label:' 'X:'
+                    #'adjust:' #left
+                    #'resizeForLabel:' true
+                )
+                 #(#InputFieldSpec
+                    #'name:' 'XField'
+                    #'layout:' #(#LayoutFrame 80 0 52 0 -2 1.0 74 0)
+                    #'model:' #rotateX
+                )
+                 #(#LabelSpec
+                    #'name:' 'YLabel'
+                    #'layout:' #(#AlignmentOrigin 75 0 85 0 1 0.5)
+                    #'label:' 'Y:'
+                    #'adjust:' #left
+                    #'resizeForLabel:' true
+                )
+                 #(#InputFieldSpec
+                    #'name:' 'YField'
+                    #'layout:' #(#LayoutFrame 80 0 75 0 -2 1.0 97 0)
+                    #'model:' #rotateY
+                )
+                 #(#LabelSpec
+                    #'name:' 'ZLabel'
+                    #'layout:' #(#AlignmentOrigin 75 0 108 0 1 0.5)
+                    #'label:' 'Z:'
+                    #'adjust:' #left
+                    #'resizeForLabel:' true
+                )
+                 #(#InputFieldSpec
+                    #'name:' 'ZField'
+                    #'layout:' #(#LayoutFrame 80 0 98 0 -2 1.0 120 0)
+                    #'model:' #rotateZ
+                )
+              )
+          )
+      )
+!
+
 detailsEditSpec
     "this window spec was automatically generated by the ST/X UIPainter"
 
@@ -57,123 +135,41 @@
           #'window:' 
            #(#WindowSpec
               #'name:' 'Graph 2D Detail'
-              #'layout:' #(#LayoutFrame 36 0 208 0 380 0 560 0)
+              #'layout:' #(#LayoutFrame 6 0 142 0 379 0 445 0)
               #'label:' 'Graph 2D Detail'
               #'min:' #(#Point 10 10)
               #'max:' #(#Point 1160 870)
-              #'bounds:' #(#Rectangle 36 208 381 561)
+              #'bounds:' #(#Rectangle 6 142 380 446)
               #'usePreferredExtent:' false
           )
           #'component:' 
            #(#SpecCollection
               #'collection:' 
                #(
-                 #(#LabelSpec
-                    #'name:' 'borderWidthLabel'
-                    #'layout:' #(#AlignmentOrigin 157 0 35 0 1 0.5)
-                    #'label:' 'Border Width:'
-                    #'adjust:' #left
-                    #'resizeForLabel:' true
-                )
-                 #(#InputFieldSpec
-                    #'name:' 'borderWidthField'
-                    #'layout:' #(#LayoutFrame 161 0 24 0 197 0 46 0)
-                    #'activeHelpKey:' #borderWidth
-                    #'tabable:' true
-                    #'model:' #borderWidth
-                )
-                 #(#LabelSpec
-                    #'name:' 'levelLabel'
-                    #'layout:' #(#AlignmentOrigin 157 0 60 0 1 0.5)
-                    #'label:' 'Level:'
-                    #'resizeForLabel:' true
-                )
-                 #(#InputFieldSpec
-                    #'name:' 'levelField'
-                    #'layout:' #(#LayoutFrame 161 0 50 0 197 0 72 0)
-                    #'activeHelpKey:' #level
-                    #'tabable:' true
-                    #'model:' #level
+                 #(#UISubSpecification
+                    #'name:' 'subDetailsSpec'
+                    #'layout:' #(#LayoutFrame 0 0.0 0 0 0 1.0 210 0)
+                    #'minorKey:' #subDetailsEditSpec
                 )
                  #(#CheckBoxSpec
                     #'name:' 'showGrid'
-                    #'layout:' #(#Point 18 240)
+                    #'layout:' #(#Point 27 259)
                     #'tabable:' true
                     #'model:' #showGrid
                     #'label:' 'Show Grid'
                 )
                  #(#LabelSpec
-                    #'name:' 'windowSizeLabel'
-                    #'layout:' #(#AlignmentOrigin 157 0 92 0 1 0.5)
-                    #'label:' 'Window Size:'
-                    #'adjust:' #left
-                    #'resizeForLabel:' true
-                )
-                 #(#InputFieldSpec
-                    #'name:' 'windowSizeField'
-                    #'layout:' #(#LayoutFrame 161 0 82 0 -2 1.0 104 0)
-                    #'model:' #windowSize
-                )
-                 #(#LabelSpec
-                    #'name:' 'zoomYLabel'
-                    #'layout:' #(#AlignmentOrigin 157 0 115 0 1 0.5)
-                    #'label:' 'Zoom-Y Factor:'
-                    #'adjust:' #left
-                    #'resizeForLabel:' true
-                )
-                 #(#InputFieldSpec
-                    #'name:' 'zoomYField'
-                    #'layout:' #(#LayoutFrame 161 0 105 0 -2 1.0 127 0)
-                    #'model:' #zoomY
-                )
-                 #(#LabelSpec
                     #'name:' 'zoomZLabel'
-                    #'layout:' #(#AlignmentOrigin 157 0 138 0 1 0.5)
+                    #'layout:' #(#AlignmentOrigin 157 0 220 0 1 0.5)
                     #'label:' 'Zoom-Z Factor:'
                     #'adjust:' #left
                     #'resizeForLabel:' true
                 )
                  #(#InputFieldSpec
                     #'name:' 'zoomZField'
-                    #'layout:' #(#LayoutFrame 161 0 128 0 -2 1.0 150 0)
+                    #'layout:' #(#LayoutFrame 161 0 210 0 -2 1.0 232 0)
                     #'model:' #zoomZ
                 )
-                 #(#LabelSpec
-                    #'name:' 'rotateXLabel'
-                    #'layout:' #(#AlignmentOrigin 157 0 169 0 1 0.5)
-                    #'label:' 'Rotate X:'
-                    #'adjust:' #left
-                    #'resizeForLabel:' true
-                )
-                 #(#InputFieldSpec
-                    #'name:' 'rotateXField'
-                    #'layout:' #(#LayoutFrame 161 0 159 0 -2 1.0 181 0)
-                    #'model:' #rotateX
-                )
-                 #(#LabelSpec
-                    #'name:' 'rotateYLabel'
-                    #'layout:' #(#AlignmentOrigin 157 0 192 0 1 0.5)
-                    #'label:' 'Rotate Y:'
-                    #'adjust:' #left
-                    #'resizeForLabel:' true
-                )
-                 #(#InputFieldSpec
-                    #'name:' 'rotateYField'
-                    #'layout:' #(#LayoutFrame 161 0 182 0 -2 1.0 204 0)
-                    #'model:' #rotateY
-                )
-                 #(#LabelSpec
-                    #'name:' 'rotateZLabel'
-                    #'layout:' #(#AlignmentOrigin 157 0 215 0 1 0.5)
-                    #'label:' 'Rotate Z:'
-                    #'adjust:' #left
-                    #'resizeForLabel:' true
-                )
-                 #(#InputFieldSpec
-                    #'name:' 'rotateZField'
-                    #'layout:' #(#LayoutFrame 161 0 205 0 -2 1.0 227 0)
-                    #'model:' #rotateZ
-                )
               )
           )
       )
@@ -296,5 +292,5 @@
 !GraphColumnView3DSpec class methodsFor:'documentation'!
 
 version
-    ^ '$Header: /cvs/stx/stx/libwidg2/GraphColumnView3DSpec.st,v 1.2 1998-02-07 15:51:17 ca Exp $'
+    ^ '$Header: /cvs/stx/stx/libwidg2/GraphColumnView3DSpec.st,v 1.3 1998-02-09 10:47:02 ca Exp $'
 ! !
--- a/GraphColumnViewSpec.st	Mon Feb 09 11:45:19 1998 +0100
+++ b/GraphColumnViewSpec.st	Mon Feb 09 11:47:09 1998 +0100
@@ -1,6 +1,6 @@
 MenuComponentSpec subclass:#GraphColumnViewSpec
 	instanceVariableNames:'listHolder showGrid showDefaultMenu level borderWidth zoomY
-		windowSize'
+		windowSize graphOriginX scrollUpdatesOriginX vLines'
 	classVariableNames:''
 	poolDictionaries:''
 	category:'Interface-Support-UI-Specs'
@@ -43,6 +43,7 @@
                     #(  
                         showGrid
                         showDefaultMenu
+                        scrollUpdatesOriginX
                      )
         to:env 
         for:inst 
@@ -53,6 +54,8 @@
                     #(  
                         zoomY
                         windowSize
+                        graphOriginX
+                        vLines
                      )
         to:env 
         for:inst 
@@ -214,6 +217,122 @@
               )
           )
       )
+!
+
+subDetailsEditSpec
+    "this window spec was automatically generated by the ST/X UIPainter"
+
+    "do not manually edit this - the painter/builder may not be able to
+     handle the specification if its corrupted."
+
+    "
+     UIPainter new openOnClass:GraphColumnViewSpec andSelector:#subDetailsEditSpec
+     GraphColumnViewSpec new openInterface:#subDetailsEditSpec
+    "
+
+    <resource: #canvas>
+
+    ^
+     
+       #(#FullSpec
+          #'window:' 
+           #(#WindowSpec
+              #'name:' 'Graph 2D Detail'
+              #'layout:' #(#LayoutFrame 87 0 179 0 431 0 531 0)
+              #'label:' 'Graph 2D Detail'
+              #'min:' #(#Point 10 10)
+              #'max:' #(#Point 1160 870)
+              #'bounds:' #(#Rectangle 87 179 432 532)
+              #'usePreferredExtent:' false
+          )
+          #'component:' 
+           #(#SpecCollection
+              #'collection:' 
+               #(
+                 #(#LabelSpec
+                    #'name:' 'borderWidthLabel'
+                    #'layout:' #(#AlignmentOrigin 157 0 35 0 1 0.5)
+                    #'label:' 'Border Width:'
+                    #'adjust:' #left
+                    #'resizeForLabel:' true
+                )
+                 #(#InputFieldSpec
+                    #'name:' 'borderWidthField'
+                    #'layout:' #(#LayoutFrame 161 0 24 0 197 0 46 0)
+                    #'activeHelpKey:' #borderWidth
+                    #'tabable:' true
+                    #'model:' #borderWidth
+                )
+                 #(#LabelSpec
+                    #'name:' 'levelLabel'
+                    #'layout:' #(#AlignmentOrigin 157 0 60 0 1 0.5)
+                    #'label:' 'Level:'
+                    #'resizeForLabel:' true
+                )
+                 #(#InputFieldSpec
+                    #'name:' 'levelField'
+                    #'layout:' #(#LayoutFrame 161 0 50 0 197 0 72 0)
+                    #'activeHelpKey:' #level
+                    #'tabable:' true
+                    #'model:' #level
+                )
+                 #(#LabelSpec
+                    #'name:' 'windowSizeLabel'
+                    #'layout:' #(#AlignmentOrigin 157 0 172 0 1 0.5)
+                    #'label:' 'Window Size:'
+                    #'adjust:' #left
+                    #'resizeForLabel:' true
+                )
+                 #(#InputFieldSpec
+                    #'name:' 'windowSizeField'
+                    #'layout:' #(#LayoutFrame 161 0 162 0 -2 1.0 184 0)
+                    #'model:' #windowSize
+                )
+                 #(#LabelSpec
+                    #'name:' 'zoomYLabel'
+                    #'layout:' #(#AlignmentOrigin 157 0 196 0 1 0.5)
+                    #'label:' 'Zoom-Y Factor:'
+                    #'adjust:' #left
+                    #'resizeForLabel:' true
+                )
+                 #(#InputFieldSpec
+                    #'name:' 'zoomYField'
+                    #'layout:' #(#LayoutFrame 161 0 186 0 -2 1.0 208 0)
+                    #'model:' #zoomY
+                )
+                 #(#LabelSpec
+                    #'name:' 'vLinesLabel'
+                    #'layout:' #(#AlignmentOrigin 157 0 90 0 1 0.5)
+                    #'label:' 'V-Lines List'
+                    #'adjust:' #left
+                    #'resizeForLabel:' true
+                )
+                 #(#InputFieldSpec
+                    #'name:' 'vLinesField'
+                    #'layout:' #(#LayoutFrame 161 0 80 0 -2 1.0 102 0)
+                    #'model:' #vLines
+                )
+                 #(#LabelSpec
+                    #'name:' 'graphOriginXLabel'
+                    #'layout:' #(#AlignmentOrigin 157 0 117 0 1 0.5)
+                    #'label:' 'Origin X'
+                    #'adjust:' #left
+                    #'resizeForLabel:' true
+                )
+                 #(#InputFieldSpec
+                    #'name:' 'graphOriginXField'
+                    #'layout:' #(#LayoutFrame 161 0 107 0 -2 1.0 129 0)
+                    #'model:' #graphOriginX
+                )
+                 #(#CheckBoxSpec
+                    #'name:' 'scrollUpdatesOriginX'
+                    #'layout:' #(#AlignmentOrigin 158 0 141 0 0 0.5)
+                    #'model:' #scrollUpdatesOriginX
+                    #'label:' 'Scroll updates Origin X'
+                )
+              )
+          )
+      )
 ! !
 
 !GraphColumnViewSpec methodsFor:'accessing'!
@@ -229,6 +348,16 @@
 
     borderWidth := something.!
 
+graphOriginX
+    "return the value of the instance variable 'graphOriginX' (automatically generated)"
+
+    ^ graphOriginX!
+
+graphOriginX:something
+    "set the value of the instance variable 'graphOriginX' (automatically generated)"
+
+    graphOriginX := something.!
+
 level
     "return the value of the instance variable 'level' (automatically generated)"
 
@@ -250,6 +379,18 @@
 
     listHolder := something.!
 
+scrollUpdatesOriginX
+    "return the value of the instance variable 'scrollUpdatesOriginX' (automatically generated)"
+
+    ^ scrollUpdatesOriginX ? false
+!
+
+scrollUpdatesOriginX:something
+    "set the value of the instance variable 'scrollUpdatesOriginX' (automatically generated)"
+
+    scrollUpdatesOriginX := something.
+!
+
 showDefaultMenu
     "return the value of the instance variable 'showDefaultMenu' (automatically generated)"
 
@@ -272,6 +413,16 @@
 
     showGrid := something.!
 
+vLines
+    "return the value of the instance variable 'vLines' (automatically generated)"
+
+    ^ vLines!
+
+vLines:something
+    "set the value of the instance variable 'vLines' (automatically generated)"
+
+    vLines := something.!
+
 windowSize
     "return the value of the instance variable 'windowSize' (automatically generated)"
 
@@ -301,8 +452,10 @@
 
     more := super aspectSelectors.
 
-    windowSize notNil ifTrue:[more add:windowSize].
-    zoomY      notNil ifTrue:[more add:zoomY].
+    windowSize   notNil ifTrue:[more add:windowSize].
+    graphOriginX notNil ifTrue:[more add:graphOriginX].
+    vLines       notNil ifTrue:[more add:vLines].
+    zoomY        notNil ifTrue:[more add:zoomY].
 
   ^ more
 !
@@ -313,6 +466,7 @@
 
     aView level:(self level).
     aView showGrid:(self showGrid).
+    aView scrollUpdatesOriginX:(self scrollUpdatesOriginX).
     aView showDefaultMenu:(self showDefaultMenu).
 
     aView borderWidth:(self borderWidth).
@@ -322,6 +476,14 @@
             aView windowSizeHolder:(self getBindingIn:aBuilder binding:windowSize)
         ].
 
+        graphOriginX notNil ifTrue:[
+            aView graphOriginXHolder:(self getBindingIn:aBuilder binding:graphOriginX)
+        ].
+
+        vLines notNil ifTrue:[
+            aView vLinesHolder:(self getBindingIn:aBuilder binding:vLines)
+        ].
+
         zoomY notNil ifTrue:[
             aView zoomYHolder:(self getBindingIn:aBuilder binding:zoomY)
         ].
@@ -340,11 +502,17 @@
 
     l := super skippedInLiteralEncoding asOrderedCollection.
 
-    zoomY              isNil ifTrue:[l add:#zoomY].
-    windowSize         isNil ifTrue:[l add:#windowSize].
+    zoomY        isNil ifTrue:[l add:#zoomY].
+    windowSize   isNil ifTrue:[l add:#windowSize].
+    graphOriginX isNil ifTrue:[l add:#graphOriginX].
+    vLines       isNil ifTrue:[l add:#vLines].
 
     self showGrid ifFalse:[
-        l add:#showGrid.
+        l add:#showGrid
+    ].
+
+    self scrollUpdatesOriginX ifFalse:[
+        l add:#scrollUpdatesOriginX
     ].
 
     (self showDefaultMenu and:[menu isNil]) ifFalse:[
@@ -365,10 +533,11 @@
 
 fromView:aView callBack:aBlock
 
-    showGrid        := aView showGrid.
-    showDefaultMenu := aView showDefaultMenu.
-    level           := aView level.
-    borderWidth     := aView borderWidth.
+    showGrid             := aView showGrid.
+    showDefaultMenu      := aView showDefaultMenu.
+    level                := aView level.
+    borderWidth          := aView borderWidth.
+    scrollUpdatesOriginX := aView scrollUpdatesOriginX.
 
     super fromView:aView callBack:aBlock
 
@@ -386,6 +555,6 @@
 !GraphColumnViewSpec class methodsFor:'documentation'!
 
 version
-    ^ '$Header: /cvs/stx/stx/libwidg2/GraphColumnViewSpec.st,v 1.3 1998-02-07 16:01:49 ca Exp $'
+    ^ '$Header: /cvs/stx/stx/libwidg2/GraphColumnViewSpec.st,v 1.4 1998-02-09 10:46:55 ca Exp $'
 ! !
 GraphColumnViewSpec initialize!