diff -r 7a4749b25748 -r 6dc446339dc2 UIPainter.st
--- a/UIPainter.st	Thu Jan 29 19:44:04 1998 +0100
+++ b/UIPainter.st	Thu Jan 29 19:57:15 1998 +0100
@@ -309,55 +309,67 @@
        #(#FullSpec
           #'window:' 
            #(#WindowSpec
-              #'name:' 'Grid Parameters:'
-              #'layout:' #(#LayoutFrame 229 0 394 0 494 0 543 0)
-              #'label:' 'Grid Parameters:'
+              #'name:' 'GUI Builder'
+              #'layout:' #(#LayoutFrame 44 0 416 0 325 0 613 0)
+              #'label:' 'GUI Builder'
               #'min:' #(#Point 10 10)
               #'max:' #(#Point 1280 1024)
-              #'bounds:' #(#Rectangle 229 394 495 544)
+              #'bounds:' #(#Rectangle 44 416 326 614)
               #'usePreferredExtent:' false
           )
           #'component:' 
            #(#SpecCollection
               #'collection:' 
                #(
-                 #(#CheckBoxSpec
-                    #'name:' 'show'
-                    #'layout:' #(#Point 13 14)
-                    #'model:' #showGrid
-                    #'label:' 'Show grid'
-                )
-                 #(#CheckBoxSpec
-                    #'name:' 'align'
-                    #'layout:' #(#Point 117 14)
-                    #'model:' #alignToGrid
-                    #'label:' 'Align to Grid'
-                )
-                 #(#LabelSpec
-                    #'name:' 'hrzLabel'
-                    #'layout:' #(#AlignmentOrigin 136 0 62 0 1 0.5)
-                    #'label:' 'Horizontal Pixels:'
-                    #'adjust:' #right
-                    #'resizeForLabel:' true
-                )
-                 #(#InputFieldSpec
-                    #'name:' 'hrzField'
-                    #'layout:' #(#LayoutFrame 141 0 51 0 194 0 73 0)
-                    #'model:' #hspace
-                    #'type:' #numberOrNil
-                )
-                 #(#LabelSpec
-                    #'name:' 'vrtLabel'
-                    #'layout:' #(#AlignmentOrigin 137 0 85 0 1 0.5)
-                    #'label:' 'Vertical Pixels:'
-                    #'adjust:' #right
-                    #'resizeForLabel:' true
-                )
-                 #(#InputFieldSpec
-                    #'name:' 'vrtField'
-                    #'layout:' #(#LayoutFrame 141 0 74 0 194 0 96 0)
-                    #'model:' #vspace
-                    #'type:' #numberOrNil
+                 #(#FramedBoxSpec
+                    #'name:' 'framedBox'
+                    #'layout:' #(#LayoutFrame 0 0.0 3 0.0 0 1.0 -35 1.0)
+                    #'component:' 
+                     #(#SpecCollection
+                        #'collection:' 
+                         #(
+                           #(#CheckBoxSpec
+                              #'name:' 'show'
+                              #'layout:' #(#Point 23 24)
+                              #'model:' #showGrid
+                              #'label:' 'Show grid'
+                          )
+                           #(#CheckBoxSpec
+                              #'name:' 'align'
+                              #'layout:' #(#Point 23 52)
+                              #'model:' #alignToGrid
+                              #'label:' 'Align to Grid'
+                          )
+                           #(#LabelSpec
+                              #'name:' 'hrzLabel'
+                              #'layout:' #(#AlignmentOrigin 148 0 99 0 1 0.5)
+                              #'label:' 'Horizontal Pixels:'
+                              #'adjust:' #right
+                              #'resizeForLabel:' true
+                          )
+                           #(#InputFieldSpec
+                              #'name:' 'hrzField'
+                              #'layout:' #(#LayoutFrame 154 0 87 0 207 0 109 0)
+                              #'model:' #hspace
+                              #'type:' #numberOrNil
+                          )
+                           #(#LabelSpec
+                              #'name:' 'vrtLabel'
+                              #'layout:' #(#AlignmentOrigin 149 0 124 0 1 0.5)
+                              #'label:' 'Vertical Pixels:'
+                              #'adjust:' #right
+                              #'resizeForLabel:' true
+                          )
+                           #(#InputFieldSpec
+                              #'name:' 'vrtField'
+                              #'layout:' #(#LayoutFrame 154 0 112 0 207 0 134 0)
+                              #'model:' #vspace
+                              #'type:' #numberOrNil
+                          )
+                        )
+                    )
+                    #'label:' 'Grid Parameter'
+                    #'labelPosition:' #topLeft
                 )
                  #(#UISubSpecification
                     #'name:' 'uISubSpecifica1'
@@ -388,64 +400,69 @@
        #(#FullSpec
           #'window:' 
            #(#WindowSpec
-              #'name:' 'Painter'
-              #'layout:' #(#LayoutFrame 101 0 328 0 491 0 497 0)
-              #'label:' 'Painter'
+              #'name:' 'GUI Builder'
+              #'layout:' #(#LayoutFrame 44 0 416 0 357 0 575 0)
+              #'label:' 'GUI Builder'
               #'min:' #(#Point 10 10)
               #'max:' #(#Point 1152 900)
