# HG changeset patch # User Claus Gittinger # Date 1377195646 -7200 # Node ID 7d93b17e2c0340a16cdfa0ecc56b2444980d8110 # Parent c1c9bfd7ad188ad7ef2bbc480f6e75caacf1cc9a class: DataSetBuilder changed: #sortEditSpec #valuesEditSpec diff -r c1c9bfd7ad18 -r 7d93b17e2c03 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 @@ ^ - #(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 @@ ^ - #(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