comment/format in: #accept
authorClaus Gittinger <cg@exept.de>
Mon, 25 Oct 2010 12:01:31 +0200
changeset 2816 1832d595db94
parent 2815 053d07b21ae0
child 2817 4577fb231f6f
comment/format in: #accept changed: #aspects #helpSpec #selectionEditSpec #valuesEditSpec
DataSetBuilder.st
--- a/DataSetBuilder.st	Thu Oct 21 15:04:00 2010 +0200
+++ b/DataSetBuilder.st	Mon Oct 25 12:01:31 2010 +0200
@@ -101,6 +101,7 @@
         isResizeable
         height
         menu
+        menuFromApplication
         foregroundSelector
         backgroundSelector
         selectedForegroundSelector
@@ -136,7 +137,7 @@
         sortBlockSelector
      )
 
-    "Modified: / 16-06-2010 / 15:58:54 / cg"
+    "Modified: / 25-10-2010 / 10:31:51 / cg"
 ! !
 
 !DataSetBuilder class methodsFor:'help specs'!
@@ -363,8 +364,11 @@
 #valuesChoicesSelector
 'Selector to get a collection of choices for a cell having a ComboBox or a ComboList widget.'
 
+#valuesMenuFromApplication
+'Fetch the menu from the application (instead of the row)'
+
 #valuesMenuSelector
-'Selector to retrive the middle button menu.'
+'Selector to retrieve the middle button menu.'
 
 #valuesPrintSelector
 'Selector used to register images on a DSVColumnView (the arg). For more detailed info see #register... methods in DSVColumnView.'
@@ -382,8 +386,6 @@
 'Selector to get a collection of translated choices for a cell having a ComboBox or a ComboList widget.'
 
 )
-
-    "Modified: / 16-06-2010 / 16:04:22 / cg"
 ! !
 
 !DataSetBuilder class methodsFor:'image specs'!
@@ -1476,6 +1478,7 @@
                     resizeForLabel: true
                     adjust: right
                     translateLabel: true
+                    activeHelpKey: selectionCellClickSelector
                   )
                  (InputFieldSpec
                     name: 'selectSelector'
@@ -1519,6 +1522,7 @@
                     resizeForLabel: true
                     adjust: right
                     translateLabel: true
+                    activeHelpKey: selectionCellDoubleClickSelector
                   )
                  (InputFieldSpec
                     name: 'doubleClicked'
@@ -1541,6 +1545,8 @@
          
         )
       )
+
+    "Modified: / 25-10-2010 / 10:29:42 / cg"
 !
 
 slices
@@ -1696,297 +1702,328 @@
           label: 'DataSet Basic'
           name: 'DataSet Basic'
           min: (Point 10 10)