-              #'bounds:' #(#Rectangle 101 328 492 498)
+              #'bounds:' #(#Rectangle 44 416 358 576)
               #'usePreferredExtent:' false
           )
           #'component:' 
            #(#SpecCollection
               #'collection:' 
                #(
-                 #(#LabelSpec
-                    #'name:' 'classLabel'
-                    #'layout:' #(#AlignmentOrigin 50 0.11 51 0 1 0.5)
-                    #'label:' 'Class:'
-                    #'adjust:' #right
-                    #'resizeForLabel:' true
-                )
-                 #(#LabelSpec
-                    #'name:' 'superClassLabel'
-                    #'layout:' #(#AlignmentOrigin 50 0.11 77 0 1 0.5)
-                    #'label:' 'Superclass:'
-                    #'adjust:' #right
-                    #'resizeForLabel:' true
-                )
-                 #(#LabelSpec
-                    #'name:' 'selectorLabel'
-                    #'layout:' #(#AlignmentOrigin 50 0.11 105 0 1 0.5)
-                    #'label:' 'Selector:'
-                    #'adjust:' #right
-                    #'resizeForLabel:' true
-                )
-                 #(#InputFieldSpec
-                    #'name:' 'methodNameField'
-                    #'layout:' #(#LayoutFrame 51 0.11 95 0 -2 1.0 117 0)
-                    #'tabable:' true
-                    #'model:' #methodNameChannel
-                )
-                 #(#LabelSpec
-                    #'name:' 'boxLabel'
-                    #'layout:' #(#Point 2 10)
-                    #'label:' 'Class and selector for interface:'
-                    #'adjust:' #left
-                    #'resizeForLabel:' true
-                )
-                 #(#InputFieldSpec
-                    #'name:' 'classNameField'
-                    #'layout:' #(#LayoutFrame 51 0.11 39 0 -2 1.0 61 0)
-                    #'tabable:' true
-                    #'model:' #classNameChannel
-                )
-                 #(#ComboBoxSpec
-                    #'name:' 'comboBox1'
-                    #'layout:' #(#LayoutFrame 51 0.11 67 0 0 1.0 89 0)
-                    #'tabable:' true
-                    #'model:' #superclassNameChannel
-                    #'comboList:' #superclassNameDefaults
+                 #(#FramedBoxSpec
+                    #'name:' 'framedBox1'
+                    #'layout:' #(#LayoutFrame 0 0.0 3 0.0 0 1.0 -35 1.0)
+                    #'component:' 
+                     #(#SpecCollection
+                        #'collection:' 
+                         #(
+                           #(#LabelSpec
+                              #'name:' 'selectorLabel'
+                              #'layout:' #(#AlignmentOrigin 63 0.11 39 0 1 0.5)
+                              #'label:' 'Selector:'
+                              #'adjust:' #right
+                              #'resizeForLabel:' true
+                          )
+                           #(#InputFieldSpec
+                              #'name:' 'methodNameField'
+                              #'layout:' #(#LayoutFrame 67 0.11 28 0 14 1.0 50 0)
+                              #'tabable:' true
+                              #'model:' #methodNameChannel
+                          )
+                           #(#LabelSpec
+                              #'name:' 'classLabel'
+                              #'layout:' #(#AlignmentOrigin 63 0.11 64 0 1 0.5)
+                              #'label:' 'Class:'
+                              #'adjust:' #right
+                              #'resizeForLabel:' true
+                          )
+                           #(#InputFieldSpec
+                              #'name:' 'classNameField'
+                              #'layout:' #(#LayoutFrame 67 0.11 53 0 14 1.0 75 0)
+                              #'tabable:' true
+                              #'model:' #classNameChannel
+                          )
+                           #(#LabelSpec
+                              #'name:' 'superClassLabel'
+                              #'layout:' #(#AlignmentOrigin 63 0.11 89 0 1 0.5)
+                              #'label:' 'Superclass:'
+                              #'adjust:' #right
+                              #'resizeForLabel:' true
+                          )
+                           #(#ComboBoxSpec
+                              #'name:' 'superclassNameComboBox'
+                              #'layout:' #(#LayoutFrame 67 0.11 78 0 14 1.0 100 0)
+                              #'tabable:' true
+                              #'model:' #superclassNameChannel
+                              #'comboList:' #superclassNameDefaults
+                          )
+                        )
+                    )
+                    #'label:' 'Class and selector for interface'
+                    #'labelPosition:' #topLeft
                 )
                  #(#UISubSpecification
                     #'name:' 'uISubSpecifica1'
@@ -551,7 +568,7 @@
                                                             #'tabable:' true
                                                             #'model:' #cancel
                                                             #'enableChannel:' #modifiedChannel
-                                                            #'extent:' #(#Point 179 24)
+                                                            #'extent:' #(#Point 79 24)
                                                         )
                                                          #(#ActionButtonSpec
                                                             #'name:' 'acceptButton'
@@ -560,7 +577,7 @@
                                                             #'tabable:' true
                                                             #'model:' #accept
                                                             #'enableChannel:' #modifiedChannel
-                                                            #'extent:' #(#Point 179 24)
+                                                            #'extent:' #(#Point 79 24)
                                                         )
                                                       )
                                                   )
@@ -650,8 +667,6 @@
               )
           )
       )
-
-    "Modified: / 28.1.1998 / 20:20:29 / cg"
 ! !
 
 !UIPainter class methodsFor:'menu specs'!