class: DataSetBuilder
authorClaus Gittinger <cg@exept.de>
Thu, 22 Aug 2013 20:20:46 +0200
changeset 3046 7d93b17e2c03
parent 3045 c1c9bfd7ad18
child 3047 704af58a697e
class: DataSetBuilder changed: #sortEditSpec #valuesEditSpec
DataSetBuilder.st
--- a/DataSetBuilder.st	Thu Aug 22 09:59:07 2013 +0200
+++ b/DataSetBuilder.st	Thu Aug 22 20:20:46 2013 +0200
@@ -1580,108 +1580,108 @@
     <resource: #canvas>
 
     ^ 
-     #(FullSpec
-        name: sortEditSpec
-        window: 
-       (WindowSpec
-          label: 'DataSet Basic'
-          name: 'DataSet Basic'
-          min: (Point 10 10)
-          bounds: (Rectangle 0 0 430 473)
-        )
-        component: 
-       (SpecCollection
-          collection: (
-           (VerticalPanelViewSpec
-              name: 'VerticalPanel1'
-              layout: (LayoutFrame 0 0.0 0 0.0 0 1.0 0 1.0)
-              horizontalLayout: fit
-              verticalLayout: top
-              horizontalSpace: 3
-              verticalSpace: 3
-              component: 
-             (SpecCollection
-                collection: (
-                 (FramedBoxSpec
-                    label: 'Sorting:'
-                    name: 'sortFrame'
-                    labelPosition: topLeft
-                    translateLabel: true
-                    component: 
-                   (SpecCollection
-                      collection: (
-                       (CheckBoxSpec
-                          label: 'Sortable'
-                          name: 'isSortable'
-                          layout: (LayoutOrigin -3 0 0 0)
-                          activeHelpKey: isSortable
-                          tabable: true
-                          model: isSortable
-                          translateLabel: true
-                        )
-                       (LabelSpec
-                          label: 'Sort Selector:'
-                          name: 'sortSelector'
-                          layout: (LayoutFrame 35 0 33 0 107 0 51 0)
-                          activeHelpKey: sortSelector
-                          translateLabel: true
-                          resizeForLabel: true
-                          adjust: right
-                        )
-                       (InputFieldSpec
-                          name: 'EntryField3'
-                          layout: (LayoutFrame 110 0 30 0 2 1 56 0)
-                          activeHelpKey: sortSelector
-                          enableChannel: isSortable
-                          tabable: true
-                          model: sortSelector
-                          group: inputGroup
-                          type: symbolOrNil
-                          immediateAccept: false
-                          acceptOnLeave: false
-                          acceptOnLostFocus: false
-                          acceptChannel: acceptChannel
-                          modifiedChannel: modifiedChannel
-                          acceptOnPointerLeave: false
-                        )
-                       (LabelSpec
-                          label: 'Sort Block Selector:'
-                          name: 'Label1'
-                          layout: (LayoutFrame -5 0 66 0 107 0 84 0)
-                          activeHelpKey: sortBlockSelector
-                          translateLabel: true
-                          resizeForLabel: true
-                          adjust: right
-                        )
-                       (InputFieldSpec
-                          name: 'EntryField4'
-                          layout: (LayoutFrame 110 0 63 0 2 1 89 0)
-                          activeHelpKey: sortBlockSelector
-                          enableChannel: isSortable
-                          tabable: true
-                          model: sortBlockSelector
-                          group: inputGroup
-                          type: symbolOrNil
-                          immediateAccept: false
-                          acceptOnLeave: false
-                          acceptOnLostFocus: false
-                          acceptChannel: acceptChannel
-                          modifiedChannel: modifiedChannel
-                          acceptOnPointerLeave: false
-                        )
+    #(FullSpec
+       name: sortEditSpec
+       window: 
+      (WindowSpec
+         label: 'DataSet Basic'
+         name: 'DataSet Basic'
+         min: (Point 10 10)
+         bounds: (Rectangle 0 0 430 473)
+       )
+       component: 
+      (SpecCollection
+         collection: (
+          (VerticalPanelViewSpec
+             name: 'VerticalPanel1'
+             layout: (LayoutFrame 0 0.0 0 0.0 0 1.0 0 1.0)
+             horizontalLayout: fit
+             verticalLayout: top
+             horizontalSpace: 3
+             verticalSpace: 3
+             component: 
+            (SpecCollection
+               collection: (
+                (FramedBoxSpec
+                   label: 'Sorting:'
+                   name: 'sortFrame'
+                   labelPosition: topLeft
+                   translateLabel: true
+                   component: 
+                  (SpecCollection
+                     collection: (
+                      (CheckBoxSpec
+                         label: 'Sortable'
+                         name: 'isSortable'
+                         layout: (LayoutOrigin -3 0 0 0)
+                         activeHelpKey: isSortable
+                         tabable: true
+                         model: isSortable
+                         translateLabel: true
+                       )
+                      (LabelSpec
+                         label: 'Sort Selector:'
+                         name: 'sortSelector'
+                         layout: (AlignmentOrigin 134 0 42 0 1 0.5)
+                         activeHelpKey: sortSelector
+                         translateLabel: true
+                         resizeForLabel: true
+                         adjust: right
                        )
-                     
-                    )
-                    extent: (Point 430 122)
-                  )
+                      (InputFieldSpec
+                         name: 'EntryField3'
+                         layout: (LayoutFrame 135 0 30 0 2 1 56 0)
+                         activeHelpKey: sortSelector
+                         enableChannel: isSortable
+                         tabable: true
+                         model: sortSelector
+                         group: inputGroup
+                         type: symbolOrNil
+                         immediateAccept: false
+                         acceptOnLeave: false
+                         acceptOnLostFocus: false
+                         acceptChannel: acceptChannel
+                         modifiedChannel: modifiedChannel
+                         acceptOnPointerLeave: false
+                       )
+                      (LabelSpec
+                         label: 'Sort Block Selector:'
+                         name: 'Label1'
+                         layout: (AlignmentOrigin 134 0 75 0 1 0.5)
+                         activeHelpKey: sortBlockSelector
+                         translateLabel: true
+                         resizeForLabel: true
+                         adjust: right
+                       )
+                      (InputFieldSpec
+                         name: 'EntryField4'
+                         layout: (LayoutFrame 135 0 63 0 2 1 89 0)
+                         activeHelpKey: sortBlockSelector
+                         enableChannel: isSortable
+                         tabable: true
+                         model: sortBlockSelector
+                         group: inputGroup
+                         type: symbolOrNil
+                         immediateAccept: false
+                         acceptOnLeave: false
+                         acceptOnLostFocus: false
+                         acceptChannel: acceptChannel
+                         modifiedChannel: modifiedChannel
+                         acceptOnPointerLeave: false
+                       )
+                      )
+                    
+                   )
+                   extent: (Point 430 122)
                  )
-               
-              )
-            )
+                )
+              
+             )
            )
-         
-        )
-      )
+          )
+        
+       )
+     )
 !
 
 valuesEditSpec
@@ -1699,344 +1699,344 @@
     <resource: #canvas>
 
     ^ 
-     #(FullSpec
-        name: valuesEditSpec
-        window: 
-       (WindowSpec
-          label: 'DataSet Basic'
-          name: 'DataSet Basic'
-          min: (Point 10 10)
-          bounds: (Rectangle 0 0 471 417)
-        )
-        component: 
-       (SpecCollection
-          collection: (
-           (VerticalPanelViewSpec
-              name: 'VerticalPanel1'
-              layout: (LayoutFrame 0 0 0 0 0 1 0 1)
-              horizontalLayout: fit
-              verticalLayout: top
-              horizontalSpace: 3
-              verticalSpace: 3
-              component: 
-             (SpecCollection
-                collection: (
-                 (FramedBoxSpec
-                    label: 'Value Selectors:'
-                    name: 'valuesBox'
-                    labelPosition: topLeft
-                    translateLabel: true
-                    component: 
-                   (SpecCollection
-                      collection: (
-                       (LabelSpec
-                          label: 'Read:'
-                          name: 'readLabel'
-                          layout: (AlignmentOrigin 94 0 15 0 1 0.5)
-                          activeHelpKey: valuesReadSelector
-                          translateLabel: true
-                          resizeForLabel: true
-                          adjust: right
-                        )
-                       (InputFieldSpec
-                          name: 'readSelector'
-                          layout: (LayoutFrame 97 0 4 0 2 1.0 26 0)
-                          activeHelpKey: valuesReadSelector
-                          tabable: true
-                          model: readSelector
-                          group: inputGroup
-                          type: symbolOrNil
-                          acceptOnLostFocus: false
-                          acceptChannel: acceptChannel
-                          modifiedChannel: modifiedChannel
-                          acceptOnPointerLeave: false
-                        )
-                       (LabelSpec
-                          label: 'Write:'
-                          name: 'writeLabel'
-                          layout: (AlignmentOrigin 94 0 40 0 1 0.5)
-                          activeHelpKey: valuesWriteSelector
-                          translateLabel: true
-                          resizeForLabel: true
-                          adjust: right
-                        )
-                       (InputFieldSpec
-                          name: 'writeSelector'
-                          layout: (LayoutFrame 97 0 29 0 2 1.0 51 0)
-                          activeHelpKey: valuesWriteSelector
-                          tabable: true
-                          model: writeSelector
-                          group: inputGroup
-                          type: symbolOrNil
-                          acceptOnLostFocus: false
-                          acceptChannel: acceptChannel
-                          modifiedChannel: modifiedChannel
-                          acceptOnPointerLeave: false
-                        )
-                       (LabelSpec
-                          label: 'Converter:'
-                          name: 'converterLabel'
-                          layout: (AlignmentOrigin 94 0 65 0 1 0.5)
-                          activeHelpKey: converterSelector
-                          translateLabel: true
-                          resizeForLabel: true
-                          adjust: right
-                        )
-                       (InputFieldSpec
-                          name: 'converterField'
-                          layout: (LayoutFrame 97 0 54 0 2 1.0 76 0)
-                          activeHelpKey: converterSelector
-                          tabable: true
-                          model: converterSelector
-                          group: inputGroup
-                          type: symbolOrNil
-                          acceptOnLostFocus: false
-                          acceptChannel: acceptChannel
-                          modifiedChannel: modifiedChannel
-                          acceptOnPointerLeave: false
-                        )
-                       (LabelSpec
-                          label: 'Print:'
-                          name: 'printLabel'
-                          layout: (AlignmentOrigin 94 0 90 0 1 0.5)
-                          activeHelpKey: valuesPrintSelector
-                          translateLabel: true
-                          resizeForLabel: true
-                          adjust: right
-                        )
-                       (InputFieldSpec
-                          name: 'printSelector'
-                          layout: (LayoutFrame 97 0 79 0 2 1.0 101 0)
-                          activeHelpKey: valuesPrintSelector
-                          tabable: true
-                          model: printSelector
-                          group: inputGroup
-                          type: symbolOrNil
-                          acceptOnLostFocus: false
-                          acceptChannel: acceptChannel
-                          modifiedChannel: modifiedChannel
-                          acceptOnPointerLeave: false
-                        )
-                       (LabelSpec
-                          label: 'Visibility:'
-                          name: 'visibilityLabel'
-                          layout: (AlignmentOrigin 94 0 115 0 1 0.5)
-                          activeHelpKey: valuesVisibilitySelector
-                          translateLabel: true
-                          resizeForLabel: true
-                          adjust: right
-                        )
-                       (InputFieldSpec
-                          name: 'visibilitySelector'
-                          layout: (LayoutFrame 97 0 104 0 2 1.0 126 0)
-                          activeHelpKey: valuesVisibilitySelector
-                          tabable: true
-                          model: visibilitySelector
-                          group: inputGroup
-                          type: symbolOrNil
-                          acceptOnLostFocus: false
-                          acceptChannel: acceptChannel
-                          modifiedChannel: modifiedChannel
-                          acceptOnPointerLeave: false
-                        )
+    #(FullSpec
+       name: valuesEditSpec
+       window: 
+      (WindowSpec
+         label: 'DataSet Basic'
+         name: 'DataSet Basic'
+         min: (Point 10 10)
+         bounds: (Rectangle 0 0 471 417)
+       )
+       component: 
+      (SpecCollection
+         collection: (
+          (VerticalPanelViewSpec
+             name: 'VerticalPanel1'
+             layout: (LayoutFrame 0 0 0 0 0 1 0 1)
+             horizontalLayout: fit
+             verticalLayout: top
+             horizontalSpace: 3
+             verticalSpace: 3
+             component: 
+            (SpecCollection
+               collection: (
+                (FramedBoxSpec
+                   label: 'Value Selectors:'
+                   name: 'valuesBox'
+                   labelPosition: topLeft
+                   translateLabel: true
+                   component: 
+                  (SpecCollection
+                     collection: (
+                      (LabelSpec
+                         label: 'Read:'
+                         name: 'readLabel'
+                         layout: (AlignmentOrigin 116 0 15 0 1 0.5)
+                         activeHelpKey: valuesReadSelector
+                         translateLabel: true
+                         resizeForLabel: true
+                         adjust: right
+                       )
+                      (InputFieldSpec
+                         name: 'readSelector'
+                         layout: (LayoutFrame 116 0 4 0 2 1.0 26 0)
+                         activeHelpKey: valuesReadSelector
+                         tabable: true
+                         model: readSelector
+                         group: inputGroup
+                         type: symbolOrNil
+                         acceptOnLostFocus: false
+                         acceptChannel: acceptChannel
+                         modifiedChannel: modifiedChannel
+                         acceptOnPointerLeave: false
+                       )
+                      (LabelSpec
+                         label: 'Write:'
+                         name: 'writeLabel'
+                         layout: (AlignmentOrigin 116 0 40 0 1 0.5)
+                         activeHelpKey: valuesWriteSelector
+                         translateLabel: true
+                         resizeForLabel: true
+                         adjust: right
+                       )
+                      (InputFieldSpec
+                         name: 'writeSelector'
+                         layout: (LayoutFrame 116 0 29 0 2 1.0 51 0)
+                         activeHelpKey: valuesWriteSelector
+                         tabable: true
+                         model: writeSelector
+                         group: inputGroup
+                         type: symbolOrNil
+                         acceptOnLostFocus: false
+                         acceptChannel: acceptChannel
+                         modifiedChannel: modifiedChannel
+                         acceptOnPointerLeave: false
+                       )
+                      (LabelSpec
+                         label: 'Converter:'
+                         name: 'converterLabel'
+                         layout: (AlignmentOrigin 116 0 65 0 1 0.5)
+                         activeHelpKey: converterSelector
+                         translateLabel: true
+                         resizeForLabel: true
+                         adjust: right
+                       )
+                      (InputFieldSpec
+                         name: 'converterField'
+                         layout: (LayoutFrame 116 0 54 0 2 1.0 76 0)
+                         activeHelpKey: converterSelector
+                         tabable: true
+                         model: converterSelector
+                         group: inputGroup
+                         type: symbolOrNil
+                         acceptOnLostFocus: false
+                         acceptChannel: acceptChannel
+                         modifiedChannel: modifiedChannel
+                         acceptOnPointerLeave: false
+                       )
+                      (LabelSpec
+                         label: 'Print:'
+                         name: 'printLabel'
+                         layout: (AlignmentOrigin 116 0 90 0 1 0.5)
+                         activeHelpKey: valuesPrintSelector
+                         translateLabel: true
+                         resizeForLabel: true
+                         adjust: right
+                       )
+                      (InputFieldSpec
+                         name: 'printSelector'
+                         layout: (LayoutFrame 116 0 79 0 2 1.0 101 0)
+                         activeHelpKey: valuesPrintSelector
+                         tabable: true
+                         model: printSelector
+                         group: inputGroup
+                         type: symbolOrNil
+                         acceptOnLostFocus: false
+                         acceptChannel: acceptChannel
+                         modifiedChannel: modifiedChannel
+                         acceptOnPointerLeave: false
+                       )
+                      (LabelSpec
+                         label: 'Visibility:'
+                         name: 'visibilityLabel'
+                         layout: (AlignmentOrigin 116 0 115 0 1 0.5)
+                         activeHelpKey: valuesVisibilitySelector
+                         translateLabel: true
+                         resizeForLabel: true
+                         adjust: right
+                       )
+                      (InputFieldSpec
+                         name: 'visibilitySelector'
+                         layout: (LayoutFrame 116 0 104 0 2 1.0 126 0)
+                         activeHelpKey: valuesVisibilitySelector
+                         tabable: true
+                         model: visibilitySelector
+                         group: inputGroup
+                         type: symbolOrNil
+                         acceptOnLostFocus: false
+                         acceptChannel: acceptChannel
+                         modifiedChannel: modifiedChannel
+                         acceptOnPointerLeave: false
+                       )
+                      )
+                    
+                   )
+                   extent: (Point 471 160)
+                 )
+                (FramedBoxSpec
+                   label: 'Range:'
+                   name: 'rangeBox'
+                   labelPosition: topLeft
+                   translateLabel: true
+                   component: 
+                  (SpecCollection
+                     collection: (
+                      (LabelSpec
+                         label: 'Min:'
+                         name: 'Label1'
+                         layout: (LayoutFrame 33 0 3 0 116 0 20 0)
+                         activeHelpKey: minValue
+                         translateLabel: true
+                         resizeForLabel: true
+                         adjust: right
                        )
-                     
-                    )
-                    extent: (Point 471 160)
-                  )
-                 (FramedBoxSpec
-                    label: 'Range:'
-                    name: 'rangeBox'
-                    labelPosition: topLeft
-                    translateLabel: true
-                    component: 
-                   (SpecCollection
-                      collection: (
-                       (LabelSpec
-                          label: 'Min:'
-                          name: 'Label1'
-                          layout: (LayoutFrame 11 0 3 0 94 0 20 0)
-                          activeHelpKey: minValue
-                          translateLabel: true
-                          resizeForLabel: true
-                          adjust: right
-                        )
-                       (InputFieldSpec
-                          name: 'EntryField1'
-                          layout: (LayoutFrame 97 0 1 0 20 0.5 23 0)
-                          activeHelpKey: minValue
-                          tabable: true
-                          model: minValue
-                          group: inputGroup
-                          type: numberOrNil
-                          acceptOnLeave: true
-                          acceptOnLostFocus: true
-                          acceptChannel: acceptChannel
-                          modifiedChannel: modifiedChannel
-                          acceptOnPointerLeave: true
-                        )
-                       (LabelSpec
-                          label: 'Max:'
-                          name: 'Label2'
-                          layout: (LayoutFrame 21 0.5 3 0 70 0.5 20 0)
-                          activeHelpKey: maxValue
-                          translateLabel: true
-                          resizeForLabel: true
-                          adjust: right
-                        )
-                       (InputFieldSpec
-                          name: 'EntryField2'
-                          layout: (LayoutFrame 70 0.5 1 0 -2 1.0 23 0)
-                          activeHelpKey: maxValue
-                          tabable: true
-                          model: maxValue
-                          group: inputGroup
-                          type: numberOrNil
-                          acceptOnLeave: true
-                          acceptOnLostFocus: true
-                          acceptChannel: acceptChannel
-                          modifiedChannel: modifiedChannel
-                          acceptOnPointerLeave: true
-                        )
+                      (InputFieldSpec
+                         name: 'EntryField1'
+                         layout: (LayoutFrame 116 0 1 0 21 0.5 23 0)
+                         activeHelpKey: minValue
+                         tabable: true
+                         model: minValue
+                         group: inputGroup
+                         type: numberOrNil
+                         acceptOnLeave: true
+                         acceptOnLostFocus: true
+                         acceptChannel: acceptChannel
+                         modifiedChannel: modifiedChannel
+                         acceptOnPointerLeave: true
+                       )
+                      (LabelSpec
+                         label: 'Max:'
+                         name: 'Label2'
+                         layout: (LayoutFrame 21 0.5 3 0 70 0.5 20 0)
+                         activeHelpKey: maxValue
+                         translateLabel: true
+                         resizeForLabel: true
+                         adjust: right
+                       )
+                      (InputFieldSpec
+                         name: 'EntryField2'
+                         layout: (LayoutFrame 70 0.5 1 0 -2 1.0 23 0)
+                         activeHelpKey: maxValue
+                         tabable: true
+                         model: maxValue
+                         group: inputGroup
+                         type: numberOrNil
+                         acceptOnLeave: true
+                         acceptOnLostFocus: true
+                         acceptChannel: acceptChannel
+                         modifiedChannel: modifiedChannel
+                         acceptOnPointerLeave: true
+                       )
+                      )
+                    
+                   )
+                   extent: (Point 471 56)
+                 )
+                (FramedBoxSpec
+                   label: 'Popup Menu:'
+                   name: 'menusBox'
+                   labelPosition: topLeft
+                   translateLabel: true
+                   component: 
+                  (SpecCollection
+                     collection: (
+                      (LabelSpec
+                         label: 'Selector:'
+                         name: 'menuLabel'
+                         layout: (AlignmentOrigin 116 0 12 0 1 0.5)
+                         activeHelpKey: valuesMenuSelector
+                         translateLabel: true
+                         resizeForLabel: true
+                         adjust: right
+                       )
+                      (InputFieldSpec
+                         name: 'menuSelector'
+                         layout: (LayoutFrame 116 0 1 0 2 1.0 23 0)
+                         activeHelpKey: valuesMenuSelector
+                         tabable: true
+                         model: menu
+                         group: inputGroup
+                         type: symbolOrNil
+                         acceptOnLostFocus: false
+                         acceptChannel: acceptChannel
+                         modifiedChannel: modifiedChannel
+                         acceptOnPointerLeave: false
+                       )
+                      (CheckBoxSpec
+                         label: 'Fetch Menu from Application'
+                         name: 'CheckBox1'
+                         layout: (LayoutFrame 116 0 28 0 398 0 50 0)
+                         activeHelpKey: valuesMenuFromApplication
+                         model: menuFromApplication
+                         translateLabel: true
+                         valueChangeSelector: setModified
                        )
-                     
-                    )
-                    extent: (Point 471 56)
-                  )
-                 (FramedBoxSpec
-                    label: 'Popup Menu:'
-                    name: 'menusBox'
-                    labelPosition: topLeft
-                    translateLabel: true
-                    component: 
-                   (SpecCollection
-                      collection: (
-                       (LabelSpec
-                          label: 'Selector:'
-                          name: 'menuLabel'
-                          layout: (AlignmentOrigin 94 0 12 0 1 0.5)
-                          activeHelpKey: valuesMenuSelector
-                          translateLabel: true
-                          resizeForLabel: true
-                          adjust: right
-                        )
-                       (InputFieldSpec
-                          name: 'menuSelector'
-                          layout: (LayoutFrame 97 0 1 0 2 1.0 23 0)
-                          activeHelpKey: valuesMenuSelector
-                          tabable: true
-                          model: menu
-                          group: inputGroup
-                          type: symbolOrNil
-                          acceptOnLostFocus: false
-                          acceptChannel: acceptChannel
-                          modifiedChannel: modifiedChannel
-                          acceptOnPointerLeave: false
-                        )
-                       (CheckBoxSpec
-                          label: 'Fetch Menu from Application'
-                          name: 'CheckBox1'
-                          layout: (LayoutFrame 93 0 28 0 375 0 50 0)
-                          activeHelpKey: valuesMenuFromApplication
-                          model: menuFromApplication
-                          translateLabel: true
-                          valueChangeSelector: setModified
-                        )
+                      )
+                    
+                   )
+                   extent: (Point 471 80)
+                 )
+                (FramedBoxSpec
+                   label: 'Combo List/Box Selectors:'
+                   name: 'comboSelectorsBox'
+                   labelPosition: topLeft
+                   translateLabel: true
+                   component: 
+                  (SpecCollection
+                     collection: (
+                      (LabelSpec
+                         label: 'Choices:'
+                         name: 'ChoicesLabel'
+                         layout: (AlignmentOrigin 116 0 15 0 1 0.5)
+                         activeHelpKey: valuesChoicesSelector
+                         translateLabel: true
+                         resizeForLabel: true
+                         adjust: right
+                       )
+                      (InputFieldSpec
+                         name: 'ChoicesField'
+                         layout: (LayoutFrame 116 0 4 0 2 1.0 26 0)
+                         activeHelpKey: valuesChoicesSelector
+                         tabable: true
+                         model: choices
+                         group: inputGroup
+                         type: symbolOrNil
+                         acceptOnLeave: false
+                         acceptOnLostFocus: false
+                         acceptChannel: acceptChannel
+                         modifiedChannel: modifiedChannel
+                         acceptOnPointerLeave: false
+                       )
+                      (LabelSpec
+                         label: 'Xlated Choices:'
+                         name: 'XChoicesLabel'
+                         layout: (AlignmentOrigin 116 0 40 0 1 0.5)
+                         activeHelpKey: valuesXChoicesSelector
+                         translateLabel: true
+                         resizeForLabel: true
+                         adjust: right
                        )
-                     
-                    )
-                    extent: (Point 471 80)
-                  )
-                 (FramedBoxSpec
-                    label: 'Combo List/Box Selectors:'
-                    name: 'comboSelectorsBox'
-                    labelPosition: topLeft
-                    translateLabel: true
-                    component: 
-                   (SpecCollection
-                      collection: (
-                       (LabelSpec
-                          label: 'Choices:'
-                          name: 'ChoicesLabel'
-                          layout: (AlignmentOrigin 94 0 15 0 1 0.5)
-                          activeHelpKey: valuesChoicesSelector
-                          translateLabel: true
-                          resizeForLabel: true
-                          adjust: right
-                        )
-                       (InputFieldSpec
-                          name: 'ChoicesField'
-                          layout: (LayoutFrame 97 0 4 0 2 1.0 26 0)
-                          activeHelpKey: valuesChoicesSelector
-                          tabable: true
-                          model: choices
-                          group: inputGroup
-                          type: symbolOrNil
-                          acceptOnLeave: false
-                          acceptOnLostFocus: false
-                          acceptChannel: acceptChannel
-                          modifiedChannel: modifiedChannel
-                          acceptOnPointerLeave: false
-                        )
-                       (LabelSpec
-                          label: 'Xlated Choices:'
-                          name: 'XChoicesLabel'
-                          layout: (AlignmentOrigin 94 0 40 0 1 0.5)
-                          activeHelpKey: valuesXChoicesSelector
-                          translateLabel: true
-                          resizeForLabel: true
-                          adjust: right
-                        )
-                       (InputFieldSpec
-                          name: 'XChoicesField'
-                          layout: (LayoutFrame 97 0 29 0 2 1.0 51 0)
-                          activeHelpKey: valuesXChoicesSelector
-                          tabable: true
-                          model: translatedChoices
-                          group: inputGroup
-                          type: symbolOrNil
-                          acceptOnLeave: false
-                          acceptOnLostFocus: false
-                          acceptChannel: acceptChannel
-                          modifiedChannel: modifiedChannel
-                          acceptOnPointerLeave: false
-                        )
-                       (LabelSpec
-                          label: 'Editable:'
-                          name: 'EditableLabel'
-                          layout: (AlignmentOrigin 94 0 65 0 1 0.5)
-                          activeHelpKey: showComboFieldSelector
-                          translateLabel: true
-                          resizeForLabel: true
-                          adjust: right
-                        )
-                       (InputFieldSpec
-                          name: 'EditableField'
-                          layout: (LayoutFrame 97 0 54 0 2 1.0 76 0)
-                          activeHelpKey: showComboFieldSelector
-                          tabable: true
-                          model: showComboFieldSelector
-                          group: inputGroup
-                          type: symbolOrNil
-                          acceptOnLeave: false
-                          acceptOnLostFocus: false
-                          acceptChannel: acceptChannel
-                          modifiedChannel: modifiedChannel
-                          acceptOnPointerLeave: false
-                        )
+                      (InputFieldSpec
+                         name: 'XChoicesField'
+                         layout: (LayoutFrame 116 0 29 0 2 1.0 51 0)
+                         activeHelpKey: valuesXChoicesSelector
+                         tabable: true
+                         model: translatedChoices
+                         group: inputGroup
+                         type: symbolOrNil
+                         acceptOnLeave: false
+                         acceptOnLostFocus: false
+                         acceptChannel: acceptChannel
+                         modifiedChannel: modifiedChannel
+                         acceptOnPointerLeave: false
+                       )
+                      (LabelSpec
+                         label: 'Editable:'
+                         name: 'EditableLabel'
+                         layout: (AlignmentOrigin 116 0 65 0 1 0.5)
+                         activeHelpKey: showComboFieldSelector
+                         translateLabel: true
+                         resizeForLabel: true
+                         adjust: right
                        )
-                     
-                    )
-                    extent: (Point 471 107)
-                  )
+                      (InputFieldSpec
+                         name: 'EditableField'
+                         layout: (LayoutFrame 116 0 54 0 2 1.0 76 0)
+                         activeHelpKey: showComboFieldSelector
+                         tabable: true
+                         model: showComboFieldSelector
+                         group: inputGroup
+                         type: symbolOrNil
+                         acceptOnLeave: false
+                         acceptOnLostFocus: false
+                         acceptChannel: acceptChannel
+                         modifiedChannel: modifiedChannel
+                         acceptOnPointerLeave: false
+                       )
+                      )
+                    
+                   )
+                   extent: (Point 471 107)
                  )
-               
-              )
-            )
+                )
+              
+             )
            )
-         
-        )
-      )
+          )
+        
+       )
+     )
 !
 
 windowSpec