-          bounds: (Rectangle 0 0 436 387)
+          bounds: (Rectangle 0 0 471 417)
         )
         component: 
        (SpecCollection
           collection: (
-           (FramedBoxSpec
-              label: 'Value Selectors:'
-              name: 'valuesBox'
-              layout: (LayoutFrame 0 0.0 3 0 0 1.0 163 0)
-              labelPosition: topLeft
-              translateLabel: true
-              component: 
-             (SpecCollection
-                collection: (
-                 (LabelSpec
-                    label: 'Read:'
-                    name: 'readLabel'
-                    layout: (AlignmentOrigin 94 0 15 0 1 0.5)
-                    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)
-                    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)
-                    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)
-                    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)
-                    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
-                  )
-                 )
-               
-              )
-            )
-           (FramedBoxSpec
-              label: 'Range:'
-              name: 'rangeBox'
-              layout: (LayoutFrame 0 0.0 162 0 0 1.0 218 0)
-              labelPosition: topLeft
-              translateLabel: true
+           (VerticalPanelViewSpec
+              name: 'VerticalPanel1'
+              layout: (LayoutFrame 0 0 0 0 0 1 0 1)
+              horizontalLayout: fit
+              verticalLayout: top
+              horizontalSpace: 3
+              verticalSpace: 3
               component: 
              (SpecCollection
                 collection: (
-                 (LabelSpec
-                    label: 'Min:'
-                    name: 'Label1'
-                    layout: (LayoutFrame 11 0 3 0 94 0 20 0)
-                    translateLabel: true
-                    resizeForLabel: true
-                    adjust: right
-                  )
-                 (InputFieldSpec
-                    name: 'EntryField1'
-                    layout: (LayoutFrame 97 0 1 0 20 0.5 23 0)
-                    activeHelpKey: valuesMenuSelector
-                    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)
+                 (FramedBoxSpec
+                    label: 'Value Selectors:'
+                    name: 'valuesBox'
+                    labelPosition: topLeft
                     translateLabel: true
-                    resizeForLabel: true
-                    adjust: right
-                  )
-                 (InputFieldSpec
-                    name: 'EntryField2'
-                    layout: (LayoutFrame 70 0.5 1 0 -2 1.0 23 0)
-                    activeHelpKey: valuesMenuSelector
-                    tabable: true
-                    model: maxValue
-                    group: inputGroup
-                    type: numberOrNil
-                    acceptOnLeave: true
-                    acceptOnLostFocus: true
-                    acceptChannel: acceptChannel
-                    modifiedChannel: modifiedChannel
-                    acceptOnPointerLeave: true
-                  )
-                 )
-               
-              )
-            )
-           (FramedBoxSpec
-              label: 'Menu Selector:'
-              name: 'menusBox'
-              layout: (LayoutFrame 0 0.0 216 0 0 1.0 272 0)
-              labelPosition: topLeft
-              translateLabel: true
-              component: 
-             (SpecCollection
-                collection: (
-                 (LabelSpec
-                    label: 'Selector:'
-                    name: 'menuLabel'
-                    layout: (AlignmentOrigin 94 0 12 0 1 0.5)
-                    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
+                    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
+                        )
+                       )
+                     
+                    )
+                    extent: (Point 471 160)
                   )
-                 )
-               
-              )
-            )
-           (FramedBoxSpec
-              label: 'Combo List/Box Selectors:'
-              name: 'comboSelectorsBox'
-              layout: (LayoutFrame 1 0.0 271 0 1 1.0 378 0)
-              labelPosition: topLeft
-              translateLabel: true
-              component: 
-             (SpecCollection
-                collection: (
-                 (LabelSpec
-                    label: 'Choices:'
-                    name: 'ChoicesLabel'
-                    layout: (AlignmentOrigin 94 0 15 0 1 0.5)
-                    activeHelpKey: valuesChoicesSelector
+                 (FramedBoxSpec
+                    label: 'Range:'
+                    name: 'rangeBox'
+                    labelPosition: topLeft
                     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
+                    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
+                        )
+                       )
+                     
+                    )
+                    extent: (Point 471 56)
                   )
-                 (LabelSpec
-                    label: 'Translated Choices:'
-                    name: 'XChoicesLabel'
-                    layout: (AlignmentOrigin 94 0 40 0 1 0.5)
-                    activeHelpKey: valuesXChoicesSelector
+                 (FramedBoxSpec
+                    label: 'Popup Menu:'
+                    name: 'menusBox'
+                    labelPosition: topLeft
                     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
+                    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)
                   )
-                 (LabelSpec
-                    label: 'Editable:'
-                    name: 'EditableLabel'
-                    layout: (AlignmentOrigin 94 0 65 0 1 0.5)
-                    activeHelpKey: showComboFieldSelector
+                 (FramedBoxSpec
+                    label: 'Combo List/Box Selectors:'
+                    name: 'comboSelectorsBox'
+                    labelPosition: topLeft
                     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
+                    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
+                        )
+                       )
+                     
+                    )
+                    extent: (Point 471 107)
                   )
                  )
                
@@ -3923,7 +3960,8 @@
         #(label 
           width minWidth usePreferredWidth editorType choices translatedChoices
           readSelector writeSelector printSelector visibilitySelector
-          formatString formatSelector type converterSelector size height canSelect selectSelector showComboFieldSelector
+          formatString formatSelector type converterSelector size height 
+          canSelect selectSelector showComboFieldSelector
           minValue maxValue
          ) do:[:aKey|
             (aspects at:aKey) value:nil
@@ -3936,6 +3974,8 @@
     self updateColumnView.
     self cancel.
     self clearModified.
+
+    "Modified: / 25-10-2010 / 10:41:55 / cg"
 !
 
 cancel