--- a/DataSetBuilder.st Fri Aug 29 20:31:23 2003 +0200
+++ b/DataSetBuilder.st Thu Sep 04 20:59:42 2003 +0200
@@ -335,207 +335,207 @@
<resource: #canvas>
^
- #(#FullSpec
- #name: #basicsEditSpec
- #window:
- #(#WindowSpec
- #label: 'DataSet Basic'
- #name: 'DataSet Basic'
- #min: #(#Point 10 10)
- #max: #(#Point 1280 1024)
- #bounds: #(#Rectangle 16 46 405 372)
+ #(FullSpec
+ name: basicsEditSpec
+ window:
+ (WindowSpec
+ label: 'DataSet Basic'
+ name: 'DataSet Basic'
+ min: (Point 10 10)
+ bounds: (Rectangle 14 46 403 372)
)
- #component:
- #(#SpecCollection
- #collection: #(
- #(#FramedBoxSpec
- #label: 'Header:'
- #name: 'framedBox1'
- #layout: #(#LayoutFrame 0 0.0 3 0 0 1.0 183 0)
- #labelPosition: #topLeft
- #component:
- #(#SpecCollection
- #collection: #(
- #(#LabelSpec
- #label: 'ID:'
- #name: 'idLabel'
- #layout: #(#AlignmentOrigin 94 0 14 0 1 0.5)
- #resizeForLabel: true
+ component:
+ (SpecCollection
+ collection: (
+ (FramedBoxSpec
+ label: 'Header:'
+ name: 'framedBox1'
+ layout: (LayoutFrame 0 0.0 3 0 0 1.0 183 0)
+ labelPosition: topLeft
+ component:
+ (SpecCollection
+ collection: (
+ (LabelSpec
+ label: 'ID:'
+ name: 'idLabel'
+ layout: (AlignmentOrigin 94 0 14 0 1 0.5)
+ resizeForLabel: true
)
- #(#InputFieldSpec
- #name: 'idField'
- #layout: #(#LayoutFrame 97 0 0 0 2 1.0 22 0)
- #activeHelpKey: #basicsLabelId
- #tabable: true
- #model: #id
- #group: #inputGroup
- #acceptOnLostFocus: false
- #acceptChannel: #acceptChannel
- #modifiedChannel: #modifiedChannel
- #acceptOnPointerLeave: false
+ (InputFieldSpec
+ name: 'idField'
+ layout: (LayoutFrame 97 0 0 0 2 1.0 22 0)
+ activeHelpKey: basicsLabelId
+ tabable: true
+ model: id
+ group: inputGroup
+ acceptOnLostFocus: false
+ acceptChannel: acceptChannel
+ modifiedChannel: modifiedChannel
+ acceptOnPointerLeave: false
)
- #(#LabelSpec
- #label: 'Label:'
- #name: 'label1'
- #layout: #(#AlignmentOrigin 94 0 39 0 1 0.5)
- #resizeForLabel: true
+ (LabelSpec
+ label: 'Label:'
+ name: 'label1'
+ layout: (AlignmentOrigin 94 0 39 0 1 0.5)
+ resizeForLabel: true
)
- #(#InputFieldSpec
- #name: 'labelField'
- #layout: #(#LayoutFrame 97 0 28 0 2 1.0 50 0)
- #activeHelpKey: #basicsLabel
- #tabable: true
- #model: #label
- #group: #inputGroup
- #type: #smalltalkObject
- #immediateAccept: false
- #acceptOnLeave: false
- #acceptOnLostFocus: false
- #acceptChannel: #acceptChannel
- #modifiedChannel: #modifiedChannel
- #acceptOnPointerLeave: false
+ (InputFieldSpec
+ name: 'labelField'
+ layout: (LayoutFrame 97 0 28 0 2 1.0 50 0)
+ activeHelpKey: basicsLabel
+ tabable: true
+ model: label
+ group: inputGroup
+ type: smalltalkObject
+ immediateAccept: false
+ acceptOnLeave: false
+ acceptOnLostFocus: false
+ acceptChannel: acceptChannel
+ modifiedChannel: modifiedChannel
+ acceptOnPointerLeave: false
)
- #(#LabelSpec
- #label: 'Font:'
- #name: 'LabelFont'
- #layout: #(#AlignmentOrigin 94 0 68 0 1 0.5)
- #resizeForLabel: true
- #adjust: #left
+ (LabelSpec
+ label: 'Font:'
+ name: 'LabelFont'
+ layout: (AlignmentOrigin 94 0 68 0 1 0.5)
+ resizeForLabel: true
+ adjust: left
)
- #(#FontMenuSpec
- #name: 'fontMenu'
- #layout: #(#LayoutFrame 97 0 56 0 0 1.0 78 0)
- #activeHelpKey: #labelFont
- #model: #style
+ (FontMenuSpec
+ name: 'fontMenu'
+ layout: (LayoutFrame 97 0 56 0 0 1.0 78 0)
+ activeHelpKey: labelFont
+ model: style
)
- #(#LabelSpec
- #label: 'Type:'
- #name: 'Type'
- #layout: #(#AlignmentOrigin 52 0 105 0 1 0.5)
- #translateLabel: true
- #resizeForLabel: true
+ (LabelSpec
+ label: 'Type:'
+ name: 'Type'
+ layout: (AlignmentOrigin 52 0 105 0 1 0.5)
+ translateLabel: true
+ resizeForLabel: true
)
- #(#ComboListSpec
- #name: 'labelButtonType'
- #layout: #(#LayoutFrame 57 0 96 0 182 0 116 0)
- #tabable: true
- #model: #labelButtonType
- #comboList:
- #(#None
- #Button #Group
+ (ComboListSpec
+ name: 'labelButtonType'
+ layout: (LayoutFrame 57 0 96 0 182 0 116 0)
+ tabable: true
+ model: labelButtonType
+ comboList:
+ (None
+ Button Group
)
- #useIndex: false
+ useIndex: false
)
- #(#LabelSpec
- #label: 'Align:'
- #name: 'JustificationLabel'
- #layout: #(#LayoutFrame 191 0 97 0 236 0 118 0)
- #resizeForLabel: true
- #adjust: #left
+ (LabelSpec
+ label: 'Align:'
+ name: 'JustificationLabel'
+ layout: (LayoutFrame 191 0 97 0 236 0 118 0)
+ resizeForLabel: true
+ adjust: left
)
- #(#PopUpListSpec
- #label: 'Alignment'
- #name: 'Alignment'
- #layout: #(#LayoutFrame 248 0 97 0 2 1.0 119 0)
- #activeHelpKey: #basicsJustification
- #tabable: true
- #model: #labelAlignment
- #menu:
- #(#left
- #right #center
+ (PopUpListSpec
+ label: 'Alignment'
+ name: 'Alignment'
+ layout: (LayoutFrame 248 0 97 0 2 1.0 119 0)
+ activeHelpKey: basicsJustification
+ tabable: true
+ model: labelAlignment
+ menu:
+ (left
+ right center
)
)
- #(#CheckBoxSpec
- #label: 'Label Is Image'
- #name: 'labelIsImage'
- #layout: #(#LayoutOrigin -3 0 126 0)
- #activeHelpKey: #basicsLabelIsImage
- #tabable: true
- #model: #labelIsImage
+ (CheckBoxSpec
+ label: 'Label Is Image'
+ name: 'labelIsImage'
+ layout: (LayoutOrigin -3 0 126 0)
+ activeHelpKey: basicsLabelIsImage
+ tabable: true
+ model: labelIsImage
)
- #(#CheckBoxSpec
- #label: 'Translate Label'
- #name: 'CheckBox2'
- #layout: #(#LayoutOrigin 160 0 126 0)
- #activeHelpKey: #basicsLabelTranslate
- #tabable: true
- #model: #translateLabel
+ (CheckBoxSpec
+ label: 'Translate Label'
+ name: 'CheckBox2'
+ layout: (LayoutOrigin 160 0 126 0)
+ activeHelpKey: basicsLabelTranslate
+ tabable: true
+ model: translateLabel
)
)
)
)
- #(#FramedBoxSpec
- #label: 'Cell Type:'
- #name: 'typesFrame'
- #layout: #(#LayoutFrame 0 0.0 187 0 0 1.0 325 0)
- #labelPosition: #topLeft
- #component:
- #(#SpecCollection
- #collection: #(
- #(#LabelSpec
- #label: 'Renderer:'
- #name: 'rendererLabel'
- #layout: #(#AlignmentOrigin 94 0 16 0 1 0.5)
- #resizeForLabel: true
+ (FramedBoxSpec
+ label: 'Cell Type:'
+ name: 'typesFrame'
+ layout: (LayoutFrame 0 0.0 187 0 0 1.0 325 0)
+ labelPosition: topLeft
+ component:
+ (SpecCollection
+ collection: (
+ (LabelSpec
+ label: 'Renderer:'
+ name: 'rendererLabel'
+ layout: (AlignmentOrigin 94 0 16 0 1 0.5)
+ resizeForLabel: true
)
- #(#ComboListSpec
- #name: 'rendererField'
- #layout: #(#LayoutFrame 97 0 5 0 2 1.0 27 0)
- #activeHelpKey: #basicsRenderer
- #tabable: true
- #model: #rendererType
- #comboList: #rendererTypeList
- #useIndex: false
+ (ComboListSpec
+ name: 'rendererField'
+ layout: (LayoutFrame 97 0 5 0 2 1.0 27 0)
+ activeHelpKey: basicsRenderer
+ tabable: true
+ model: rendererType
+ comboList: rendererTypeList
+ useIndex: false
)
- #(#LabelSpec
- #label: 'Editor:'
- #name: 'editorLabel'
- #layout: #(#AlignmentOrigin 94 0 42 0 1 0.5)
- #resizeForLabel: true
+ (LabelSpec
+ label: 'Editor:'
+ name: 'editorLabel'
+ layout: (AlignmentOrigin 94 0 42 0 1 0.5)
+ resizeForLabel: true
)
- #(#ComboBoxSpec
- #name: 'editorField'
- #layout: #(#LayoutFrame 97 0 31 0 2 1.0 53 0)
- #activeHelpKey: #basicsEditor
- #tabable: true
- #model: #editorType
- #type: #symbolOrNil
- #acceptOnLostFocus: false
- #acceptChannel: #acceptChannel
- #modifiedChannel: #modifiedChannel
- #acceptOnPointerLeave: false
- #comboList: #editorTypeList
- #useIndex: false
- #isFilenameBox: false
+ (ComboBoxSpec
+ name: 'editorField'
+ layout: (LayoutFrame 97 0 31 0 2 1.0 53 0)
+ activeHelpKey: basicsEditor
+ tabable: true
+ model: editorType
+ type: symbolOrNil
+ acceptOnLostFocus: false
+ acceptChannel: acceptChannel
+ modifiedChannel: modifiedChannel
+ acceptOnPointerLeave: false
+ comboList: editorTypeList
+ useIndex: false
+ isFilenameBox: false
)
- #(#LabelSpec
- #label: 'Align:'
- #name: 'JustificationC'
- #layout: #(#LayoutFrame 191 0 58 0 236 0 79 0)
- #resizeForLabel: true
- #adjust: #left
+ (LabelSpec
+ label: 'Align:'
+ name: 'JustificationC'
+ layout: (LayoutFrame 191 0 58 0 236 0 79 0)
+ resizeForLabel: true
+ adjust: left
)
- #(#PopUpListSpec
- #label: 'Alignment'
- #name: 'AlignmentC'
- #layout: #(#LayoutFrame 248 0 58 0 2 1.0 80 0)
- #activeHelpKey: #basicsJustificationEditor
- #tabable: true
- #model: #columnAlignment
- #menu:
- #(#left
- #right #center #decimal
+ (PopUpListSpec
+ label: 'Alignment'
+ name: 'AlignmentC'
+ layout: (LayoutFrame 248 0 58 0 2 1.0 80 0)
+ activeHelpKey: basicsJustificationEditor
+ tabable: true
+ model: columnAlignment
+ menu:
+ (left
+ right center
+ decimal
)
)
- #(#CheckBoxSpec
- #label: 'Compress Long Strings'
- #name: 'LongStringCompressionCheckBox'
- #layout: #(#LayoutOrigin 160 0 82 0)
- #activeHelpKey: #basicsLabelTranslate
- #tabable: true
- #model: #longStringCompression
- #translateLabel: true
+ (CheckBoxSpec
+ label: 'Compress Long Strings'
+ name: 'LongStringCompressionCheckBox'
+ layout: (LayoutOrigin 160 0 82 0)
+ activeHelpKey: basicsLabelTranslate
+ tabable: true
+ model: longStringCompression
+ translateLabel: true
)
)
@@ -562,139 +562,133 @@
<resource: #canvas>
^
- #(#FullSpec
- #name: #colorsEditSpec
- #window:
- #(#WindowSpec
- #label: 'DataSet Misc'
- #name: 'DataSet Misc'
- #layout: #(#LayoutFrame 699 0 270 0 1067 0 569 0)
- #level: 0
- #min: #(#Point 10 10)
- #max: #(#Point 1280 1024)
- #bounds: #(#Rectangle 699 270 1068 570)
- #usePreferredExtent: false
- #returnIsOKInDialog: true
- #escapeIsCancelInDialog: true
+ #(FullSpec
+ name: colorsEditSpec
+ window:
+ (WindowSpec
+ label: 'DataSet Misc'
+ name: 'DataSet Misc'
+ min: (Point 10 10)
+ bounds: (Rectangle 14 46 383 346)
)
- #component:
- #(#SpecCollection
- #collection: #(
- #(#FramedBoxSpec
- #label: 'Label Colors:'
- #name: 'ColorsBox'
- #layout: #(#LayoutFrame 0 0.0 3 0 0 1.0 95 0)
- #labelPosition: #topLeft
- #component:
- #(#SpecCollection
- #collection: #(
- #(#LabelSpec
- #label: 'Foreground:'
- #name: 'label1'
- #layout: #(#AlignmentOrigin 112 0 24 0 1 0.5)
- #resizeForLabel: true
- #adjust: #right
+ component:
+ (SpecCollection
+ collection: (
+ (FramedBoxSpec
+ label: 'Label Colors:'
+ name: 'ColorsBox'
+ layout: (LayoutFrame 0 0.0 3 0 0 1.0 95 0)
+ labelPosition: topLeft
+ component:
+ (SpecCollection
+ collection: (
+ (LabelSpec
+ label: 'Foreground:'
+ name: 'label1'
+ layout: (AlignmentOrigin 112 0 24 0 1 0.5)
+ resizeForLabel: true
+ adjust: right
)
- #(#ColorMenuSpec
- #name: 'colorMenu1'
- #layout: #(#LayoutFrame 115 0 12 0 -3 1.0 34 0)
- #activeHelpKey: #colorsForegroundLabelColor
- #model: #labelForegroundColor
- #labelsAreColored: true
+ (ColorMenuSpec
+ name: 'colorMenu1'
+ layout: (LayoutFrame 115 0 12 0 -3 1.0 34 0)
+ activeHelpKey: colorsForegroundLabelColor
+ model: labelForegroundColor
+ labelsAreColored: true
)
- #(#LabelSpec
- #label: 'Background:'
- #name: 'label2'
- #layout: #(#AlignmentOrigin 112 0 52 0 1 0.5)
- #resizeForLabel: true
- #adjust: #right
+ (LabelSpec
+ label: 'Background:'
+ name: 'label2'
+ layout: (AlignmentOrigin 112 0 52 0 1 0.5)
+ resizeForLabel: true
+ adjust: right
)
- #(#ColorMenuSpec
- #name: 'colorMenu2'
- #layout: #(#LayoutFrame 115 0 40 0 -3 1.0 62 0)
- #activeHelpKey: #colorsBackgroundLabelColor
- #model: #labelBackgroundColor
- #labelsAreColored: false
+ (ColorMenuSpec
+ name: 'colorMenu2'
+ layout: (LayoutFrame 115 0 40 0 -3 1.0 62 0)
+ activeHelpKey: colorsBackgroundLabelColor
+ model: labelBackgroundColor
+ labelsAreColored: false
)
)
)
)
- #(#FramedBoxSpec
- #label: 'Cell Colors:'
- #name: 'defaultColorsBox'
- #layout: #(#LayoutFrame 0 0.0 108 0 0 1.0 263 0)
- #labelPosition: #topLeft
- #component:
- #(#SpecCollection
- #collection: #(
- #(#LabelSpec
- #label: 'Foreground:'
- #name: 'fgLabel'
- #layout: #(#AlignmentOrigin 112 0 28 0 1 0.5)
- #resizeForLabel: true
- #adjust: #right
+ (FramedBoxSpec
+ label: 'Cell Colors:'
+ name: 'defaultColorsBox'
+ layout: (LayoutFrame 0 0.0 108 0 0 1.0 263 0)
+ labelPosition: topLeft
+ component:
+ (SpecCollection
+ collection: (
+ (LabelSpec
+ label: 'Foreground:'
+ name: 'fgLabel'
+ layout: (AlignmentOrigin 112 0 28 0 1 0.5)
+ resizeForLabel: true
+ adjust: right
)
- #(#ColorMenuSpec
- #name: 'fgMenu'
- #layout: #(#LayoutFrame 115 0 16 0 -3 1.0 38 0)
- #activeHelpKey: #colorsForegroundCellColor
- #model: #foregroundColor
- #labelsAreColored: true
+ (ColorMenuSpec
+ name: 'fgMenu'
+ layout: (LayoutFrame 115 0 16 0 -3 1.0 38 0)
+ activeHelpKey: colorsForegroundCellColor
+ model: foregroundColor
+ labelsAreColored: true
)
- #(#LabelSpec
- #label: 'Background:'
- #name: 'bgLabel'
- #layout: #(#AlignmentOrigin 112 0 56 0 1 0.5)
- #resizeForLabel: true
- #adjust: #right
+ (LabelSpec
+ label: 'Background:'
+ name: 'bgLabel'
+ layout: (AlignmentOrigin 112 0 56 0 1 0.5)
+ resizeForLabel: true
+ adjust: right
)
- #(#ColorMenuSpec
- #name: 'bgMenu'
- #layout: #(#LayoutFrame 115 0 44 0 -3 1.0 66 0)
- #activeHelpKey: #colorsBackgroundCellColor
- #model: #backgroundColor
- #labelsAreColored: false
+ (ColorMenuSpec
+ name: 'bgMenu'
+ layout: (LayoutFrame 115 0 44 0 -3 1.0 66 0)
+ activeHelpKey: colorsBackgroundCellColor
+ model: backgroundColor
+ labelsAreColored: false
)
- #(#LabelSpec
- #label: 'FG-Selector:'
- #name: 'fgSelLabel'
- #layout: #(#AlignmentOrigin 112 0 90 0 1 0.5)
- #resizeForLabel: true
- #adjust: #right
+ (LabelSpec
+ label: 'FG-Selector:'
+ name: 'fgSelLabel'
+ layout: (AlignmentOrigin 112 0 90 0 1 0.5)
+ resizeForLabel: true
+ adjust: right
)
- #(#InputFieldSpec
- #name: 'fgSelField'
- #layout: #(#LayoutFrame 115 0 79 0 0 1.0 101 0)
- #activeHelpKey: #colorsForegroundSelector
- #tabable: true
- #model: #foregroundSelector
- #group: #inputGroup
- #type: #symbolOrNil
- #acceptOnLostFocus: false
- #acceptChannel: #acceptChannel
- #modifiedChannel: #modifiedChannel
- #acceptOnPointerLeave: false
+ (InputFieldSpec
+ name: 'fgSelField'
+ layout: (LayoutFrame 115 0 79 0 0 1.0 101 0)
+ activeHelpKey: colorsForegroundSelector
+ tabable: true
+ model: foregroundSelector
+ group: inputGroup
+ type: symbolOrNil
+ acceptOnLostFocus: false
+ acceptChannel: acceptChannel
+ modifiedChannel: modifiedChannel
+ acceptOnPointerLeave: false
)
- #(#LabelSpec
- #label: 'BG-Selector:'
- #name: 'bgSelLabel'
- #layout: #(#AlignmentOrigin 112 0 115 0 1 0.5)
- #resizeForLabel: true
- #adjust: #right
+ (LabelSpec
+ label: 'BG-Selector:'
+ name: 'bgSelLabel'
+ layout: (AlignmentOrigin 112 0 115 0 1 0.5)
+ resizeForLabel: true
+ adjust: right
)
- #(#InputFieldSpec
- #name: 'bgSelField'
- #layout: #(#LayoutFrame 115 0 104 0 0 1.0 126 0)
- #activeHelpKey: #colorsBackgroundSelector
- #tabable: true
- #model: #backgroundSelector
- #group: #inputGroup
- #type: #symbolOrNil
- #acceptOnLostFocus: false
- #acceptChannel: #acceptChannel
- #modifiedChannel: #modifiedChannel
- #acceptOnPointerLeave: false
+ (InputFieldSpec
+ name: 'bgSelField'
+ layout: (LayoutFrame 115 0 104 0 0 1.0 126 0)
+ activeHelpKey: colorsBackgroundSelector
+ tabable: true
+ model: backgroundSelector
+ group: inputGroup
+ type: symbolOrNil
+ acceptOnLostFocus: false
+ acceptChannel: acceptChannel
+ modifiedChannel: modifiedChannel
+ acceptOnPointerLeave: false
)
)
@@ -720,69 +714,66 @@
<resource: #canvas>
- ^
-
- #(#FullSpec
- #window:
- #(#WindowSpec
- #name: 'Data Set Builder'
- #layout: #(#LayoutFrame 414 0 336 0 740 0 471 0)
- #label: 'Data Set Builder'
- #min: #(#Point 10 10)
- #max: #(#Point 1152 900)
- #bounds: #(#Rectangle 414 336 741 472)
- #usePreferredExtent: false
- )
- #component:
- #(#SpecCollection
- #collection:
- #(
- #(#FramedBoxSpec
- #name: 'framedBox1'
- #layout: #(#LayoutFrame 0 0.0 3 0.0 0 1.0 -34 1.0)
- #label: 'Class for code'
- #translateLabel: true
- #labelPosition: #topLeft
- )
- #(#LabelSpec
- #name: 'classLabel'
- #layout: #(#AlignmentOrigin 73 0.11 38 0 1 0.5)
- #label: 'Class:'
- #translateLabel: true
- #adjust: #right
- #resizeForLabel: true
- )
- #(#InputFieldSpec
- #name: 'classNameInputField'
- #layout: #(#LayoutFrame 77 0.11 27 0 -16 1.0 49 0)
- #tabable: true
- #model: #classNameChannel
- )
- #(#LabelSpec
- #name: 'superClassLabel'
- #layout: #(#AlignmentOrigin 73 0.11 65 0 1 0.5)
- #label: 'Superclass:'
- #translateLabel: true
- #adjust: #right
- #resizeForLabel: true
- )
- #(#InputFieldSpec
- #name: 'superclassNameInputField'
- #layout: #(#LayoutFrame 76 0.11 55 0 -16 1.0 77 0)
- #tabable: true
- #model: #superclassNameChannel
- )
- #(#UISubSpecification
- #name: 'SubSpecification'
- #layout: #(#LayoutFrame 0 0.0 -29 1 0 1.0 -5 1.0)
- #majorKey: #ToolApplicationModel
- #minorKey: #windowSpecForCommitWithoutChannels
- )
- )
- )
+ ^
+ #(FullSpec
+ name: defineClassNameSpec
+ window:
+ (WindowSpec
+ label: 'Data Set Builder'
+ name: 'Data Set Builder'
+ min: (Point 10 10)
+ bounds: (Rectangle 14 46 341 182)
+ )
+ component:
+ (SpecCollection
+ collection: (
+ (FramedBoxSpec
+ label: 'Class for code'
+ name: 'framedBox1'
+ layout: (LayoutFrame 0 0.0 3 0.0 0 1.0 -34 1.0)
+ labelPosition: topLeft
+ translateLabel: true
+ )
+ (LabelSpec
+ label: 'Class:'
+ name: 'classLabel'
+ layout: (AlignmentOrigin 73 0.11 38 0 1 0.5)
+ translateLabel: true
+ resizeForLabel: true
+ adjust: right
+ )
+ (InputFieldSpec
+ name: 'classNameInputField'
+ layout: (LayoutFrame 77 0.11 27 0 -16 1.0 49 0)
+ tabable: true
+ model: classNameChannel
+ acceptOnPointerLeave: false
+ )
+ (LabelSpec
+ label: 'Superclass:'
+ name: 'superClassLabel'
+ layout: (AlignmentOrigin 73 0.11 65 0 1 0.5)
+ translateLabel: true
+ resizeForLabel: true
+ adjust: right
+ )
+ (InputFieldSpec
+ name: 'superclassNameInputField'
+ layout: (LayoutFrame 76 0.11 55 0 -16 1.0 77 0)
+ tabable: true
+ model: superclassNameChannel
+ acceptOnPointerLeave: false
+ )
+ (UISubSpecification
+ name: 'SubSpecification'
+ layout: (LayoutFrame 0 0.0 -29 1 0 1.0 -5 1.0)
+ majorKey: ToolApplicationModel
+ minorKey: windowSpecForCommitWithoutChannels
+ )
+ )
+
+ )
)
-
- "Modified: / 20.5.1998 / 03:46:17 / cg"
!
formatEditSpec
@@ -800,87 +791,81 @@
<resource: #canvas>
^
- #(#FullSpec
- #name: #formatEditSpec
- #window:
- #(#WindowSpec
- #label: 'DataSet Details'
- #name: 'DataSet Details'
- #layout: #(#LayoutFrame 699 0 270 0 1086 0 561 0)
- #level: 0
- #min: #(#Point 10 10)
- #max: #(#Point 1280 1024)
- #bounds: #(#Rectangle 699 270 1087 562)
- #usePreferredExtent: false
- #returnIsOKInDialog: true
- #escapeIsCancelInDialog: true
+ #(FullSpec
+ name: formatEditSpec
+ window:
+ (WindowSpec
+ label: 'DataSet Details'
+ name: 'DataSet Details'
+ min: (Point 10 10)
+ bounds: (Rectangle 14 46 402 338)
)
- #component:
- #(#SpecCollection
- #collection: #(
- #(#FramedBoxSpec
- #label: 'Input Format'
- #name: 'framedBox1'
- #layout: #(#LayoutFrame 0 0.0 3 0 0 1.0 127 0)
- #labelPosition: #topLeft
- #component:
- #(#SpecCollection
- #collection: #(
- #(#LabelSpec
- #label: 'Input Type:'
- #name: 'typeLabel'
- #layout: #(#AlignmentOrigin 115 0 26 0 1 0.5)
- #resizeForLabel: true
+ component:
+ (SpecCollection
+ collection: (
+ (FramedBoxSpec
+ label: 'Input Format'
+ name: 'framedBox1'
+ layout: (LayoutFrame 0 0.0 3 0 0 1.0 127 0)
+ labelPosition: topLeft
+ component:
+ (SpecCollection
+ collection: (
+ (LabelSpec
+ label: 'Input Type:'
+ name: 'typeLabel'
+ layout: (AlignmentOrigin 115 0 26 0 1 0.5)
+ resizeForLabel: true
)
- #(#ComboListSpec
- #name: 'typeCombo'
- #layout: #(#LayoutFrame 118 0 15 0 3 1.0 37 0)
- #activeHelpKey: #formatInputType
- #tabable: true
- #model: #type
- #comboList:
- #(#string
- #password #number
- #numberOrNil #symbolOrNil
+ (ComboListSpec
+ name: 'typeCombo'
+ layout: (LayoutFrame 118 0 15 0 3 1.0 37 0)
+ activeHelpKey: formatInputType
+ tabable: true
+ model: type
+ comboList:
+ (string
+ password number
+ numberOrNil symbolOrNil
)
- #useIndex: false
+ useIndex: false
)
- #(#LabelSpec
- #label: 'Max Size:'
- #name: 'sizeLabel'
- #layout: #(#AlignmentOrigin 115 0 52 0 1 0.5)
- #resizeForLabel: true
+ (LabelSpec
+ label: 'Max Size:'
+ name: 'sizeLabel'
+ layout: (AlignmentOrigin 115 0 52 0 1 0.5)
+ resizeForLabel: true
)
- #(#InputFieldSpec
- #name: 'sizeField'
- #layout: #(#LayoutFrame 118 0 41 0 3 1.0 63 0)
- #activeHelpKey: #formatMaxSize
- #tabable: true
- #model: #size
- #group: #inputGroup
- #type: #numberOrNil
- #acceptOnLostFocus: false
- #acceptChannel: #acceptChannel
- #modifiedChannel: #modifiedChannel
- #acceptOnPointerLeave: false
+ (InputFieldSpec
+ name: 'sizeField'
+ layout: (LayoutFrame 118 0 41 0 3 1.0 63 0)
+ activeHelpKey: formatMaxSize
+ tabable: true
+ model: size
+ group: inputGroup
+ type: numberOrNil
+ acceptOnLostFocus: false
+ acceptChannel: acceptChannel
+ modifiedChannel: modifiedChannel
+ acceptOnPointerLeave: false
)
- #(#LabelSpec
- #label: 'Text Format:'
- #name: 'formatLabel'
- #layout: #(#AlignmentOrigin 115 0 77 0 1 0.5)
- #resizeForLabel: true
+ (LabelSpec
+ label: 'Text Format:'
+ name: 'formatLabel'
+ layout: (AlignmentOrigin 115 0 77 0 1 0.5)
+ resizeForLabel: true
)
- #(#InputFieldSpec
- #name: 'formatField'
- #layout: #(#LayoutFrame 118 0 66 0 3 1.0 88 0)
- #activeHelpKey: #formatTextFormat
- #tabable: true
- #model: #formatString
- #group: #inputGroup
- #acceptOnLostFocus: false
- #acceptChannel: #acceptChannel
- #modifiedChannel: #modifiedChannel
- #acceptOnPointerLeave: false
+ (InputFieldSpec
+ name: 'formatField'
+ layout: (LayoutFrame 118 0 66 0 3 1.0 88 0)
+ activeHelpKey: formatTextFormat
+ tabable: true
+ model: formatString
+ group: inputGroup
+ acceptOnLostFocus: false
+ acceptChannel: acceptChannel
+ modifiedChannel: modifiedChannel
+ acceptOnPointerLeave: false
)
)
@@ -907,150 +892,149 @@
<resource: #canvas>
^
- #(#FullSpec
- #name: #frameEditSpec
- #window:
- #(#WindowSpec
- #label: 'DataSet Dimension'
- #name: 'DataSet Dimension'
- #min: #(#Point 10 10)
- #max: #(#Point 1280 1024)
- #bounds: #(#Rectangle 16 42 412 355)
+ #(FullSpec
+ name: frameEditSpec
+ window:
+ (WindowSpec
+ label: 'DataSet Dimension'
+ name: 'DataSet Dimension'
+ min: (Point 10 10)
+ bounds: (Rectangle 14 46 410 359)
)
- #component:
- #(#SpecCollection
- #collection: #(
- #(#FramedBoxSpec
- #label: 'Separators'
- #name: 'separatorBox'
- #layout: #(#LayoutFrame 0 0.0 3 0 0 1.0 132 0)
- #labelPosition: #topLeft
- #component:
- #(#SpecCollection
- #collection: #(
- #(#CheckBoxSpec
- #label: 'Show Row-Separator'
- #name: 'showRowSeparator'
- #layout: #(#LayoutFrame 5 0 15 0 293 0 38 0)
- #activeHelpKey: #frameShowRowSeparator
- #tabable: true
- #model: #showRowSeparator
+ component:
+ (SpecCollection
+ collection: (
+ (FramedBoxSpec
+ label: 'Separators'
+ name: 'separatorBox'
+ layout: (LayoutFrame 0 0.0 3 0 0 1.0 132 0)
+ labelPosition: topLeft
+ component:
+ (SpecCollection
+ collection: (
+ (CheckBoxSpec
+ label: 'Show Row-Separator'
+ name: 'showRowSeparator'
+ layout: (LayoutFrame 5 0 15 0 293 0 38 0)
+ activeHelpKey: frameShowRowSeparator
+ tabable: true
+ model: showRowSeparator
)
- #(#InputFieldSpec
- #name: 'rowSeparatorSelector'
- #layout: #(#LayoutFrame 142 0 41 0 2 1.0 63 0)
- #activeHelpKey: #frameShowRowSeparatorSelector
- #tabable: true
- #model: #rowSeparatorSelector
- #group: #inputGroup
- #type: #symbolOrNil
- #acceptOnLostFocus: false
- #acceptChannel: #acceptChannel
- #modifiedChannel: #modifiedChannel
- #acceptOnPointerLeave: false
+ (InputFieldSpec
+ name: 'rowSeparatorSelector'
+ layout: (LayoutFrame 142 0 41 0 2 1.0 63 0)
+ activeHelpKey: frameShowRowSeparatorSelector
+ tabable: true
+ model: rowSeparatorSelector
+ group: inputGroup
+ type: symbolOrNil
+ acceptOnLostFocus: false
+ acceptChannel: acceptChannel
+ modifiedChannel: modifiedChannel
+ acceptOnPointerLeave: false
)
- #(#CheckBoxSpec
- #label: 'Show Column-Separator'
- #name: 'showColSeparator'
- #layout: #(#LayoutFrame 5 0 70 0 294 0 93 0)
- #activeHelpKey: #frameShowColumnSeparator
- #tabable: true
- #model: #showColSeparator
+ (CheckBoxSpec
+ label: 'Show Column-Separator'
+ name: 'showColSeparator'
+ layout: (LayoutFrame 5 0 70 0 294 0 93 0)
+ activeHelpKey: frameShowColumnSeparator
+ tabable: true
+ model: showColSeparator
)
- #(#LabelSpec
- #label: 'Selector:'
- #name: 'Label1'
- #layout: #(#LayoutFrame 80 0.0 44 0 140 0.0 61 0)
- #resizeForLabel: true
- #adjust: #right
+ (LabelSpec
+ label: 'Selector:'
+ name: 'Label1'
+ layout: (LayoutFrame 80 0.0 44 0 140 0.0 61 0)
+ resizeForLabel: true
+ adjust: right
)
)
)
)
- #(#FramedBoxSpec
- #label: 'Dimensions:'
- #name: 'framedBox1'
- #layout: #(#LayoutFrame 0 0.0 133 0 0 1.0 305 0)
- #labelPosition: #topLeft
- #component:
- #(#SpecCollection
- #collection: #(
- #(#LabelSpec
- #label: 'Column Width:'
- #name: 'widthLabel'
- #layout: #(#AlignmentOrigin 140 0.0 23 0 1 0.5)
- #resizeForLabel: true
- #adjust: #right
+ (FramedBoxSpec
+ label: 'Dimensions:'
+ name: 'framedBox1'
+ layout: (LayoutFrame 0 0.0 133 0 0 1.0 305 0)
+ labelPosition: topLeft
+ component:
+ (SpecCollection
+ collection: (
+ (LabelSpec
+ label: 'Column Width:'
+ name: 'widthLabel'
+ layout: (AlignmentOrigin 140 0.0 23 0 1 0.5)
+ resizeForLabel: true
+ adjust: right
)
- #(#InputFieldSpec
- #name: 'widthField'
- #layout: #(#LayoutFrame 142 0 12 0 2 1.0 34 0)
- #activeHelpKey: #frameColumnWidth
- #tabable: true
- #model: #width
- #group: #inputGroup
- #type: #numberOrNil
- #acceptOnLostFocus: false
- #acceptChannel: #acceptChannel
- #modifiedChannel: #modifiedChannel
- #acceptOnPointerLeave: false
+ (InputFieldSpec
+ name: 'widthField'
+ layout: (LayoutFrame 142 0 12 0 2 1.0 34 0)
+ activeHelpKey: frameColumnWidth
+ tabable: true
+ model: width
+ group: inputGroup
+ type: numberOrNil
+ acceptOnLostFocus: false
+ acceptChannel: acceptChannel
+ modifiedChannel: modifiedChannel
+ acceptOnPointerLeave: false
)
- #(#LabelSpec
- #label: 'Min. Width:'
- #name: 'minWidthLabel'
- #layout: #(#AlignmentOrigin 140 0.0 51 0 1 0.5)
- #resizeForLabel: true
- #adjust: #right
+ (LabelSpec
+ label: 'Min. Width:'
+ name: 'minWidthLabel'
+ layout: (AlignmentOrigin 140 0.0 51 0 1 0.5)
+ resizeForLabel: true
+ adjust: right
)
- #(#InputFieldSpec
- #name: 'minWidthField'
- #layout: #(#LayoutFrame 142 0 40 0 2 1.0 62 0)
- #activeHelpKey: #frameMinWidth
- #tabable: true
- #model: #minWidth
- #group: #inputGroup
- #type: #numberOrNil
- #acceptOnLostFocus: false
- #acceptChannel: #acceptChannel
- #modifiedChannel: #modifiedChannel
- #acceptOnPointerLeave: false
+ (InputFieldSpec
+ name: 'minWidthField'
+ layout: (LayoutFrame 142 0 40 0 2 1.0 62 0)
+ activeHelpKey: frameMinWidth
+ tabable: true
+ model: minWidth
+ group: inputGroup
+ type: numberOrNil
+ acceptOnLostFocus: false
+ acceptChannel: acceptChannel
+ modifiedChannel: modifiedChannel
+ acceptOnPointerLeave: false
)
- #(#LabelSpec
- #label: 'Row Height:'
- #name: 'heightLabel'
- #layout: #(#AlignmentOrigin 140 0.0 79 0 1 0.5)
- #resizeForLabel: true
- #adjust: #right
+ (LabelSpec
+ label: 'Row Height:'
+ name: 'heightLabel'
+ layout: (AlignmentOrigin 140 0.0 79 0 1 0.5)
+ resizeForLabel: true
+ adjust: right
)
- #(#InputFieldSpec
- #name: 'heightField'
- #layout: #(#LayoutFrame 142 0 68 0 2 1.0 90 0)
- #activeHelpKey: #frameRowHeight
- #tabable: true
- #model: #height
- #group: #inputGroup
- #type: #numberOrNil
- #acceptOnLostFocus: false
- #acceptChannel: #acceptChannel
- #modifiedChannel: #modifiedChannel
- #acceptOnPointerLeave: false
+ (InputFieldSpec
+ name: 'heightField'
+ layout: (LayoutFrame 142 0 68 0 2 1.0 90 0)
+ activeHelpKey: frameRowHeight
+ tabable: true
+ model: height
+ group: inputGroup
+ type: numberOrNil
+ acceptOnLostFocus: false
+ acceptChannel: acceptChannel
+ modifiedChannel: modifiedChannel
+ acceptOnPointerLeave: false
)
- #(#CheckBoxSpec
- #label: 'Compute Width From Items'
- #name: 'usePreferredWidth'
- #layout: #(#LayoutFrame 5 0 96 0 324 0 118 0)
- #activeHelpKey: #usePreferredWidth
- #tabable: true
- #model: #usePreferredWidth
+ (CheckBoxSpec
+ label: 'Compute Width From Items'
+ name: 'usePreferredWidth'
+ layout: (LayoutFrame 5 0 96 0 324 0 118 0)
+ activeHelpKey: usePreferredWidth
+ tabable: true
+ model: usePreferredWidth
)
- #(#CheckBoxSpec
- #label: 'Is Resizeable'
- #name: 'isResizeable'
- #layout: #(#LayoutFrame -361 1.0 121 0 -28 1.0 144 0)
- #activeHelpKey: #isResizeable
- #tabable: true
- #model: #isResizeable
+ (CheckBoxSpec
+ label: 'Is Resizeable'
+ name: 'isResizeable'
+ layout: (LayoutFrame -361 1.0 121 0 -28 1.0 144 0)
+ activeHelpKey: isResizeable
+ tabable: true
+ model: isResizeable
)
)
@@ -1077,146 +1061,145 @@
<resource: #canvas>
^
- #(#FullSpec
- #name: #selectionEditSpec
- #window:
- #(#WindowSpec
- #label: 'DataSet Basic'
- #name: 'DataSet Basic'
- #min: #(#Point 10 10)
- #max: #(#Point 1280 1024)
- #bounds: #(#Rectangle 67 116 398 444)
+ #(FullSpec
+ name: selectionEditSpec
+ window:
+ (WindowSpec
+ label: 'DataSet Basic'
+ name: 'DataSet Basic'
+ min: (Point 10 10)
+ bounds: (Rectangle 14 46 345 374)
)
- #component:
- #(#SpecCollection
- #collection: #(
- #(#FramedBoxSpec
- #label: 'Label Select Action:'
- #name: 'LabelSelectAction'
- #layout: #(#LayoutFrame 0 0.0 3 0 0 1.0 97 0)
- #labelPosition: #topLeft
- #component:
- #(#SpecCollection
- #collection: #(
- #(#LabelSpec
- #label: 'Selector:'
- #name: 'ActionLabel'
- #layout: #(#AlignmentOrigin 95 0 20 0 1 0.5)
- #resizeForLabel: true
- #adjust: #left
+ component:
+ (SpecCollection
+ collection: (
+ (FramedBoxSpec
+ label: 'Label Select Action:'
+ name: 'LabelSelectAction'
+ layout: (LayoutFrame 0 0.0 3 0 0 1.0 97 0)
+ labelPosition: topLeft
+ component:
+ (SpecCollection
+ collection: (
+ (LabelSpec
+ label: 'Selector:'
+ name: 'ActionLabel'
+ layout: (AlignmentOrigin 95 0 20 0 1 0.5)
+ resizeForLabel: true
+ adjust: left
)
- #(#InputFieldSpec
- #name: 'ActionSelector'
- #layout: #(#LayoutFrame 98 0 9 0 3 1.0 31 0)
- #activeHelpKey: #selectionLabelClickSelector
- #tabable: true
- #model: #labelActionSelector
- #group: #inputGroup
- #type: #symbolOrNil
- #acceptOnLostFocus: false
- #acceptChannel: #acceptChannel
- #modifiedChannel: #modifiedChannel
- #acceptOnPointerLeave: false
+ (InputFieldSpec
+ name: 'ActionSelector'
+ layout: (LayoutFrame 98 0 9 0 3 1.0 31 0)
+ activeHelpKey: selectionLabelClickSelector
+ tabable: true
+ model: labelActionSelector
+ group: inputGroup
+ type: symbolOrNil
+ acceptOnLostFocus: false
+ acceptChannel: acceptChannel
+ modifiedChannel: modifiedChannel
+ acceptOnPointerLeave: false
)
- #(#LabelSpec
- #label: 'Argument:'
- #name: 'ArgumentLabel'
- #layout: #(#AlignmentOrigin 95 0 48 0 1 0.5)
- #resizeForLabel: true
- #adjust: #left
+ (LabelSpec
+ label: 'Argument:'
+ name: 'ArgumentLabel'
+ layout: (AlignmentOrigin 95 0 48 0 1 0.5)
+ resizeForLabel: true
+ adjust: left
)
- #(#InputFieldSpec
- #name: 'ArgumentValue'
- #layout: #(#LayoutFrame 98 0 37 0 3 1.0 59 0)
- #activeHelpKey: #selectionLabelSelectorArgument
- #tabable: true
- #model: #labelActionArgument
- #group: #inputGroup
- #type: #string
- #acceptOnLostFocus: false
- #acceptChannel: #acceptChannel
- #modifiedChannel: #modifiedChannel
- #acceptOnPointerLeave: false
+ (InputFieldSpec
+ name: 'ArgumentValue'
+ layout: (LayoutFrame 98 0 37 0 3 1.0 59 0)
+ activeHelpKey: selectionLabelSelectorArgument
+ tabable: true
+ model: labelActionArgument
+ group: inputGroup
+ type: string
+ acceptOnLostFocus: false
+ acceptChannel: acceptChannel
+ modifiedChannel: modifiedChannel
+ acceptOnPointerLeave: false
)
)
)
)
- #(#FramedBoxSpec
- #label: 'Cell Selection:'
- #name: 'CellSelection'
- #layout: #(#LayoutFrame 0 0.0 105 0 0 1.0 215 0)
- #labelPosition: #topLeft
- #component:
- #(#SpecCollection
- #collection: #(
- #(#CheckBoxSpec
- #label: 'Is Selectable'
- #name: 'canSelect'
- #layout: #(#Point 95 1)
- #activeHelpKey: #selectionIsSelectable
- #tabable: true
- #model: #canSelect
+ (FramedBoxSpec
+ label: 'Cell Selection:'
+ name: 'CellSelection'
+ layout: (LayoutFrame 0 0.0 105 0 0 1.0 215 0)
+ labelPosition: topLeft
+ component:
+ (SpecCollection
+ collection: (
+ (CheckBoxSpec
+ label: 'Is Selectable'
+ name: 'canSelect'
+ layout: (Point 95 1)
+ activeHelpKey: selectionIsSelectable
+ tabable: true
+ model: canSelect
)
- #(#LabelSpec
- #label: 'Selector:'
- #name: 'selectorLabel'
- #layout: #(#AlignmentOrigin 95 0 37 0 1 0.5)
- #resizeForLabel: true
- #adjust: #right
+ (LabelSpec
+ label: 'Selector:'
+ name: 'selectorLabel'
+ layout: (AlignmentOrigin 95 0 37 0 1 0.5)
+ resizeForLabel: true
+ adjust: right
)
- #(#InputFieldSpec
- #name: 'selectSelector'
- #layout: #(#LayoutFrame 98 0 26 0 3 1.0 48 0)
- #activeHelpKey: #selectionCellClickSelector
- #tabable: true
- #model: #selectSelector
- #group: #inputGroup
- #type: #symbolOrNil
- #acceptOnLostFocus: false
- #acceptChannel: #acceptChannel
- #modifiedChannel: #modifiedChannel
- #acceptOnPointerLeave: false
+ (InputFieldSpec
+ name: 'selectSelector'
+ layout: (LayoutFrame 98 0 26 0 3 1.0 48 0)
+ activeHelpKey: selectionCellClickSelector
+ tabable: true
+ model: selectSelector
+ group: inputGroup
+ type: symbolOrNil
+ acceptOnLostFocus: false
+ acceptChannel: acceptChannel
+ modifiedChannel: modifiedChannel
+ acceptOnPointerLeave: false
)
- #(#CheckBoxSpec
- #label: 'Show Selection HighLightened'
- #name: 'showSelectionHighLightened'
- #layout: #(#LayoutFrame 95 0 53 0 3 1.0 77 0)
- #activeHelpKey: #showSelectionHighLighted
- #tabable: true
- #model: #showSelectionHighLighted
+ (CheckBoxSpec
+ label: 'Show Selection HighLightened'
+ name: 'showSelectionHighLightened'
+ layout: (LayoutFrame 95 0 53 0 3 1.0 77 0)
+ activeHelpKey: showSelectionHighLighted
+ tabable: true
+ model: showSelectionHighLighted
)
)
)
)
- #(#FramedBoxSpec
- #label: 'Cell Double Click:'
- #name: 'CellDoubleClick'
- #layout: #(#LayoutFrame 0 0.0 227 0 0 1.0 293 0)
- #labelPosition: #topLeft
- #component:
- #(#SpecCollection
- #collection: #(
- #(#LabelSpec
- #label: 'Selector:'
- #name: 'doubleLabel'
- #layout: #(#AlignmentOrigin 95 0 19 0 1 0.5)
- #resizeForLabel: true
- #adjust: #right
+ (FramedBoxSpec
+ label: 'Cell Double Click:'
+ name: 'CellDoubleClick'
+ layout: (LayoutFrame 0 0.0 227 0 0 1.0 293 0)
+ labelPosition: topLeft
+ component:
+ (SpecCollection
+ collection: (
+ (LabelSpec
+ label: 'Selector:'
+ name: 'doubleLabel'
+ layout: (AlignmentOrigin 95 0 19 0 1 0.5)
+ resizeForLabel: true
+ adjust: right
)
- #(#InputFieldSpec
- #name: 'doubleClicked'
- #layout: #(#LayoutFrame 98 0 8 0 3 1.0 30 0)
- #activeHelpKey: #selectionCellDoubleClickSelector
- #tabable: true
- #model: #doubleClickedSelector
- #group: #inputGroup
- #type: #symbolOrNil
- #acceptOnLostFocus: false
- #acceptChannel: #acceptChannel
- #modifiedChannel: #modifiedChannel
- #acceptOnPointerLeave: false
+ (InputFieldSpec
+ name: 'doubleClicked'
+ layout: (LayoutFrame 98 0 8 0 3 1.0 30 0)
+ activeHelpKey: selectionCellDoubleClickSelector
+ tabable: true
+ model: doubleClickedSelector
+ group: inputGroup
+ type: symbolOrNil
+ acceptOnLostFocus: false
+ acceptChannel: acceptChannel
+ modifiedChannel: modifiedChannel
+ acceptOnPointerLeave: false
)
)
@@ -1254,214 +1237,213 @@
<resource: #canvas>
^
- #(#FullSpec
- #name: #valuesEditSpec
- #window:
- #(#WindowSpec
- #label: 'DataSet Basic'
- #name: 'DataSet Basic'
- #min: #(#Point 10 10)
- #max: #(#Point 1280 1024)
- #bounds: #(#Rectangle 16 42 312 356)
+ #(FullSpec
+ name: valuesEditSpec
+ window:
+ (WindowSpec
+ label: 'DataSet Basic'
+ name: 'DataSet Basic'
+ min: (Point 10 10)
+ bounds: (Rectangle 14 46 310 360)
)
- #component:
- #(#SpecCollection
- #collection: #(
- #(#FramedBoxSpec
- #label: 'Value Selectors:'
- #name: 'valuesBox'
- #layout: #(#LayoutFrame 0 0.0 3 0 0 1.0 160 0)
- #labelPosition: #topLeft
- #component:
- #(#SpecCollection
- #collection: #(
- #(#LabelSpec
- #label: 'Read:'
- #name: 'readLabel'
- #layout: #(#AlignmentOrigin 94 0 15 0 1 0.5)
- #resizeForLabel: true
- #adjust: #right
+ component:
+ (SpecCollection
+ collection: (
+ (FramedBoxSpec
+ label: 'Value Selectors:'
+ name: 'valuesBox'
+ layout: (LayoutFrame 0 0.0 3 0 0 1.0 160 0)
+ labelPosition: topLeft
+ component:
+ (SpecCollection
+ collection: (
+ (LabelSpec
+ label: 'Read:'
+ name: 'readLabel'
+ layout: (AlignmentOrigin 94 0 15 0 1 0.5)
+ 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
+ (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)
- #resizeForLabel: true
- #adjust: #right
+ (LabelSpec
+ label: 'Write:'
+ name: 'writeLabel'
+ layout: (AlignmentOrigin 94 0 40 0 1 0.5)
+ 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
)
- #(#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)
+ resizeForLabel: true
+ adjust: right
)
- #(#LabelSpec
- #label: 'Converter:'
- #name: 'converterLabel'
- #layout: #(#AlignmentOrigin 94 0 65 0 1 0.5)
- #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
)
- #(#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)
+ resizeForLabel: true
+ adjust: right
)
- #(#LabelSpec
- #label: 'Print:'
- #name: 'printLabel'
- #layout: #(#AlignmentOrigin 94 0 90 0 1 0.5)
- #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
+ (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)
- #resizeForLabel: true
- #adjust: #right
+ (LabelSpec
+ label: 'Visibility:'
+ name: 'visibilityLabel'
+ layout: (AlignmentOrigin 94 0 115 0 1 0.5)
+ 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
+ (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: 'Menu:'
- #name: 'menusBox'
- #layout: #(#LayoutFrame 0 0.0 161 0 0 1.0 218 0)
- #labelPosition: #topLeft
- #component:
- #(#SpecCollection
- #collection: #(
- #(#LabelSpec
- #label: 'Selector:'
- #name: 'menuLabel'
- #layout: #(#AlignmentOrigin 94 0 12 0 1 0.5)
- #resizeForLabel: true
- #adjust: #right
+ (FramedBoxSpec
+ label: 'Menu:'
+ name: 'menusBox'
+ layout: (LayoutFrame 0 0.0 161 0 0 1.0 218 0)
+ labelPosition: topLeft
+ component:
+ (SpecCollection
+ collection: (
+ (LabelSpec
+ label: 'Selector:'
+ name: 'menuLabel'
+ layout: (AlignmentOrigin 94 0 12 0 1 0.5)
+ 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
+ (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
)
)
)
)
- #(#FramedBoxSpec
- #label: 'Combo List/Box Selectors:'
- #name: 'framedBox1'
- #layout: #(#LayoutFrame 1 0.0 223 0 1 1.0 311 0)
- #labelPosition: #topLeft
- #component:
- #(#SpecCollection
- #collection: #(
- #(#LabelSpec
- #label: 'Choices:'
- #name: 'ChoicesLabel'
- #layout: #(#AlignmentOrigin 94 0 15 0 1 0.5)
- #activeHelpKey: #valuesChoiceSelector
- #resizeForLabel: true
- #adjust: #right
+ (FramedBoxSpec
+ label: 'Combo List/Box Selectors:'
+ name: 'framedBox1'
+ layout: (LayoutFrame 1 0.0 223 0 1 1.0 311 0)
+ labelPosition: topLeft
+ component:
+ (SpecCollection
+ collection: (
+ (LabelSpec
+ label: 'Choices:'
+ name: 'ChoicesLabel'
+ layout: (AlignmentOrigin 94 0 15 0 1 0.5)
+ activeHelpKey: valuesChoiceSelector
+ resizeForLabel: true
+ adjust: right
)
- #(#InputFieldSpec
- #name: 'ChoicesField'
- #layout: #(#LayoutFrame 97 0 4 0 2 1.0 26 0)
- #activeHelpKey: #valuesChoiceSelector
- #tabable: true
- #model: #choices
- #group: #inputGroup
- #type: #symbolOrNil
- #acceptOnLeave: false
- #acceptOnLostFocus: false
- #acceptChannel: #acceptChannel
- #modifiedChannel: #modifiedChannel
- #acceptOnPointerLeave: false
+ (InputFieldSpec
+ name: 'ChoicesField'
+ layout: (LayoutFrame 97 0 4 0 2 1.0 26 0)
+ activeHelpKey: valuesChoiceSelector
+ tabable: true
+ model: choices
+ group: inputGroup
+ type: symbolOrNil
+ acceptOnLeave: false
+ acceptOnLostFocus: false
+ acceptChannel: acceptChannel
+ modifiedChannel: modifiedChannel
+ acceptOnPointerLeave: false
)
- #(#LabelSpec
- #label: 'Editable:'
- #name: 'ShowInputFieldLabel'
- #layout: #(#AlignmentOrigin 94 0 41 0 1 0.5)
- #activeHelpKey: #showComboFieldSelector
- #resizeForLabel: true
- #adjust: #right
+ (LabelSpec
+ label: 'Editable:'
+ name: 'ShowInputFieldLabel'
+ layout: (AlignmentOrigin 94 0 41 0 1 0.5)
+ activeHelpKey: showComboFieldSelector
+ resizeForLabel: true
+ adjust: right
)
- #(#InputFieldSpec
- #name: 'ShowInputFieldField'
- #layout: #(#LayoutFrame 97 0 30 0 2 1.0 52 0)
- #activeHelpKey: #showComboFieldSelector
- #tabable: true
- #model: #showComboFieldSelector
- #group: #inputGroup
- #type: #symbolOrNil
- #acceptOnLeave: false
- #acceptOnLostFocus: false
- #acceptChannel: #acceptChannel
- #modifiedChannel: #modifiedChannel
- #acceptOnPointerLeave: false
+ (InputFieldSpec
+ name: 'ShowInputFieldField'
+ layout: (LayoutFrame 97 0 30 0 2 1.0 52 0)
+ activeHelpKey: showComboFieldSelector
+ tabable: true
+ model: showComboFieldSelector
+ group: inputGroup
+ type: symbolOrNil
+ acceptOnLeave: false
+ acceptOnLostFocus: false
+ acceptChannel: acceptChannel
+ modifiedChannel: modifiedChannel
+ acceptOnPointerLeave: false
)
)
@@ -1489,109 +1471,100 @@
<resource: #canvas>
^
- #(#FullSpec
- #name: #windowSpec
- #window:
- #(#WindowSpec
- #label: 'Data Set Builder'
- #name: 'Data Set Builder'
- #min: #(#Point 10 10)
- #max: #(#Point 1152 900)
- #bounds: #(#Rectangle 12 22 645 589)
- #menu: #menu
+ #(FullSpec
+ name: windowSpec
+ window:
+ (WindowSpec
+ label: 'Data Set Builder'
+ name: 'Data Set Builder'
+ min: (Point 10 10)
+ bounds: (Rectangle 14 46 647 613)
+ menu: menu
)
- #component:
- #(#SpecCollection
- #collection: #(
- #(#MenuPanelSpec
- #attributes:
- #(#tabable
- true
- )
- #name: 'menuToolbarView'
- #layout: #(#LayoutFrame 0 0.0 0 0.0 0 1.0 32 0)
- #tabable: true
- #menu: #menuToolbar
+ component:
+ (SpecCollection
+ collection: (
+ (MenuPanelSpec
+ name: 'menuToolbarView'
+ layout: (LayoutFrame 0 0.0 0 0.0 0 1.0 32 0)
+ tabable: true
+ menu: menuToolbar
)
- #(#VariableVerticalPanelSpec
- #name: 'VariableVerticalPanel1'
- #layout: #(#LayoutFrame 0 0.0 38 0.0 0 1.0 -26 1.0)
- #component:
- #(#SpecCollection
- #collection: #(
- #(#FramedBoxSpec
- #label: 'Table Columns'
- #name: 'FramedBox'
- #labelPosition: #topLeft
- #component:
- #(#SpecCollection
- #collection: #(
- #(#DataSetSpec
- #name: 'columnView'
- #layout: #(#LayoutFrame 2 0.0 6 0.0 2 1.0 6 1.0)
- #hasHorizontalScrollBar: true
- #hasVerticalScrollBar: false
- #miniScrollerHorizontal: true
- #useIndex: false
- #has3Dsepartors: true
- #has3Dseparators: true
+ (VariableVerticalPanelSpec
+ name: 'VariableVerticalPanel1'
+ layout: (LayoutFrame 0 0.0 38 0.0 0 1.0 -26 1.0)
+ component:
+ (SpecCollection
+ collection: (
+ (FramedBoxSpec
+ label: 'Table Columns'
+ name: 'FramedBox'
+ labelPosition: topLeft
+ component:
+ (SpecCollection
+ collection: (
+ (DataSetSpec
+ name: 'columnView'
+ layout: (LayoutFrame 2 0.0 6 0.0 2 1.0 6 1.0)
+ hasHorizontalScrollBar: true
+ hasVerticalScrollBar: false
+ miniScrollerHorizontal: true
+ useIndex: false
+ has3Dsepartors: true
+ has3Dseparators: true
)
)
)
)
- #(#VariableHorizontalPanelSpec
- #name: 'VariablePanel'
- #level: -1
- #component:
- #(#SpecCollection
- #collection: #(
- #(#ViewSpec
- #name: 'labelsView'
- #component:
- #(#SpecCollection
- #collection: #(
- #(#SequenceViewSpec
- #name: 'labelAndColumns'
- #layout: #(#LayoutFrame 0 0.0 0 0.0 0 1.0 0 1.0)
- #tabable: true
- #model: #selectedColumnModel
- #menu: #menuEdit
- #hasHorizontalScrollBar: true
- #hasVerticalScrollBar: true
- #miniScrollerHorizontal: true
- #useIndex: true
- #sequenceList: #seqList
+ (VariableHorizontalPanelSpec
+ name: 'VariablePanel'
+ level: -1
+ component:
+ (SpecCollection
+ collection: (
+ (ViewSpec
+ name: 'labelsView'
+ component:
+ (SpecCollection
+ collection: (
+ (SequenceViewSpec
+ name: 'labelAndColumns'
+ layout: (LayoutFrame 0 0.0 0 0.0 0 1.0 0 1.0)
+ tabable: true
+ model: selectedColumnModel
+ menu: menuEdit
+ hasHorizontalScrollBar: true
+ hasVerticalScrollBar: true
+ miniScrollerHorizontal: true
+ useIndex: true
+ sequenceList: seqList
)
)
)
)
- #(#ViewSpec
- #name: 'specView'
- #level: -1
- #component:
- #(#SpecCollection
- #collection: #(
- #(#NoteBookViewSpec
- #attributes:
- #(#tabable
- true
- )
- #name: 'NoteBook'
- #layout: #(#LayoutFrame 1 0.0 0 0.0 0 1.0 -30 1.0)
- #tabable: true
- #model: #tabModel
- #menu: #tabList
- #useIndex: true
- #canvas: #canvasHolder
- #keepCanvasAlive: true
+ (ViewSpec
+ name: 'specView'
+ level: -1
+ component:
+ (SpecCollection
+ collection: (
+ (NoteBookViewSpec
+ name: 'NoteBook'
+ layout: (LayoutFrame 1 0.0 0 0.0 0 1.0 -30 1.0)
+ tabable: true
+ model: tabModel
+ menu: tabList
+ useIndex: true
+ canvas: canvasHolder
+ keepCanvasAlive: true
)
- #(#UISubSpecification
- #name: 'SubSpecification'
- #layout: #(#LayoutFrame 2 0.0 -26 1 -2 1.0 -2 1.0)
- #majorKey: #ToolApplicationModel
- #minorKey: #windowSpecForCommit
+ (UISubSpecification
+ name: 'SubSpecification'
+ layout: (LayoutFrame 2 0.0 -26 1 -2 1.0 -2 1.0)
+ majorKey: ToolApplicationModel
+ minorKey: windowSpecForCommit
)
)
@@ -1600,18 +1573,18 @@
)
)
- #handles: #(#Any 0.235387 1.0)
+ handles: (Any 0.235387 1.0)
)
)
)
- #handles: #(#Any 0.25 1.0)
+ handles: (Any 0.25 1.0)
)
- #(#UISubSpecification
- #name: 'infoBarSubSpec'
- #layout: #(#LayoutFrame 0 0.0 -24 1 0 1.0 0 1.0)
- #majorKey: #ToolApplicationModel
- #minorKey: #windowSpecForInfoBar
+ (UISubSpecification
+ name: 'infoBarSubSpec'
+ layout: (LayoutFrame 0 0.0 -24 1 0 1.0 0 1.0)
+ majorKey: ToolApplicationModel
+ minorKey: windowSpecForInfoBar
)
)
--- a/MenuEditor.st Fri Aug 29 20:31:23 2003 +0200
+++ b/MenuEditor.st Thu Sep 04 20:59:42 2003 +0200
@@ -470,87 +470,86 @@
<resource: #canvas>
^
- #(#FullSpec
- #name: #windowSpec
- #window:
- #(#WindowSpec
- #label: 'Menu Editor'
- #name: 'Menu Editor'
- #min: #(#Point 550 385)
- #max: #(#Point 1152 900)
- #bounds: #(#Rectangle 12 22 588 497)
- #menu: #menu
- #returnIsOKInDialog: false
- #escapeIsCancelInDialog: false
+ #(FullSpec
+ name: windowSpec
+ window:
+ (WindowSpec
+ label: 'Menu Editor'
+ name: 'Menu Editor'
+ min: (Point 550 385)
+ bounds: (Rectangle 14 46 590 521)
+ menu: menu
+ returnIsOKInDialog: false
+ escapeIsCancelInDialog: false
)
- #component:
- #(#SpecCollection
- #collection: #(
- #(#MenuPanelSpec
- #name: 'toolbar'
- #layout: #(#LayoutFrame 0 0.0 0 0 0 1.0 32 0)
- #tabable: true
- #menu: #toolbar
- #showSeparatingLines: true
+ component:
+ (SpecCollection
+ collection: (
+ (MenuPanelSpec
+ name: 'toolbar'
+ layout: (LayoutFrame 0 0.0 0 0 0 1.0 32 0)
+ tabable: true
+ menu: toolbar
+ showSeparatingLines: true
)
- #(#VariableHorizontalPanelSpec
- #name: 'VariableHorizontalPanel'
- #layout: #(#LayoutFrame 0 0.0 34 0.0 0 1.0 -26 1.0)
- #component:
- #(#SpecCollection
- #collection: #(
- #(#HierarchicalListViewSpec
- #name: 'ListOfItemsView'
- #model: #selectionHolder
- #menu: #editMenu
- #hasHorizontalScrollBar: true
- #hasVerticalScrollBar: true
- #miniScrollerHorizontal: true
- #miniScrollerVertical: true
- #listModel: #listOfItems
- #multipleSelectOk: true
- #useIndex: false
- #highlightMode: #label
- #doubleClickSelector: #indicatorClickedAt:
- #selectConditionSelector: #canSelect:
- #showLeftIndicators: false
- #indicatorSelector: #indicatorClickedAt:
- #properties:
- #(#PropertyListDictionary
- #dropSelector: #doDrop:
- #dragArgument: nil
- #dropObjectSelector: #dropObjects
- #dropArgument: nil
- #canDropSelector: #canDrop:
- #leaveSelector: #dropLeave:
- #enterSelector: #dropEnter:
- #overSelector: #dropOver:
+ (VariableHorizontalPanelSpec
+ name: 'VariableHorizontalPanel'
+ layout: (LayoutFrame 0 0.0 34 0.0 0 1.0 -26 1.0)
+ component:
+ (SpecCollection
+ collection: (
+ (HierarchicalListViewSpec
+ name: 'ListOfItemsView'
+ model: selectionHolder
+ menu: editMenu
+ hasHorizontalScrollBar: true
+ hasVerticalScrollBar: true
+ miniScrollerHorizontal: true
+ miniScrollerVertical: true
+ listModel: listOfItems
+ multipleSelectOk: true
+ useIndex: false
+ highlightMode: label
+ doubleClickSelector: indicatorClickedAt:
+ selectConditionSelector: canSelect:
+ showLeftIndicators: false
+ indicatorSelector: indicatorClickedAt:
+ properties:
+ (PropertyListDictionary
+ overSelector: dropOver:
+ dragArgument: nil
+ dropObjectSelector: dropObjects
+ dropArgument: nil
+ canDropSelector: canDrop:
+ leaveSelector: dropLeave:
+ enterSelector: dropEnter:
+ dropSelector: doDrop:
)
- #postBuildCallback: #postBuildListOfItemsView:
+ postBuildCallback: postBuildListOfItemsView:
)
- #(#ViewSpec
- #name: 'Box'
- #level: -1
- #component:
- #(#SpecCollection
- #collection: #(
- #(#NoteBookViewSpec
- #name: 'NoteBook'
- #layout: #(#LayoutFrame 1 0.0 0 0.0 1 1.0 -30 1.0)
- #enableChannel: #hasSingleSelectionChannel
- #tabable: true
- #model: #tabHolder
- #menu: #listOfTabs
- #fitLastRow: false
- #canvas: #wizardHolder
- #keepCanvasAlive: true
- #postBuildCallback: #postBuildNoteBook:
+ (ViewSpec
+ name: 'Box'
+ level: -1
+ component:
+ (SpecCollection
+ collection: (
+ (NoteBookViewSpec
+ name: 'NoteBook'
+ layout: (LayoutFrame 1 0.0 0 0.0 1 1.0 -30 1.0)
+ enableChannel: hasSingleSelectionChannel
+ tabable: true
+ model: tabHolder
+ menu: listOfTabs
+ fitLastRow: false
+ canvas: wizardHolder
+ keepCanvasAlive: true
+ postBuildCallback: postBuildNoteBook:
)
- #(#UISubSpecification
- #name: 'SubSpecification'
- #layout: #(#LayoutFrame 2 0.0 -26 1 -2 1.0 -2 1.0)
- #majorKey: #ToolApplicationModel
- #minorKey: #windowSpecForCommit
+ (UISubSpecification
+ name: 'SubSpecification'
+ layout: (LayoutFrame 2 0.0 -26 1 -2 1.0 -2 1.0)
+ majorKey: ToolApplicationModel
+ minorKey: windowSpecForCommit
)
)
@@ -559,13 +558,13 @@
)
)
- #handles: #(#Any 0.300493 1.0)
+ handles: (Any 0.300493 1.0)
)
- #(#UISubSpecification
- #name: 'InfoBarSubSpec'
- #layout: #(#LayoutFrame 0 0.0 -24 1 0 1.0 0 1.0)
- #majorKey: #ToolApplicationModel
- #minorKey: #windowSpecForInfoBar
+ (UISubSpecification
+ name: 'InfoBarSubSpec'
+ layout: (LayoutFrame 0 0.0 -24 1 0 1.0 0 1.0)
+ majorKey: ToolApplicationModel
+ minorKey: windowSpecForInfoBar
)
)
@@ -2910,171 +2909,170 @@
<resource: #canvas>
^
- #(#FullSpec
- #name: #detailsEditSpec
- #window:
- #(#WindowSpec
- #label: 'Details Edit'
- #name: 'Details Edit'
- #min: #(#Point 10 10)
- #max: #(#Point 1280 1024)
- #bounds: #(#Rectangle 43 153 303 398)
+ #(FullSpec
+ name: detailsEditSpec
+ window:
+ (WindowSpec
+ label: 'Details Edit'
+ name: 'Details Edit'
+ min: (Point 10 10)
+ bounds: (Rectangle 14 46 274 291)
)
- #component:
- #(#SpecCollection
- #collection: #(
- #(#LabelSpec
- #label: 'Accelerator:'
- #name: 'shortcutKeyLabel'
- #layout: #(#AlignmentOrigin 107 0 26 0 1 0.5)
- #activeHelpKey: #detailsAccelerator
- #resizeForLabel: true
- #adjust: #right
+ component:
+ (SpecCollection
+ collection: (
+ (LabelSpec
+ label: 'Accelerator:'
+ name: 'shortcutKeyLabel'
+ layout: (AlignmentOrigin 107 0 26 0 1 0.5)
+ activeHelpKey: detailsAccelerator
+ resizeForLabel: true
+ adjust: right
)
- #(#InputFieldSpec
- #name: 'shortcutKeyField'
- #layout: #(#LayoutFrame 110 0 15 0 -5 1.0 37 0)
- #activeHelpKey: #detailsAccelerator
- #tabable: true
- #model: #shortcutKeyCharacter
- #group: #inputGroup
- #type: #symbolOrNil
- #immediateAccept: false
- #acceptOnReturn: true
- #acceptOnTab: true
- #acceptChannel: #acceptChannel
- #modifiedChannel: #modifiedChannel
- #acceptOnPointerLeave: false
+ (InputFieldSpec
+ name: 'shortcutKeyField'
+ layout: (LayoutFrame 110 0 15 0 -5 1.0 37 0)
+ activeHelpKey: detailsAccelerator
+ tabable: true
+ model: shortcutKeyCharacter
+ group: inputGroup
+ type: symbolOrNil
+ immediateAccept: false
+ acceptOnReturn: true
+ acceptOnTab: true
+ acceptChannel: acceptChannel
+ modifiedChannel: modifiedChannel
+ acceptOnPointerLeave: false
)
- #(#LabelSpec
- #label: 'Enabled:'
- #name: 'enabledLabel'
- #layout: #(#AlignmentOrigin 107 0 51 0 1 0.5)
- #activeHelpKey: #detailsEnabled
- #resizeForLabel: true
- #adjust: #right
+ (LabelSpec
+ label: 'Enabled:'
+ name: 'enabledLabel'
+ layout: (AlignmentOrigin 107 0 51 0 1 0.5)
+ activeHelpKey: detailsEnabled
+ resizeForLabel: true
+ adjust: right
)
- #(#InputFieldSpec
- #name: 'enabledField'
- #layout: #(#LayoutFrame 110 0 40 0 -5 1.0 62 0)
- #activeHelpKey: #detailsEnabled
- #tabable: true
- #model: #enabled
- #group: #inputGroup
- #type: #symbolOrBooleanOrNil
- #immediateAccept: false
- #acceptOnReturn: true
- #acceptOnTab: true
- #acceptChannel: #acceptChannel
- #modifiedChannel: #modifiedChannel
- #acceptOnPointerLeave: false
+ (InputFieldSpec
+ name: 'enabledField'
+ layout: (LayoutFrame 110 0 40 0 -5 1.0 62 0)
+ activeHelpKey: detailsEnabled
+ tabable: true
+ model: enabled
+ group: inputGroup
+ type: symbolOrBooleanOrNil
+ immediateAccept: false
+ acceptOnReturn: true
+ acceptOnTab: true
+ acceptChannel: acceptChannel
+ modifiedChannel: modifiedChannel
+ acceptOnPointerLeave: false
)
- #(#LabelSpec
- #label: 'Visibility:'
- #name: 'visibilityLabel'
- #layout: #(#AlignmentOrigin 107 0 76 0 1 0.5)
- #activeHelpKey: #detailsVisibility
- #resizeForLabel: true
- #adjust: #right
+ (LabelSpec
+ label: 'Visibility:'
+ name: 'visibilityLabel'
+ layout: (AlignmentOrigin 107 0 76 0 1 0.5)
+ activeHelpKey: detailsVisibility
+ resizeForLabel: true
+ adjust: right
)
- #(#InputFieldSpec
- #name: 'isVisibleInputField'
- #layout: #(#LayoutFrame 110 0 65 0 -5 1.0 87 0)
- #activeHelpKey: #detailsVisibility
- #tabable: true
- #model: #isVisible
- #group: #inputGroup
- #type: #symbolOrBooleanOrNil
- #immediateAccept: false
- #acceptOnReturn: true
- #acceptOnTab: true
- #acceptChannel: #acceptChannel
- #modifiedChannel: #modifiedChannel
- #acceptOnPointerLeave: false
+ (InputFieldSpec
+ name: 'isVisibleInputField'
+ layout: (LayoutFrame 110 0 65 0 -5 1.0 87 0)
+ activeHelpKey: detailsVisibility
+ tabable: true
+ model: isVisible
+ group: inputGroup
+ type: symbolOrBooleanOrNil
+ immediateAccept: false
+ acceptOnReturn: true
+ acceptOnTab: true
+ acceptChannel: acceptChannel
+ modifiedChannel: modifiedChannel
+ acceptOnPointerLeave: false
)
- #(#LabelSpec
- #label: 'Aux Value'
- #name: 'auxLabel'
- #layout: #(#AlignmentOrigin 107 0 101 0 1 0.5)
- #activeHelpKey: #detailsAuxValue
- #translateLabel: true
- #resizeForLabel: true
- #adjust: #right
+ (LabelSpec
+ label: 'Aux Value'
+ name: 'auxLabel'
+ layout: (AlignmentOrigin 107 0 101 0 1 0.5)
+ activeHelpKey: detailsAuxValue
+ translateLabel: true
+ resizeForLabel: true
+ adjust: right
)
- #(#InputFieldSpec
- #name: 'auxInputField'
- #layout: #(#LayoutFrame 110 0 90 0 -5 1.0 112 0)
- #activeHelpKey: #detailsAuxValue
- #tabable: true
- #model: #auxValue
- #group: #inputGroup
- #type: #smalltalkObject
- #immediateAccept: false
- #acceptOnReturn: true
- #acceptOnTab: true
- #acceptChannel: #acceptChannel
- #modifiedChannel: #modifiedChannel
- #acceptOnPointerLeave: false
+ (InputFieldSpec
+ name: 'auxInputField'
+ layout: (LayoutFrame 110 0 90 0 -5 1.0 112 0)
+ activeHelpKey: detailsAuxValue
+ tabable: true
+ model: auxValue
+ group: inputGroup
+ type: smalltalkObject
+ immediateAccept: false
+ acceptOnReturn: true
+ acceptOnTab: true
+ acceptChannel: acceptChannel
+ modifiedChannel: modifiedChannel
+ acceptOnPointerLeave: false
)
- #(#LabelSpec
- #label: 'Start Group:'
- #name: 'StartGroupLabel'
- #layout: #(#AlignmentOrigin 107 0 139 0 1 0.5)
- #activeHelpKey: #detailsStartGroup
- #resizeForLabel: true
- #adjust: #right
+ (LabelSpec
+ label: 'Start Group:'
+ name: 'StartGroupLabel'
+ layout: (AlignmentOrigin 107 0 139 0 1 0.5)
+ activeHelpKey: detailsStartGroup
+ resizeForLabel: true
+ adjust: right
)
- #(#PopUpListSpec
- #label: 'left'
- #name: 'StartGroupPopUp'
- #layout: #(#LayoutFrame 110 0 128 0 -5 1.0 150 0)
- #activeHelpKey: #detailsStartGroup
- #tabable: true
- #model: #startGroup
- #menu:
- #(#left
- #right
+ (PopUpListSpec
+ label: 'left'
+ name: 'StartGroupPopUp'
+ layout: (LayoutFrame 110 0 128 0 -5 1.0 150 0)
+ activeHelpKey: detailsStartGroup
+ tabable: true
+ model: startGroup
+ menu:
+ (left
+ right
)
)
- #(#LabelSpec
- #label: 'Access Character Position:'
- #name: 'accessCharLabel'
- #layout: #(#AlignmentOrigin 217 0 170 0 1 0.5)
- #activeHelpKey: #detailsAccessCharaterPosition
- #resizeForLabel: true
- #adjust: #right
+ (LabelSpec
+ label: 'Access Character Position:'
+ name: 'accessCharLabel'
+ layout: (AlignmentOrigin 217 0 170 0 1 0.5)
+ activeHelpKey: detailsAccessCharaterPosition
+ resizeForLabel: true
+ adjust: right
)
- #(#InputFieldSpec
- #name: 'accessCharField'
- #layout: #(#LayoutFrame 220 0 159 0 -5 1.0 181 0)
- #activeHelpKey: #detailsAccessCharaterPosition
- #tabable: true
- #model: #accessCharacterPosition
- #group: #inputGroup
- #type: #numberOrNil
- #immediateAccept: false
- #acceptOnReturn: true
- #acceptOnTab: true
- #acceptChannel: #acceptChannel
- #modifiedChannel: #modifiedChannel
- #acceptOnPointerLeave: false
+ (InputFieldSpec
+ name: 'accessCharField'
+ layout: (LayoutFrame 220 0 159 0 -5 1.0 181 0)
+ activeHelpKey: detailsAccessCharaterPosition
+ tabable: true
+ model: accessCharacterPosition
+ group: inputGroup
+ type: numberOrNil
+ immediateAccept: false
+ acceptOnReturn: true
+ acceptOnTab: true
+ acceptChannel: acceptChannel
+ modifiedChannel: modifiedChannel
+ acceptOnPointerLeave: false
)
- #(#LabelSpec
- #label: 'Font:'
- #name: 'fontLabel'
- #layout: #(#AlignmentOrigin 75 0 219 0 1 0.5)
- #resizeForLabel: true
- #adjust: #right
+ (LabelSpec
+ label: 'Font:'
+ name: 'fontLabel'
+ layout: (AlignmentOrigin 75 0 219 0 1 0.5)
+ resizeForLabel: true
+ adjust: right
)
- #(#FontMenuSpec
- #attributes:
- #(#tabable
+ (FontMenuSpec
+ attributes:
+ (tabable
true
)
- #name: 'fontMenu'
- #layout: #(#LayoutFrame 78 0 208 0 -5 1.0 230 0)
- #activeHelpKey: #fontMenu
- #model: #font
+ name: 'fontMenu'
+ layout: (LayoutFrame 78 0 208 0 -5 1.0 230 0)
+ activeHelpKey: fontMenu
+ model: font
)
)
@@ -3408,244 +3406,243 @@
<resource: #canvas>
^
- #(#FullSpec
- #name: #basicsEditSpec
- #window:
- #(#WindowSpec
- #label: 'basicsEditSpec'
- #name: 'basicsEditSpec'
- #min: #(#Point 10 10)
- #max: #(#Point 1160 870)
- #bounds: #(#Rectangle 314 340 654 680)
+ #(FullSpec
+ name: basicsEditSpec
+ window:
+ (WindowSpec
+ label: 'basicsEditSpec'
+ name: 'basicsEditSpec'
+ min: (Point 10 10)
+ bounds: (Rectangle 14 46 354 386)
)
- #component:
- #(#SpecCollection
- #collection: #(
- #(#LabelSpec
- #label: 'Name Key:'
- #name: 'nameKeyLabel'
- #layout: #(#AlignmentOrigin 107 0 25 0 1 0.5)
- #activeHelpKey: #basicsKey
- #resizeForLabel: true
- #adjust: #right
+ component:
+ (SpecCollection
+ collection: (
+ (LabelSpec
+ label: 'Name Key:'
+ name: 'nameKeyLabel'
+ layout: (AlignmentOrigin 107 0 25 0 1 0.5)
+ activeHelpKey: basicsKey
+ resizeForLabel: true
+ adjust: right
)
- #(#InputFieldSpec
- #name: 'nameKeyField'
- #layout: #(#LayoutFrame 110 0 15 0 -5 1.0 37 0)
- #activeHelpKey: #basicsKey
- #tabable: true
- #model: #nameKey
- #group: #inputGroup
- #type: #symbolOrNil
- #immediateAccept: false
- #acceptOnLeave: false
- #acceptOnReturn: true
- #acceptOnTab: true
- #acceptOnLostFocus: false
- #acceptChannel: #acceptChannel
- #modifiedChannel: #modifiedChannel
- #acceptOnPointerLeave: false
+ (InputFieldSpec
+ name: 'nameKeyField'
+ layout: (LayoutFrame 110 0 15 0 -5 1.0 37 0)
+ activeHelpKey: basicsKey
+ tabable: true
+ model: nameKey
+ group: inputGroup
+ type: symbolOrNil
+ immediateAccept: false
+ acceptOnLeave: false
+ acceptOnReturn: true
+ acceptOnTab: true
+ acceptOnLostFocus: false
+ acceptChannel: acceptChannel
+ modifiedChannel: modifiedChannel
+ acceptOnPointerLeave: false
)
- #(#LabelSpec
- #label: 'Label:'
- #name: 'labelLabel'
- #layout: #(#AlignmentOrigin 107 0 51 0 1 0.5)
- #activeHelpKey: #basicsLabel
- #resizeForLabel: true
- #adjust: #right
+ (LabelSpec
+ label: 'Label:'
+ name: 'labelLabel'
+ layout: (AlignmentOrigin 107 0 51 0 1 0.5)
+ activeHelpKey: basicsLabel
+ resizeForLabel: true
+ adjust: right
)
- #(#InputFieldSpec
- #name: 'labelField'
- #layout: #(#LayoutFrame 110 0 40 0 -5 1.0 62 0)
- #activeHelpKey: #basicsLabel
- #tabable: true
- #model: #rawLabel
- #group: #inputGroup
- #immediateAccept: false
- #acceptOnReturn: true
- #acceptOnTab: true
- #acceptOnLostFocus: false
- #acceptChannel: #acceptChannel
- #modifiedChannel: #modifiedChannel
- #acceptOnPointerLeave: false
+ (InputFieldSpec
+ name: 'labelField'
+ layout: (LayoutFrame 110 0 40 0 -5 1.0 62 0)
+ activeHelpKey: basicsLabel
+ tabable: true
+ model: rawLabel
+ group: inputGroup
+ immediateAccept: false
+ acceptOnReturn: true
+ acceptOnTab: true
+ acceptOnLostFocus: false
+ acceptChannel: acceptChannel
+ modifiedChannel: modifiedChannel
+ acceptOnPointerLeave: false
)
- #(#LabelSpec
- #label: 'Action:'
- #name: 'valueLabel'
- #layout: #(#AlignmentOrigin 107 0 82 0 1 0.5)
- #activeHelpKey: #basicsAction
- #resizeForLabel: true
- #adjust: #right
+ (LabelSpec
+ label: 'Action:'
+ name: 'valueLabel'
+ layout: (AlignmentOrigin 107 0 82 0 1 0.5)
+ activeHelpKey: basicsAction
+ resizeForLabel: true
+ adjust: right
)
- #(#InputFieldSpec
- #name: 'valueField'
- #layout: #(#LayoutFrame 110 0 71 0 -5 1.0 93 0)
- #activeHelpKey: #basicsAction
- #tabable: true
- #model: #itemValue
- #group: #inputGroup
- #type: #symbolOrNil
- #immediateAccept: false
- #acceptOnLeave: true
- #acceptOnReturn: true
- #acceptOnTab: true
- #acceptOnLostFocus: true
- #acceptChannel: #acceptChannel
- #modifiedChannel: #modifiedChannel
- #acceptOnPointerLeave: true
+ (InputFieldSpec
+ name: 'valueField'
+ layout: (LayoutFrame 110 0 71 0 -5 1.0 93 0)
+ activeHelpKey: basicsAction
+ tabable: true
+ model: itemValue
+ group: inputGroup
+ type: symbolOrNil
+ immediateAccept: false
+ acceptOnLeave: true
+ acceptOnReturn: true
+ acceptOnTab: true
+ acceptOnLostFocus: true
+ acceptChannel: acceptChannel
+ modifiedChannel: modifiedChannel
+ acceptOnPointerLeave: true
)
- #(#LabelSpec
- #label: 'Argument:'
- #name: 'argumentLabel'
- #layout: #(#AlignmentOrigin 107 0 107 0 1 0.5)
- #activeHelpKey: #basicsArgument
- #resizeForLabel: true
- #adjust: #right
+ (LabelSpec
+ label: 'Argument:'
+ name: 'argumentLabel'
+ layout: (AlignmentOrigin 107 0 107 0 1 0.5)
+ activeHelpKey: basicsArgument
+ resizeForLabel: true
+ adjust: right
)
- #(#InputFieldSpec
- #name: 'argumentField'
- #layout: #(#LayoutFrame 110 0 96 0 -5 1.0 118 0)
- #activeHelpKey: #basicsArgument
- #tabable: true
- #model: #argument
- #group: #inputGroup
- #type: #smalltalkObject
- #immediateAccept: false
- #acceptOnReturn: true
- #acceptOnTab: true
- #acceptOnLostFocus: false
- #acceptChannel: #acceptChannel
- #modifiedChannel: #modifiedChannel
- #acceptOnPointerLeave: false
+ (InputFieldSpec
+ name: 'argumentField'
+ layout: (LayoutFrame 110 0 96 0 -5 1.0 118 0)
+ activeHelpKey: basicsArgument
+ tabable: true
+ model: argument
+ group: inputGroup
+ type: smalltalkObject
+ immediateAccept: false
+ acceptOnReturn: true
+ acceptOnTab: true
+ acceptOnLostFocus: false
+ acceptChannel: acceptChannel
+ modifiedChannel: modifiedChannel
+ acceptOnPointerLeave: false
)
- #(#LabelSpec
- #label: 'Indication:'
- #name: 'indicationLabel'
- #layout: #(#AlignmentOrigin 107 0 138 0 1 0.5)
- #activeHelpKey: #basicsIndication
- #resizeForLabel: true
- #adjust: #right
+ (LabelSpec
+ label: 'Indication:'
+ name: 'indicationLabel'
+ layout: (AlignmentOrigin 107 0 138 0 1 0.5)
+ activeHelpKey: basicsIndication
+ resizeForLabel: true
+ adjust: right
)
- #(#InputFieldSpec
- #name: 'indicationField'
- #layout: #(#LayoutFrame 110 0 127 0 -5 1.0 149 0)
- #activeHelpKey: #basicsIndication
- #enableChannel: #indicationEnabled
- #tabable: true
- #model: #indication
- #group: #inputGroup
- #type: #symbolOrNil
- #immediateAccept: true
- #acceptOnReturn: false
- #acceptOnTab: false
- #acceptOnLostFocus: false
- #modifiedChannel: #modifiedChannel
- #acceptOnPointerLeave: false
+ (InputFieldSpec
+ name: 'indicationField'
+ layout: (LayoutFrame 110 0 127 0 -5 1.0 149 0)
+ activeHelpKey: basicsIndication
+ enableChannel: indicationEnabled
+ tabable: true
+ model: indication
+ group: inputGroup
+ type: symbolOrNil
+ immediateAccept: true
+ acceptOnReturn: false
+ acceptOnTab: false
+ acceptOnLostFocus: false
+ modifiedChannel: modifiedChannel
+ acceptOnPointerLeave: false
)
- #(#LabelSpec
- #label: 'Choice:'
- #name: 'choiceLabel'
- #layout: #(#AlignmentOrigin 107 0 163 0 1 0.5)
- #activeHelpKey: #basicsChoice
- #translateLabel: true
- #resizeForLabel: true
- #adjust: #right
+ (LabelSpec
+ label: 'Choice:'
+ name: 'choiceLabel'
+ layout: (AlignmentOrigin 107 0 163 0 1 0.5)
+ activeHelpKey: basicsChoice
+ translateLabel: true
+ resizeForLabel: true
+ adjust: right
)
- #(#InputFieldSpec
- #name: 'choiceField'
- #layout: #(#LayoutFrame 110 0 152 0 -5 1.0 174 0)
- #activeHelpKey: #basicsChoice
- #enableChannel: #choiceEnabled
- #tabable: true
- #model: #choice
- #group: #inputGroup
- #type: #symbolOrNil
- #immediateAccept: true
- #acceptOnReturn: false
- #acceptOnTab: false
- #acceptOnLostFocus: false
- #modifiedChannel: #modifiedChannel
- #acceptOnPointerLeave: false
+ (InputFieldSpec
+ name: 'choiceField'
+ layout: (LayoutFrame 110 0 152 0 -5 1.0 174 0)
+ activeHelpKey: basicsChoice
+ enableChannel: choiceEnabled
+ tabable: true
+ model: choice
+ group: inputGroup
+ type: symbolOrNil
+ immediateAccept: true
+ acceptOnReturn: false
+ acceptOnTab: false
+ acceptOnLostFocus: false
+ modifiedChannel: modifiedChannel
+ acceptOnPointerLeave: false
)
- #(#LabelSpec
- #label: 'Value:'
- #name: 'choiceValueLabel'
- #layout: #(#AlignmentOrigin 107 0 188 0 1 0.5)
- #activeHelpKey: #basicsChoiceValue
- #translateLabel: true
- #resizeForLabel: true
- #adjust: #right
+ (LabelSpec
+ label: 'Value:'
+ name: 'choiceValueLabel'
+ layout: (AlignmentOrigin 107 0 188 0 1 0.5)
+ activeHelpKey: basicsChoiceValue
+ translateLabel: true
+ resizeForLabel: true
+ adjust: right
)
- #(#InputFieldSpec
- #name: 'choiceValueField'
- #layout: #(#LayoutFrame 110 0 177 0 -5 1.0 199 0)
- #activeHelpKey: #basicsChoiceValue
- #enableChannel: #choiceValueEnabled
- #tabable: true
- #model: #choiceValue
- #group: #inputGroup
- #type: #smalltalkObjectOrNil
- #immediateAccept: false
- #acceptOnLeave: false
- #acceptOnReturn: true
- #acceptOnTab: true
- #acceptOnLostFocus: false
- #acceptChannel: #acceptChannel
- #modifiedChannel: #modifiedChannel
- #acceptOnPointerLeave: false
+ (InputFieldSpec
+ name: 'choiceValueField'
+ layout: (LayoutFrame 110 0 177 0 -5 1.0 199 0)
+ activeHelpKey: basicsChoiceValue
+ enableChannel: choiceValueEnabled
+ tabable: true
+ model: choiceValue
+ group: inputGroup
+ type: smalltalkObjectOrNil
+ immediateAccept: false
+ acceptOnLeave: false
+ acceptOnReturn: true
+ acceptOnTab: true
+ acceptOnLostFocus: false
+ acceptChannel: acceptChannel
+ modifiedChannel: modifiedChannel
+ acceptOnPointerLeave: false
)
- #(#CheckBoxSpec
- #label: 'Translate Label'
- #name: 'translateLabelCheckBox'
- #layout: #(#AlignmentOrigin 7 0 213 0 0 0)
- #activeHelpKey: #basicsTranslateLabel
- #tabable: true
- #model: #translateLabel
+ (CheckBoxSpec
+ label: 'Translate Label'
+ name: 'translateLabelCheckBox'
+ layout: (AlignmentOrigin 7 0 213 0 0 0)
+ activeHelpKey: basicsTranslateLabel
+ tabable: true
+ model: translateLabel
)
- #(#CheckBoxSpec
- #label: 'Is Button'
- #name: 'isButtonCheckBox'
- #layout: #(#AlignmentOrigin 7 0 238 0 0 0)
- #activeHelpKey: #basicsIsButton
- #tabable: true
- #model: #isButton
+ (CheckBoxSpec
+ label: 'Is Button'
+ name: 'isButtonCheckBox'
+ layout: (AlignmentOrigin 7 0 238 0 0 0)
+ activeHelpKey: basicsIsButton
+ tabable: true
+ model: isButton
)
- #(#CheckBoxSpec
- #label: 'Hide Menu after Activation'
- #name: 'hideMenuOnActivated'
- #layout: #(#AlignmentOrigin 7 0 263 0 0 0)
- #activeHelpKey: #hideMenuOnActivated
- #tabable: true
- #model: #hideMenuOnActivated
+ (CheckBoxSpec
+ label: 'Hide Menu after Activation'
+ name: 'hideMenuOnActivated'
+ layout: (AlignmentOrigin 7 0 263 0 0 0)
+ activeHelpKey: hideMenuOnActivated
+ tabable: true
+ model: hideMenuOnActivated
)
- #(#CheckBoxSpec
- #label: 'BusyCursor while Active'
- #name: 'showBusyCursorWhilePerforming'
- #layout: #(#AlignmentOrigin 7 0 288 0 0 0)
- #activeHelpKey: #showBusyCursorWhilePerforming
- #tabable: true
- #model: #showBusyCursorWhilePerforming
- #translateLabel: true
+ (CheckBoxSpec
+ label: 'BusyCursor while Active'
+ name: 'showBusyCursorWhilePerforming'
+ layout: (AlignmentOrigin 7 0 288 0 0 0)
+ activeHelpKey: showBusyCursorWhilePerforming
+ tabable: true
+ model: showBusyCursorWhilePerforming
+ translateLabel: true
)
- #(#CheckBoxSpec
- #label: 'Trigger On Down'
- #name: 'triggerOnDown'
- #layout: #(#AlignmentOrigin 25 0.5 238 0 0 0)
- #activeHelpKey: #triggerOnDown
- #enableChannel: #hasNoDelayedMenuValue
- #tabable: true
- #model: #triggerOnDown
- #translateLabel: true
+ (CheckBoxSpec
+ label: 'Trigger On Down'
+ name: 'triggerOnDown'
+ layout: (AlignmentOrigin 25 0.5 238 0 0 0)
+ activeHelpKey: triggerOnDown
+ enableChannel: hasNoDelayedMenuValue
+ tabable: true
+ model: triggerOnDown
+ translateLabel: true
)
- #(#CheckBoxSpec
- #label: 'Send To Originating Widget'
- #name: 'sendToOriginator'
- #layout: #(#AlignmentOrigin 7 0 313 0 0 0)
- #activeHelpKey: #sendToOriginator
- #enableChannel: #hasItemValue
- #tabable: true
- #model: #sendToOriginator
- #translateLabel: true
+ (CheckBoxSpec
+ label: 'Send To Originating Widget'
+ name: 'sendToOriginator'
+ layout: (AlignmentOrigin 7 0 313 0 0 0)
+ activeHelpKey: sendToOriginator
+ enableChannel: hasItemValue
+ tabable: true
+ model: sendToOriginator
+ translateLabel: true
)
)
@@ -3832,160 +3829,159 @@
the UIPainter may not be able to read the specification."
"
- UIPainter new openOnClass:MenuEditor::ItemLinkedMenu andSelector:#basicsEditSpec
+ UIPainter new openOnClass:MenuEditor::LinkedMenuItem andSelector:#basicsEditSpec
"
<resource: #canvas>
^
- #(#FullSpec
- #name: #basicsEditSpec
- #window:
- #(#WindowSpec
- #label: 'basicsEditSpec'
- #name: 'basicsEditSpec'
- #min: #(#Point 10 10)
- #max: #(#Point 1160 870)
- #bounds: #(#Rectangle 93 330 433 670)
+ #(FullSpec
+ name: basicsEditSpec
+ window:
+ (WindowSpec
+ label: 'basicsEditSpec'
+ name: 'basicsEditSpec'
+ min: (Point 10 10)
+ bounds: (Rectangle 14 46 354 386)
)
- #component:
- #(#SpecCollection
- #collection: #(
- #(#LabelSpec
- #label: 'Name Key:'
- #name: 'nameKeyLabel'
- #layout: #(#AlignmentOrigin 107 0 25 0 1 0.5)
- #activeHelpKey: #basicsKey
- #visibilityChannel: #notDelayedMenu
- #resizeForLabel: true
- #adjust: #right
+ component:
+ (SpecCollection
+ collection: (
+ (LabelSpec
+ label: 'Name Key:'
+ name: 'nameKeyLabel'
+ layout: (AlignmentOrigin 107 0 25 0 1 0.5)
+ activeHelpKey: basicsKey
+ visibilityChannel: notDelayedMenu
+ resizeForLabel: true
+ adjust: right
)
- #(#InputFieldSpec
- #name: 'nameKeyField'
- #layout: #(#LayoutFrame 110 0 15 0 -5 1.0 37 0)
- #activeHelpKey: #basicsKey
- #visibilityChannel: #notDelayedMenu
- #tabable: true
- #model: #nameKey
- #group: #inputGroup
- #type: #symbolOrNil
- #immediateAccept: false
- #acceptOnLeave: false
- #acceptOnReturn: true
- #acceptOnTab: true
- #acceptOnLostFocus: false
- #acceptChannel: #acceptChannel
- #modifiedChannel: #modifiedChannel
- #acceptOnPointerLeave: false
+ (InputFieldSpec
+ name: 'nameKeyField'
+ layout: (LayoutFrame 110 0 15 0 -5 1.0 37 0)
+ activeHelpKey: basicsKey
+ visibilityChannel: notDelayedMenu
+ tabable: true
+ model: nameKey
+ group: inputGroup
+ type: symbolOrNil
+ immediateAccept: false
+ acceptOnLeave: false
+ acceptOnReturn: true
+ acceptOnTab: true
+ acceptOnLostFocus: false
+ acceptChannel: acceptChannel
+ modifiedChannel: modifiedChannel
+ acceptOnPointerLeave: false
)
- #(#LabelSpec
- #label: 'Label:'
- #name: 'labelLabel'
- #layout: #(#AlignmentOrigin 107 0 51 0 1 0.5)
- #activeHelpKey: #basicsLabel
- #visibilityChannel: #notDelayedMenu
- #resizeForLabel: true
- #adjust: #right
+ (LabelSpec
+ label: 'Label:'
+ name: 'labelLabel'
+ layout: (AlignmentOrigin 107 0 51 0 1 0.5)
+ activeHelpKey: basicsLabel
+ visibilityChannel: notDelayedMenu
+ resizeForLabel: true
+ adjust: right
)
- #(#InputFieldSpec
- #name: 'labelField'
- #layout: #(#LayoutFrame 110 0 40 0 -5 1.0 62 0)
- #activeHelpKey: #basicsLabel
- #visibilityChannel: #notDelayedMenu
- #tabable: true
- #model: #rawLabel
- #group: #inputGroup
- #immediateAccept: false
- #acceptOnReturn: true
- #acceptOnTab: true
- #acceptOnLostFocus: false
- #acceptChannel: #acceptChannel
- #modifiedChannel: #modifiedChannel
- #acceptOnPointerLeave: false
+ (InputFieldSpec
+ name: 'labelField'
+ layout: (LayoutFrame 110 0 40 0 -5 1.0 62 0)
+ activeHelpKey: basicsLabel
+ visibilityChannel: notDelayedMenu
+ tabable: true
+ model: rawLabel
+ group: inputGroup
+ immediateAccept: false
+ acceptOnReturn: true
+ acceptOnTab: true
+ acceptOnLostFocus: false
+ acceptChannel: acceptChannel
+ modifiedChannel: modifiedChannel
+ acceptOnPointerLeave: false
)
- #(#LabelSpec
- #label: 'Menu:'
- #name: 'menuLabel'
- #layout: #(#AlignmentOrigin 107 0 90 0 1 0.5)
- #activeHelpKey: #basicsLabel
- #resizeForLabel: true
- #adjust: #right
+ (LabelSpec
+ label: 'Menu:'
+ name: 'menuLabel'
+ layout: (AlignmentOrigin 107 0 90 0 1 0.5)
+ activeHelpKey: basicsLabel
+ resizeForLabel: true
+ adjust: right
)
- #(#InputFieldSpec
- #name: 'menuField'
- #layout: #(#LayoutFrame 110 0 79 0 -5 1.0 101 0)
- #activeHelpKey: #basicsMenu
- #tabable: true
- #model: #submenuChannel
- #group: #inputGroup
- #type: #symbolOrNil
- #immediateAccept: false
- #acceptOnReturn: true
- #acceptOnTab: true
- #acceptOnLostFocus: false
- #acceptChannel: #acceptChannel
- #modifiedChannel: #modifiedChannel
- #acceptOnPointerLeave: false
+ (InputFieldSpec
+ name: 'menuField'
+ layout: (LayoutFrame 110 0 79 0 -5 1.0 101 0)
+ activeHelpKey: basicsMenu
+ tabable: true
+ model: submenuChannel
+ group: inputGroup
+ type: symbolOrNil
+ immediateAccept: false
+ acceptOnReturn: true
+ acceptOnTab: true
+ acceptOnLostFocus: false
+ acceptChannel: acceptChannel
+ modifiedChannel: modifiedChannel
+ acceptOnPointerLeave: false
)
- #(#LabelSpec
- #label: 'Argument:'
- #name: 'argumentLabel'
- #layout: #(#AlignmentOrigin 107 0 115 0 1 0.5)
- #activeHelpKey: #basicsLabel
- #resizeForLabel: true
- #adjust: #right
+ (LabelSpec
+ label: 'Argument:'
+ name: 'argumentLabel'
+ layout: (AlignmentOrigin 107 0 115 0 1 0.5)
+ activeHelpKey: basicsLabel
+ resizeForLabel: true
+ adjust: right
)
- #(#InputFieldSpec
- #name: 'argumentField'
- #layout: #(#LayoutFrame 110 0 104 0 -5 1.0 126 0)
- #activeHelpKey: #basicsMenuArgument
- #enableChannel: #notDelayedMenu
- #tabable: true
- #model: #argument
- #group: #inputGroup
- #type: #smalltalkObject
- #immediateAccept: false
- #acceptOnReturn: true
- #acceptOnTab: true
- #acceptOnLostFocus: false
- #acceptChannel: #acceptChannel
- #modifiedChannel: #modifiedChannel
- #acceptOnPointerLeave: false
+ (InputFieldSpec
+ name: 'argumentField'
+ layout: (LayoutFrame 110 0 104 0 -5 1.0 126 0)
+ activeHelpKey: basicsMenuArgument
+ enableChannel: notDelayedMenu
+ tabable: true
+ model: argument
+ group: inputGroup
+ type: smalltalkObject
+ immediateAccept: false
+ acceptOnReturn: true
+ acceptOnTab: true
+ acceptOnLostFocus: false
+ acceptChannel: acceptChannel
+ modifiedChannel: modifiedChannel
+ acceptOnPointerLeave: false
)
- #(#CheckBoxSpec
- #label: 'Translate Label'
- #name: 'translateLabelCheckBox'
- #layout: #(#Point 20 213)
- #activeHelpKey: #basicsTranslateLabel
- #visibilityChannel: #notDelayedMenu
- #tabable: true
- #model: #translateLabel
+ (CheckBoxSpec
+ label: 'Translate Label'
+ name: 'translateLabelCheckBox'
+ layout: (Point 20 213)
+ activeHelpKey: basicsTranslateLabel
+ visibilityChannel: notDelayedMenu
+ tabable: true
+ model: translateLabel
)
- #(#CheckBoxSpec
- #label: 'Is Button'
- #name: 'isButtonCheckBox'
- #layout: #(#Point 20 238)
- #activeHelpKey: #basicsIsButton
- #visibilityChannel: #notDelayedMenu
- #tabable: true
- #model: #isButton
+ (CheckBoxSpec
+ label: 'Is Button'
+ name: 'isButtonCheckBox'
+ layout: (Point 20 238)
+ activeHelpKey: basicsIsButton
+ visibilityChannel: notDelayedMenu
+ tabable: true
+ model: isButton
)
- #(#CheckBoxSpec
- #label: 'Horizontal Layout'
- #name: 'horizontalLayout'
- #layout: #(#Point 20 263)
- #activeHelpKey: #horizontalLayout
- #tabable: true
- #model: #horizontalLayout
+ (CheckBoxSpec
+ label: 'Horizontal Layout'
+ name: 'horizontalLayout'
+ layout: (Point 20 263)
+ activeHelpKey: horizontalLayout
+ tabable: true
+ model: horizontalLayout
)
- #(#CheckBoxSpec
- #label: 'Do not Destroy Linked Menu'
- #name: 'keepLinkedMenu'
- #layout: #(#Point 20 288)
- #activeHelpKey: #keepLinkedMenu
- #tabable: true
- #model: #keepLinkedMenu
- #translateLabel: true
+ (CheckBoxSpec
+ label: 'Do not Destroy Linked Menu'
+ name: 'keepLinkedMenu'
+ layout: (Point 20 288)
+ activeHelpKey: keepLinkedMenu
+ tabable: true
+ model: keepLinkedMenu
+ translateLabel: true
)
)
@@ -4115,102 +4111,101 @@
the UIPainter may not be able to read the specification."
"
- UIPainter new openOnClass:MenuEditor::ItemMenu andSelector:#basicsEditSpec
+ UIPainter new openOnClass:MenuEditor::RegularMenuItem andSelector:#basicsEditSpec
"
<resource: #canvas>
^
- #(#FullSpec
- #name: #basicsEditSpec
- #window:
- #(#WindowSpec
- #label: 'basicsEditSpec'
- #name: 'basicsEditSpec'
- #min: #(#Point 10 10)
- #max: #(#Point 1160 870)
- #bounds: #(#Rectangle 810 135 1150 475)
+ #(FullSpec
+ name: basicsEditSpec
+ window:
+ (WindowSpec
+ label: 'basicsEditSpec'
+ name: 'basicsEditSpec'
+ min: (Point 10 10)
+ bounds: (Rectangle 14 46 354 386)
)
- #component:
- #(#SpecCollection
- #collection: #(
- #(#LabelSpec
- #label: 'Name Key:'
- #name: 'nameKeyLabel'
- #layout: #(#AlignmentOrigin 107 0 25 0 1 0.5)
- #activeHelpKey: #basicsKey
- #visibilityChannel: #notDelayedMenu
- #resizeForLabel: true
- #adjust: #right
+ component:
+ (SpecCollection
+ collection: (
+ (LabelSpec
+ label: 'Name Key:'
+ name: 'nameKeyLabel'
+ layout: (AlignmentOrigin 107 0 25 0 1 0.5)
+ activeHelpKey: basicsKey
+ visibilityChannel: notDelayedMenu
+ resizeForLabel: true
+ adjust: right
)
- #(#InputFieldSpec
- #name: 'nameKeyField'
- #layout: #(#LayoutFrame 110 0 15 0 -5 1.0 37 0)
- #activeHelpKey: #basicsKey
- #visibilityChannel: #notDelayedMenu
- #tabable: true
- #model: #nameKey
- #group: #inputGroup
- #type: #symbolOrNil
- #immediateAccept: false
- #acceptOnLeave: false
- #acceptOnReturn: true
- #acceptOnTab: true
- #acceptOnLostFocus: false
- #acceptChannel: #acceptChannel
- #modifiedChannel: #modifiedChannel
- #acceptOnPointerLeave: false
+ (InputFieldSpec
+ name: 'nameKeyField'
+ layout: (LayoutFrame 110 0 15 0 -5 1.0 37 0)
+ activeHelpKey: basicsKey
+ visibilityChannel: notDelayedMenu
+ tabable: true
+ model: nameKey
+ group: inputGroup
+ type: symbolOrNil
+ immediateAccept: false
+ acceptOnLeave: false
+ acceptOnReturn: true
+ acceptOnTab: true
+ acceptOnLostFocus: false
+ acceptChannel: acceptChannel
+ modifiedChannel: modifiedChannel
+ acceptOnPointerLeave: false
)
- #(#LabelSpec
- #label: 'Label:'
- #name: 'labelLabel'
- #layout: #(#AlignmentOrigin 107 0 51 0 1 0.5)
- #activeHelpKey: #basicsLabel
- #visibilityChannel: #notDelayedMenu
- #resizeForLabel: true
- #adjust: #right
+ (LabelSpec
+ label: 'Label:'
+ name: 'labelLabel'
+ layout: (AlignmentOrigin 107 0 51 0 1 0.5)
+ activeHelpKey: basicsLabel
+ visibilityChannel: notDelayedMenu
+ resizeForLabel: true
+ adjust: right
)
- #(#InputFieldSpec
- #name: 'labelField'
- #layout: #(#LayoutFrame 110 0 40 0 -5 1.0 62 0)
- #activeHelpKey: #basicsLabel
- #visibilityChannel: #notDelayedMenu
- #tabable: true
- #model: #rawLabel
- #group: #inputGroup
- #immediateAccept: false
- #acceptOnReturn: true
- #acceptOnTab: true
- #acceptOnLostFocus: false
- #acceptChannel: #acceptChannel
- #modifiedChannel: #modifiedChannel
- #acceptOnPointerLeave: false
+ (InputFieldSpec
+ name: 'labelField'
+ layout: (LayoutFrame 110 0 40 0 -5 1.0 62 0)
+ activeHelpKey: basicsLabel
+ visibilityChannel: notDelayedMenu
+ tabable: true
+ model: rawLabel
+ group: inputGroup
+ immediateAccept: false
+ acceptOnReturn: true
+ acceptOnTab: true
+ acceptOnLostFocus: false
+ acceptChannel: acceptChannel
+ modifiedChannel: modifiedChannel
+ acceptOnPointerLeave: false
)
- #(#CheckBoxSpec
- #label: 'Translate Label'
- #name: 'translateLabelCheckBox'
- #layout: #(#Point 20 213)
- #activeHelpKey: #basicsTranslateLabel
- #visibilityChannel: #notDelayedMenu
- #tabable: true
- #model: #translateLabel
+ (CheckBoxSpec
+ label: 'Translate Label'
+ name: 'translateLabelCheckBox'
+ layout: (Point 20 213)
+ activeHelpKey: basicsTranslateLabel
+ visibilityChannel: notDelayedMenu
+ tabable: true
+ model: translateLabel
)
- #(#CheckBoxSpec
- #label: 'Is Button'
- #name: 'isButtonCheckBox'
- #layout: #(#Point 20 238)
- #activeHelpKey: #basicsIsButton
- #visibilityChannel: #notDelayedMenu
- #tabable: true
- #model: #isButton
+ (CheckBoxSpec
+ label: 'Is Button'
+ name: 'isButtonCheckBox'
+ layout: (Point 20 238)
+ activeHelpKey: basicsIsButton
+ visibilityChannel: notDelayedMenu
+ tabable: true
+ model: isButton
)
- #(#CheckBoxSpec
- #label: 'Horizontal Layout'
- #name: 'horizontalLayout'
- #layout: #(#Point 20 263)
- #activeHelpKey: #horizontalLayout
- #tabable: true
- #model: #horizontalLayout
+ (CheckBoxSpec
+ label: 'Horizontal Layout'
+ name: 'horizontalLayout'
+ layout: (Point 20 263)
+ activeHelpKey: horizontalLayout
+ tabable: true
+ model: horizontalLayout
)
)
@@ -4375,115 +4370,114 @@
<resource: #canvas>
^
- #(#FullSpec
- #name: #windowSpec
- #window:
- #(#WindowSpec
- #label: 'Image Item'
- #name: 'Image Item'
- #min: #(#Point 10 10)
- #max: #(#Point 1280 1024)
- #bounds: #(#Rectangle 333 290 621 585)
- )
- #component:
- #(#SpecCollection
- #collection: #(
- #(#LabelSpec
- #label: 'Retriever:'
- #name: 'retrieverLabel'
- #layout: #(#AlignmentOrigin 107 0 26 0 1 0.5)
- #activeHelpKey: #imageRetriever
- #resizeForLabel: true
- #adjust: #right
- )
- #(#ComboBoxSpec
- #name: 'retrieverHolder'
- #layout: #(#LayoutFrame 110 0 15 0 -20 1.0 37 0)
- #activeHelpKey: #imageRetriever
- #tabable: true
- #model: #retrieverHolder
- #type: #symbolOrNil
- #immediateAccept: true
- #acceptOnReturn: false
- #acceptOnTab: false
- #acceptOnPointerLeave: false
- #comboList: #retrieverList
- #isFilenameBox: false
- )
- #(#LabelSpec
- #label: 'Selector:'
- #name: 'iconLabel'
- #layout: #(#AlignmentOrigin 107 0 51 0 1 0.5)
- #activeHelpKey: #imageSelector
- #resizeForLabel: true
- #adjust: #right
- )
- #(#InputFieldSpec
- #name: 'selectorHolder'
- #layout: #(#LayoutFrame 110 0 40 0 -42 1.0 62 0)
- #activeHelpKey: #imageSelector
- #tabable: true
- #model: #selectorHolder
- #group: #inputGroup
- #type: #symbolOrNil
- #immediateAccept: true
- #acceptOnReturn: false
- #acceptOnTab: false
- #modifiedChannel: #modifiedChannel
- #acceptOnPointerLeave: false
- )
- #(#ActionButtonSpec
- #label: '...'
- #name: 'browseButton'
- #layout: #(#LayoutFrame -40 1 40 0 -20 1 62 0)
- #activeHelpKey: #browseResource
- #tabable: true
- #model: #doBrowseForImageResource
- )
- #(#HierarchicalListViewSpec
- #name: 'imageList'
- #layout: #(#LayoutFrame 20 0.0 67 0 -20 1.0 -30 1.0)
- #activeHelpKey: #imageImageList
- #model: #imageHolder
- #menu: #menuEditImage
- #hasHorizontalScrollBar: true
- #hasVerticalScrollBar: true
- #miniScrollerHorizontal: true
- #listModel: #imageList
- #useIndex: false
- #highlightMode: #label
- #postBuildCallback: #postBuildImageViewer:
- )
- #(#ViewSpec
- #name: 'Box1'
- #layout: #(#LayoutFrame 20 0.0 -30 1.0 -20 1.0 0 1.0)
- #level: 0
- #component:
- #(#SpecCollection
- #collection: #(
- #(#CheckBoxSpec
- #label: 'Image & Label'
- #name: 'iconAndLabelCheckBox'
- #layout: #(#AlignmentOrigin 0 0 0 0.5 0 0.5)
- #activeHelpKey: #imageImageAndLabel
- #tabable: true
- #model: #iconAndLabelHolder
- )
- #(#ActionButtonSpec
- #label: 'Image Editor'
- #name: 'imageEditorButton'
- #layout: #(#AlignmentOrigin 0 1.0 0 0.5 1 0.5)
- #activeHelpKey: #imageImageEditor
- #tabable: true
- #model: #doEditImage
- )
- )
+ #(FullSpec
+ name: windowSpec
+ window:
+ (WindowSpec
+ label: 'Image Item'
+ name: 'Image Item'
+ min: (Point 10 10)
+ bounds: (Rectangle 14 46 302 341)
+ )
+ component:
+ (SpecCollection
+ collection: (
+ (LabelSpec
+ label: 'Retriever:'
+ name: 'retrieverLabel'
+ layout: (AlignmentOrigin 107 0 26 0 1 0.5)
+ activeHelpKey: imageRetriever
+ resizeForLabel: true
+ adjust: right
+ )
+ (ComboBoxSpec
+ name: 'retrieverHolder'
+ layout: (LayoutFrame 110 0 15 0 -20 1.0 37 0)
+ activeHelpKey: imageRetriever
+ tabable: true
+ model: retrieverHolder
+ type: symbolOrNil
+ immediateAccept: true
+ acceptOnReturn: false
+ acceptOnTab: false
+ acceptOnPointerLeave: false
+ comboList: retrieverList
+ isFilenameBox: false
+ )
+ (LabelSpec
+ label: 'Selector:'
+ name: 'iconLabel'
+ layout: (AlignmentOrigin 107 0 51 0 1 0.5)
+ activeHelpKey: imageSelector
+ resizeForLabel: true
+ adjust: right
+ )
+ (InputFieldSpec
+ name: 'selectorHolder'
+ layout: (LayoutFrame 110 0 40 0 -42 1.0 62 0)
+ activeHelpKey: imageSelector
+ tabable: true
+ model: selectorHolder
+ group: inputGroup
+ type: symbolOrNil
+ immediateAccept: true
+ acceptOnReturn: false
+ acceptOnTab: false
+ modifiedChannel: modifiedChannel
+ acceptOnPointerLeave: false
+ )
+ (ActionButtonSpec
+ label: '...'
+ name: 'browseButton'
+ layout: (LayoutFrame -40 1 40 0 -20 1 62 0)
+ activeHelpKey: browseResource
+ tabable: true
+ model: doBrowseForImageResource
+ )
+ (HierarchicalListViewSpec
+ name: 'imageList'
+ layout: (LayoutFrame 20 0.0 67 0 -20 1.0 -30 1.0)
+ activeHelpKey: imageImageList
+ model: imageHolder
+ menu: menuEditImage
+ hasHorizontalScrollBar: true
+ hasVerticalScrollBar: true
+ miniScrollerHorizontal: true
+ listModel: imageList
+ useIndex: false
+ highlightMode: label
+ postBuildCallback: postBuildImageViewer:
+ )
+ (ViewSpec
+ name: 'Box1'
+ layout: (LayoutFrame 20 0.0 -30 1.0 -20 1.0 0 1.0)
+ level: 0
+ component:
+ (SpecCollection
+ collection: (
+ (CheckBoxSpec
+ label: 'Image & Label'
+ name: 'iconAndLabelCheckBox'
+ layout: (AlignmentOrigin 0 0 0 0.5 0 0.5)
+ activeHelpKey: imageImageAndLabel
+ tabable: true
+ model: iconAndLabelHolder
+ )
+ (ActionButtonSpec
+ label: 'Image Editor'
+ name: 'imageEditorButton'
+ layout: (AlignmentOrigin 0 1.0 0 0.5 1 0.5)
+ activeHelpKey: imageImageEditor
+ tabable: true
+ model: doEditImage
+ )
+ )
- )
- )
- )
+ )
+ )
+ )
- )
+ )
)
! !
@@ -4837,51 +4831,50 @@
the UIPainter may not be able to read the specification."
"
- UIPainter new openOnClass:MenuEditor::ItemRoot andSelector:#basicsEditSpec
+ UIPainter new openOnClass:MenuEditor::RootItem andSelector:#basicsEditSpec
"
<resource: #canvas>
^
- #(#FullSpec
- #name: #basicsEditSpec
- #window:
- #(#WindowSpec
- #label: 'basicsEditSpec'
- #name: 'basicsEditSpec'
- #min: #(#Point 10 10)
- #max: #(#Point 1280 1024)
- #bounds: #(#Rectangle 644 547 904 593)
- )
- #component:
- #(#SpecCollection
- #collection: #(
- #(#LabelSpec
- #label: 'Selector:'
- #name: 'selectorLabel'
- #layout: #(#AlignmentOrigin 107 0 26 0 1 0.5)
- #activeHelpKey: #basicsSelector
- #resizeForLabel: true
- #adjust: #right
- )
- #(#InputFieldSpec
- #name: 'selectorField'
- #layout: #(#LayoutFrame 110 0 15 0 -5 1.0 37 0)
- #activeHelpKey: #basicsSelector
- #tabable: true
- #model: #rawLabel
- #group: #inputGroup
- #type: #string
- #immediateAccept: false
- #acceptOnReturn: true
- #acceptOnTab: true
- #acceptChannel: #acceptChannel
- #modifiedChannel: #modifiedChannel
- #acceptOnPointerLeave: false
- )
- )
+ #(FullSpec
+ name: basicsEditSpec
+ window:
+ (WindowSpec
+ label: 'basicsEditSpec'
+ name: 'basicsEditSpec'
+ min: (Point 10 10)
+ bounds: (Rectangle 14 46 274 92)
+ )
+ component:
+ (SpecCollection
+ collection: (
+ (LabelSpec
+ label: 'Selector:'
+ name: 'selectorLabel'
+ layout: (AlignmentOrigin 107 0 26 0 1 0.5)
+ activeHelpKey: basicsSelector
+ resizeForLabel: true
+ adjust: right
+ )
+ (InputFieldSpec
+ name: 'selectorField'
+ layout: (LayoutFrame 110 0 15 0 -5 1.0 37 0)
+ activeHelpKey: basicsSelector
+ tabable: true
+ model: rawLabel
+ group: inputGroup
+ type: string
+ immediateAccept: false
+ acceptOnReturn: true
+ acceptOnTab: true
+ acceptChannel: acceptChannel
+ modifiedChannel: modifiedChannel
+ acceptOnPointerLeave: false
+ )
+ )
- )
+ )
)
! !
@@ -5018,80 +5011,79 @@
the UIPainter may not be able to read the specification."
"
- UIPainter new openOnClass:MenuEditor::ItemSeparator andSelector:#basicsEditSpec
+ UIPainter new openOnClass:MenuEditor::SeparatorItem andSelector:#basicsEditSpec
"
<resource: #canvas>
^
- #(#FullSpec
- #name: #basicsEditSpec
- #window:
- #(#WindowSpec
- #label: 'basicsEditSpec'
- #name: 'basicsEditSpec'
- #min: #(#Point 10 10)
- #max: #(#Point 1160 870)
- #bounds: #(#Rectangle 160 398 420 643)
+ #(FullSpec
+ name: basicsEditSpec
+ window:
+ (WindowSpec
+ label: 'basicsEditSpec'
+ name: 'basicsEditSpec'
+ min: (Point 10 10)
+ bounds: (Rectangle 14 46 274 291)
)
- #component:
- #(#SpecCollection
- #collection: #(
- #(#LabelSpec
- #label: 'Separator:'
- #name: 'separatorLabel'
- #layout: #(#AlignmentOrigin 107 0 26 0 1 0.5)
- #resizeForLabel: true
- #adjust: #right
+ component:
+ (SpecCollection
+ collection: (
+ (LabelSpec
+ label: 'Separator:'
+ name: 'separatorLabel'
+ layout: (AlignmentOrigin 107 0 26 0 1 0.5)
+ resizeForLabel: true
+ adjust: right
)
- #(#ComboListSpec
- #name: 'seperatorList'
- #layout: #(#LayoutFrame 110 0 15 0 -5 1.0 37 0)
- #activeHelpKey: #basicsSeparatorType
- #tabable: true
- #model: #seperatorSelection
- #comboList: #seperatorList
- #useIndex: true
+ (ComboListSpec
+ name: 'seperatorList'
+ layout: (LayoutFrame 110 0 15 0 -5 1.0 37 0)
+ activeHelpKey: basicsSeparatorType
+ tabable: true
+ model: seperatorSelection
+ comboList: seperatorList
+ useIndex: true
)
- #(#LabelSpec
- #label: 'Visibility:'
- #name: 'visibilityLabel'
- #layout: #(#AlignmentOrigin 107 0 51 0 1 0.5)
- #resizeForLabel: true
- #adjust: #right
+ (LabelSpec
+ label: 'Visibility:'
+ name: 'visibilityLabel'
+ layout: (AlignmentOrigin 107 0 51 0 1 0.5)
+ resizeForLabel: true
+ adjust: right
)
- #(#InputFieldSpec
- #name: 'visibilityInputField'
- #layout: #(#LayoutFrame 110 0 40 0 -5 1.0 62 0)
- #activeHelpKey: #detailsVisibility
- #tabable: true
- #model: #isVisible
- #group: #inputGroup
- #type: #symbolOrBooleanOrNil
- #immediateAccept: false
- #acceptOnReturn: true
- #acceptOnTab: true
- #acceptChannel: #acceptChannel
- #modifiedChannel: #modifiedChannel
- #acceptOnPointerLeave: false
+ (InputFieldSpec
+ name: 'visibilityInputField'
+ layout: (LayoutFrame 110 0 40 0 -5 1.0 62 0)
+ activeHelpKey: detailsVisibility
+ tabable: true
+ model: isVisible
+ group: inputGroup
+ type: symbolOrBooleanOrNil
+ immediateAccept: false
+ acceptOnReturn: true
+ acceptOnTab: true
+ acceptChannel: acceptChannel
+ modifiedChannel: modifiedChannel
+ acceptOnPointerLeave: false
)
- #(#LabelSpec
- #label: 'Start Group:'
- #name: 'startGroupLabel'
- #layout: #(#AlignmentOrigin 107 0 88 0 1 0.5)
- #resizeForLabel: true
- #adjust: #right
+ (LabelSpec
+ label: 'Start Group:'
+ name: 'startGroupLabel'
+ layout: (AlignmentOrigin 107 0 88 0 1 0.5)
+ resizeForLabel: true
+ adjust: right
)
- #(#PopUpListSpec
- #label: 'left'
- #name: 'startGroupPopUp'
- #layout: #(#LayoutFrame 110 0 77 0 -5 1.0 99 0)
- #activeHelpKey: #detailsStartGroup
- #tabable: true
- #model: #startGroup
- #menu:
- #(#left
- #right
+ (PopUpListSpec
+ label: 'left'
+ name: 'startGroupPopUp'
+ layout: (LayoutFrame 110 0 77 0 -5 1.0 99 0)
+ activeHelpKey: detailsStartGroup
+ tabable: true
+ model: startGroup
+ menu:
+ (left
+ right
)
)
)
--- a/UIHelpTool.st Fri Aug 29 20:31:23 2003 +0200
+++ b/UIHelpTool.st Thu Sep 04 20:59:42 2003 +0200
@@ -174,102 +174,101 @@
<resource: #canvas>
^
- #(#FullSpec
- #name: #windowSpec
- #window:
- #(#WindowSpec
- #label: 'UIHelpTool'
- #name: 'UIHelpTool'
- #min: #(#Point 10 10)
- #max: #(#Point 1024 768)
- #bounds: #(#Rectangle 30 292 491 585)
- )
- #component:
- #(#SpecCollection
- #collection: #(
- #(#VariableVerticalPanelSpec
- #name: 'PanelVrt'
- #layout: #(#LayoutFrame 0 0.0 0 0.0 0 1.0 0 1.0)
- #component:
- #(#SpecCollection
- #collection: #(
- #(#VariableHorizontalPanelSpec
- #name: 'PanelHrz'
- #component:
- #(#SpecCollection
- #collection: #(
- #(#HierarchicalListViewSpec
- #name: 'keyItemModel'
- #model: #keyItemModel
- #menu: #keyItemMenu
- #hasHorizontalScrollBar: true
- #hasVerticalScrollBar: true
- #miniScrollerHorizontal: true
- #miniScrollerVertical: false
- #listModel: #keyItemListHolder
- #useIndex: false
- #highlightMode: #label
- #showLines: false
- #showIndicators: false
- #showLeftIndicators: false
- #useDefaultIcons: false
- #autoScrollHorizontal: false
- )
- #(#ViewSpec
- #name: 'classItemList'
- #component:
- #(#SpecCollection
- #collection: #(
- #(#InputFieldSpec
- #name: 'editModel'
- #layout: #(#LayoutFrame 0 0.0 2 0 -1 1.0 25 0)
- #activeHelpKey: #currentHelpTexts
- #model: #editModel
- #immediateAccept: true
- #acceptOnReturn: false
- #acceptOnTab: false
- #acceptOnLostFocus: false
- #acceptOnPointerLeave: false
- )
- #(#SelectionInListModelViewSpec
- #name: 'classItemModel'
- #layout: #(#LayoutFrame 0 0.0 27 0.0 0 1.0 0 1.0)
- #model: #classItemModel
- #hasHorizontalScrollBar: true
- #hasVerticalScrollBar: true
- #miniScrollerHorizontal: true
- #miniScrollerVertical: true
- #autoHideScrollBars: false
- #listModel: #classItemListHolder
- #useIndex: false
- #highlightMode: #label
- )
- )
+ #(FullSpec
+ name: windowSpec
+ window:
+ (WindowSpec
+ label: 'UIHelpTool'
+ name: 'UIHelpTool'
+ min: (Point 10 10)
+ bounds: (Rectangle 14 46 475 339)
+ )
+ component:
+ (SpecCollection
+ collection: (
+ (VariableVerticalPanelSpec
+ name: 'PanelVrt'
+ layout: (LayoutFrame 0 0.0 0 0.0 0 1.0 0 1.0)
+ component:
+ (SpecCollection
+ collection: (
+ (VariableHorizontalPanelSpec
+ name: 'PanelHrz'
+ component:
+ (SpecCollection
+ collection: (
+ (HierarchicalListViewSpec
+ name: 'keyItemModel'
+ model: keyItemModel
+ menu: keyItemMenu
+ hasHorizontalScrollBar: true
+ hasVerticalScrollBar: true
+ miniScrollerHorizontal: true
+ miniScrollerVertical: false
+ listModel: keyItemListHolder
+ useIndex: false
+ highlightMode: label
+ showLines: false
+ showIndicators: false
+ showLeftIndicators: false
+ useDefaultIcons: false
+ autoScrollHorizontal: false
+ )
+ (ViewSpec
+ name: 'classItemList'
+ component:
+ (SpecCollection
+ collection: (
+ (InputFieldSpec
+ name: 'editModel'
+ layout: (LayoutFrame 0 0.0 2 0 -1 1.0 25 0)
+ activeHelpKey: currentHelpTexts
+ model: editModel
+ immediateAccept: true
+ acceptOnReturn: false
+ acceptOnTab: false
+ acceptOnLostFocus: false
+ acceptOnPointerLeave: false
+ )
+ (SelectionInListModelViewSpec
+ name: 'classItemModel'
+ layout: (LayoutFrame 0 0.0 27 0.0 0 1.0 0 1.0)
+ model: classItemModel
+ hasHorizontalScrollBar: true
+ hasVerticalScrollBar: true
+ miniScrollerHorizontal: true
+ miniScrollerVertical: true
+ autoHideScrollBars: false
+ listModel: classItemListHolder
+ useIndex: false
+ highlightMode: label
+ )
+ )
- )
- )
- )
+ )
+ )
+ )
- )
- #handles: #(#Any 0.607375 1.0)
- )
- #(#ArbitraryComponentSpec
- #name: 'helpTextView'
- #hasHorizontalScrollBar: true
- #hasVerticalScrollBar: true
- #miniScrollerHorizontal: true
- #miniScrollerVertical: true
- #hasBorder: false
- #component: #helpTextView
- )
- )
+ )
+ handles: (Any 0.607375 1.0)
+ )
+ (ArbitraryComponentSpec
+ name: 'helpTextView'
+ hasHorizontalScrollBar: true
+ hasVerticalScrollBar: true
+ miniScrollerHorizontal: true
+ miniScrollerVertical: true
+ hasBorder: false
+ component: helpTextView
+ )
+ )
- )
- #handles: #(#Any 0.679181 1.0)
- )
- )
+ )
+ handles: (Any 0.679181 1.0)
+ )
+ )
- )
+ )
)
!
@@ -288,40 +287,39 @@
<resource: #canvas>
^
- #(#FullSpec
- #name: #windowSpecForStandAlone
- #window:
- #(#WindowSpec
- #label: 'Help Tool'
- #name: 'Help Tool'
- #min: #(#Point 300 300)
- #max: #(#Point 1152 900)
- #bounds: #(#Rectangle 11 332 509 761)
- #menu: #menu
- )
- #component:
- #(#SpecCollection
- #collection: #(
- #(#UISubSpecification
- #name: 'windowSpec'
- #layout: #(#LayoutFrame 0 0.0 0 0.0 0 1.0 -50 1.0)
- #minorKey: #windowSpec
- )
- #(#UISubSpecification
- #name: 'windowSpecForCommit'
- #layout: #(#LayoutFrame 0 0.0 -50 1.0 0 1.0 -24 1.0)
- #majorKey: #ToolApplicationModel
- #minorKey: #windowSpecForCommit
- )
- #(#UISubSpecification
- #name: 'windowSpecForInfoBar'
- #layout: #(#LayoutFrame 0 0 -24 1 0 1 0 1)
- #majorKey: #ToolApplicationModel
- #minorKey: #windowSpecForInfoBar
- )
- )
+ #(FullSpec
+ name: windowSpecForStandAlone
+ window:
+ (WindowSpec
+ label: 'Help Tool'
+ name: 'Help Tool'
+ min: (Point 300 300)
+ bounds: (Rectangle 14 46 512 475)
+ menu: menu
+ )
+ component:
+ (SpecCollection
+ collection: (
+ (UISubSpecification
+ name: 'windowSpec'
+ layout: (LayoutFrame 0 0.0 0 0.0 0 1.0 -50 1.0)
+ minorKey: windowSpec
+ )
+ (UISubSpecification
+ name: 'windowSpecForCommit'
+ layout: (LayoutFrame 0 0.0 -50 1.0 0 1.0 -24 1.0)
+ majorKey: ToolApplicationModel
+ minorKey: windowSpecForCommit
+ )
+ (UISubSpecification
+ name: 'windowSpecForInfoBar'
+ layout: (LayoutFrame 0 0 -24 1 0 1 0 1)
+ majorKey: ToolApplicationModel
+ minorKey: windowSpecForInfoBar
+ )
+ )
- )
+ )
)
! !
--- a/UISelectionPanel.st Fri Aug 29 20:31:23 2003 +0200
+++ b/UISelectionPanel.st Thu Sep 04 20:59:42 2003 +0200
@@ -158,106 +158,105 @@
<resource: #canvas>
^
- #(#FullSpec
- #name: #nameAndSelectorSpec
- #window:
- #(#WindowSpec
- #label: 'Painter'
- #name: 'Painter'
- #min: #(#Point 10 10)
- #max: #(#Point 1280 1024)
- #bounds: #(#Rectangle 16 46 331 262)
+ #(FullSpec
+ name: nameAndSelectorSpec
+ window:
+ (WindowSpec
+ label: 'Painter'
+ name: 'Painter'
+ min: (Point 10 10)
+ bounds: (Rectangle 14 46 329 262)
)
- #component:
- #(#SpecCollection
- #collection: #(
- #(#LabelSpec
- #label: 'Class & selectors to access user specs:'
- #name: 'title'
- #layout: #(#Point 5 10)
- #resizeForLabel: true
- #adjust: #left
+ component:
+ (SpecCollection
+ collection: (
+ (LabelSpec
+ label: 'Class & selectors to access user specs:'
+ name: 'title'
+ layout: (Point 5 10)
+ resizeForLabel: true
+ adjust: left
)
- #(#LabelSpec
- #label: 'Class:'
- #name: 'classLabel'
- #layout: #(#AlignmentOrigin 68 0.11 51 0 1 0.5)
- #resizeForLabel: true
- #adjust: #right
+ (LabelSpec
+ label: 'Class:'
+ name: 'classLabel'
+ layout: (AlignmentOrigin 68 0.11 51 0 1 0.5)
+ resizeForLabel: true
+ adjust: right
)
- #(#InputFieldSpec
- #name: 'classField'
- #layout: #(#LayoutFrame 74 0.11 39 0 -5 1.0 61 0)
- #tabable: true
- #model: #className
- #type: #string
- #acceptOnPointerLeave: false
+ (InputFieldSpec
+ name: 'classField'
+ layout: (LayoutFrame 74 0.11 39 0 -5 1.0 61 0)
+ tabable: true
+ model: className
+ type: string
+ acceptOnPointerLeave: false
)
- #(#LabelSpec
- #label: 'Labels:'
- #name: 'labelsLabel'
- #layout: #(#AlignmentOrigin 68 0.11 74 0 1 0.5)
- #resizeForLabel: true
- #adjust: #right
+ (LabelSpec
+ label: 'Labels:'
+ name: 'labelsLabel'
+ layout: (AlignmentOrigin 68 0.11 74 0 1 0.5)
+ resizeForLabel: true
+ adjust: right
)
- #(#InputFieldSpec
- #name: 'labelsField'
- #layout: #(#LayoutFrame 74 0.11 64 0 -5 1.0 86 0)
- #tabable: true
- #model: #labelsKey
- #type: #symbolOrNil
- #acceptOnPointerLeave: false
+ (InputFieldSpec
+ name: 'labelsField'
+ layout: (LayoutFrame 74 0.11 64 0 -5 1.0 86 0)
+ tabable: true
+ model: labelsKey
+ type: symbolOrNil
+ acceptOnPointerLeave: false
)
- #(#LabelSpec
- #label: 'Specifications:'
- #name: 'specsLabel'
- #layout: #(#AlignmentOrigin 68 0.11 99 0 1 0.5)
- #resizeForLabel: true
- #adjust: #right
+ (LabelSpec
+ label: 'Specifications:'
+ name: 'specsLabel'
+ layout: (AlignmentOrigin 68 0.11 99 0 1 0.5)
+ resizeForLabel: true
+ adjust: right
)
- #(#InputFieldSpec
- #name: 'specsField'
- #layout: #(#LayoutFrame 74 0.11 89 0 -5 1.0 111 0)
- #tabable: true
- #model: #specsKey
- #type: #symbolOrNil
- #acceptOnPointerLeave: false
+ (InputFieldSpec
+ name: 'specsField'
+ layout: (LayoutFrame 74 0.11 89 0 -5 1.0 111 0)
+ tabable: true
+ model: specsKey
+ type: symbolOrNil
+ acceptOnPointerLeave: false
)
- #(#HorizontalPanelViewSpec
- #name: 'commitPanel'
- #layout: #(#LayoutFrame 0 0.0 -23 1.0 0 1.0 0 1.0)
- #horizontalLayout: #fitSpace
- #verticalLayout: #fit
- #horizontalSpace: 3
- #verticalSpace: 3
- #reverseOrderIfOKAtLeft: true
- #component:
- #(#SpecCollection
- #collection: #(
- #(#ActionButtonSpec
- #label: 'cancel'
- #name: 'cancel'
- #tabable: true
- #model: #cancel
- #extent: #(#Point 152 23)
+ (HorizontalPanelViewSpec
+ name: 'commitPanel'
+ layout: (LayoutFrame 0 0.0 -23 1.0 0 1.0 0 1.0)
+ horizontalLayout: fitSpace
+ verticalLayout: fit
+ horizontalSpace: 3
+ verticalSpace: 3
+ reverseOrderIfOKAtLeft: true
+ component:
+ (SpecCollection
+ collection: (
+ (ActionButtonSpec
+ label: 'cancel'
+ name: 'cancel'
+ tabable: true
+ model: cancel
+ extent: (Point 153 23)
)
- #(#ActionButtonSpec
- #label: 'ok'
- #name: 'accept'
- #tabable: true
- #model: #accept
- #isDefault: true
- #extent: #(#Point 152 21)
+ (ActionButtonSpec
+ label: 'ok'
+ name: 'accept'
+ tabable: true
+ model: accept
+ isDefault: true
+ extent: (Point 153 23)
)
)
)
)
- #(#CheckBoxSpec
- #label: 'Update Default Resources'
- #name: 'updateDefaultResources'
- #layout: #(#Point 5 133)
- #model: #updateDefaultResources
+ (CheckBoxSpec
+ label: 'Update Default Resources'
+ name: 'updateDefaultResources'
+ layout: (Point 5 133)
+ model: updateDefaultResources
)
)
@@ -281,32 +280,26 @@
<resource: #canvas>
^
- #(#FullSpec
- #name: #windowSpec
- #window:
- #(#WindowSpec
- #label: 'Widget Gallery'
- #name: 'Widget Gallery'
- #layout: #(#LayoutFrame 374 0 171 0 867 0 472 0)
- #level: 0
- #min: #(#Point 100 280)
- #max: #(#Point 1160 870)
- #bounds: #(#Rectangle 374 171 868 473)
- #usePreferredExtent: false
- #returnIsOKInDialog: true
- #escapeIsCancelInDialog: true
+ #(FullSpec
+ name: windowSpec
+ window:
+ (WindowSpec
+ label: 'Widget Gallery'
+ name: 'Widget Gallery'
+ min: (Point 100 280)
+ bounds: (Rectangle 14 46 508 348)
)
- #component:
- #(#SpecCollection
- #collection: #(
- #(#NoteBookViewSpec
- #name: 'NoteBook1'
- #layout: #(#LayoutFrame 0 0.0 0 0.0 0 1.0 0 1.0)
- #model: #majorChannel
- #menu: #majorList
- #direction: #right
- #useIndex: true
- #canvas: #gallery
+ component:
+ (SpecCollection
+ collection: (
+ (NoteBookViewSpec
+ name: 'NoteBook1'
+ layout: (LayoutFrame 0 0.0 0 0.0 0 1.0 0 1.0)
+ model: majorChannel
+ menu: majorList
+ direction: right
+ useIndex: true
+ canvas: gallery
)
)
@@ -370,127 +363,121 @@
<resource: #canvas>
^
- #(#FullSpec
- #name: #standardButtons
- #window:
- #(#WindowSpec
- #label: 'Buttons'
- #name: 'Buttons'
- #layout: #(#LayoutFrame 58 0 164 0 497 0 321 0)
- #level: 0
- #min: #(#Point 10 10)
- #max: #(#Point 1280 1024)
- #bounds: #(#Rectangle 58 164 498 322)
- #usePreferredExtent: false
- #returnIsOKInDialog: true
- #escapeIsCancelInDialog: true
+ #(FullSpec
+ name: standardButtons
+ window:
+ (WindowSpec
+ label: 'Buttons'
+ name: 'Buttons'
+ min: (Point 10 10)
+ bounds: (Rectangle 14 46 454 204)
)
- #component:
- #(#SpecCollection
- #collection: #(
- #(#ActionButtonSpec
- #label: 'Button'
- #name: 'Button'
- #layout: #(#LayoutFrame 2 0 1 0 127 0 23 0)
- #translateLabel: true
+ component:
+ (SpecCollection
+ collection: (
+ (ActionButtonSpec
+ label: 'Button'
+ name: 'Button'
+ layout: (LayoutFrame 2 0 1 0 127 0 23 0)
+ translateLabel: true
+ )
+ (ActionButtonSpec
+ label: 'OK'
+ name: 'Button - OK'
+ layout: (LayoutFrame 2 0 33 0 127 0 55 0)
+ translateLabel: true
+ model: doAccept
)
- #(#ActionButtonSpec
- #label: 'OK'
- #name: 'Button - OK'
- #layout: #(#LayoutFrame 2 0 33 0 127 0 55 0)
- #translateLabel: true
- #model: #doAccept
+ (ActionButtonSpec
+ label: 'Cancel'
+ name: 'Button - Cancel'
+ layout: (LayoutFrame 2 0 65 0 127 0 87 0)
+ translateLabel: true
+ model: doCancel
)
- #(#ActionButtonSpec
- #label: 'Cancel'
- #name: 'Button - Cancel'
- #layout: #(#LayoutFrame 2 0 65 0 127 0 87 0)
- #translateLabel: true
- #model: #doCancel
+ (ActionButtonSpec
+ label: 'Help'
+ name: 'Button - Help'
+ layout: (LayoutFrame 2 0 97 0 127 0 119 0)
+ translateLabel: true
+ model: help
)
- #(#ActionButtonSpec
- #label: 'Help'
- #name: 'Button - Help'
- #layout: #(#LayoutFrame 2 0 97 0 127 0 119 0)
- #translateLabel: true
- #model: #help
+ (ActionButtonSpec
+ label: 'Close'
+ name: 'Button - Close'
+ layout: (LayoutFrame 2 0 129 0 127 0 151 0)
+ translateLabel: true
+ model: closeRequest
)
- #(#ActionButtonSpec
- #label: 'Close'
- #name: 'Button - Close'
- #layout: #(#LayoutFrame 2 0 129 0 127 0 151 0)
- #translateLabel: true
- #model: #closeRequest
- )
- #(#ToggleSpec
- #label: 'Toggle'
- #name: 'Toggle'
- #layout: #(#LayoutFrame 144 0 1 0 280 0 23 0)
- #translateLabel: true
- #isTriggerOnDown: true
- #lampColor: #(#Color 100.0 100.0 0.0)
+ (ToggleSpec
+ label: 'Toggle'
+ name: 'Toggle'
+ layout: (LayoutFrame 144 0 1 0 280 0 23 0)
+ translateLabel: true
+ isTriggerOnDown: true
+ lampColor: (Color 100.0 100.0 0.0)
)
- #(#RadioButtonSpec
- #label: 'Radio Button'
- #name: 'Radio Button'
- #layout: #(#LayoutFrame 144 0.0 33 0 280 0 55 0)
- #translateLabel: true
- #isTriggerOnDown: true
- #lampColor: #(#Color 100.0 100.0 0.0)
+ (RadioButtonSpec
+ label: 'Radio Button'
+ name: 'Radio Button'
+ layout: (LayoutFrame 144 0.0 33 0 280 0 55 0)
+ translateLabel: true
+ isTriggerOnDown: true
+ lampColor: (Color 100.0 100.0 0.0)
)
- #(#CheckBoxSpec
- #label: 'Check Box'
- #name: 'Check Box'
- #layout: #(#LayoutFrame 144 0 65 0 280 0 87 0)
- #translateLabel: true
+ (CheckBoxSpec
+ label: 'Check Box'
+ name: 'Check Box'
+ layout: (LayoutFrame 144 0 65 0 280 0 87 0)
+ translateLabel: true
)
- #(#CheckToggleSpec
- #name: 'Check Toggle'
- #layout: #(#LayoutOrigin 144 0 99 0)
- #isTriggerOnDown: true
- #showLamp: false
- #lampColor: #(#Color 100.0 100.0 0.0)
+ (CheckToggleSpec
+ name: 'Check Toggle'
+ layout: (LayoutOrigin 144 0 99 0)
+ isTriggerOnDown: true
+ showLamp: false
+ lampColor: (Color 100.0 100.0 0.0)
)
- #(#LabelSpec
- #label: 'Check Toggle'
- #name: 'CheckToggleLabel'
- #layout: #(#AlignmentOrigin 170 0 98 0 0 0)
- #resizeForLabel: true
- #adjust: #left
- #canUIDrag: false
+ (LabelSpec
+ label: 'Check Toggle'
+ name: 'CheckToggleLabel'
+ layout: (AlignmentOrigin 170 0 98 0 0 0)
+ resizeForLabel: true
+ adjust: left
+ canUIDrag: false
)
- #(#ButtonSpec
- #label: 'Model Button'
- #name: 'Model Button'
- #layout: #(#LayoutFrame 296 0 1 0 432 0 23 0)
- #translateLabel: true
+ (ButtonSpec
+ label: 'Model Button'
+ name: 'Model Button'
+ layout: (LayoutFrame 296 0 1 0 432 0 23 0)
+ translateLabel: true
)
- #(#LabelSpec
- #label: 'Spin Button'
- #name: 'UpDownButtonLabel'
- #layout: #(#AlignmentOrigin 348 0 35 0 0 0)
- #resizeForLabel: true
- #adjust: #left
- #canUIDrag: false
+ (LabelSpec
+ label: 'Spin Button'
+ name: 'UpDownButtonLabel'
+ layout: (AlignmentOrigin 348 0 35 0 0 0)
+ resizeForLabel: true
+ adjust: left
+ canUIDrag: false
)
- #(#UpDownButtonSpec
- #name: 'UpDown Button'
- #layout: #(#LayoutFrame 296 0 33 0 341 0 55 0)
- #orientation: #horizontal
+ (UpDownButtonSpec
+ name: 'UpDown Button'
+ layout: (LayoutFrame 296 0 33 0 341 0 55 0)
+ orientation: horizontal
)
- #(#LabelSpec
- #label: 'Arrow Button'
- #name: 'ArrowButtonsLabel'
- #layout: #(#AlignmentOrigin 348 0 69 0 0 0)
- #resizeForLabel: true
- #adjust: #left
- #canUIDrag: false
+ (LabelSpec
+ label: 'Arrow Button'
+ name: 'ArrowButtonsLabel'
+ layout: (AlignmentOrigin 348 0 69 0 0 0)
+ resizeForLabel: true
+ adjust: left
+ canUIDrag: false
)
- #(#ArrowButtonSpec
- #name: 'Arrow Button'
- #layout: #(#LayoutFrame 296 0 65 0 318 0 87 0)
- #isTriggerOnDown: true
- #direction: #right
+ (ArrowButtonSpec
+ name: 'Arrow Button'
+ layout: (LayoutFrame 296 0 65 0 318 0 87 0)
+ isTriggerOnDown: true
+ direction: right
)
)
@@ -513,108 +500,107 @@
<resource: #canvas>
^
- #(#FullSpec
- #name: #standardEmbed
- #window:
- #(#WindowSpec
- #label: 'Misc'
- #name: 'Misc'
- #min: #(#Point 10 10)
- #max: #(#Point 1280 1024)
- #bounds: #(#Rectangle 652 287 1094 510)
+ #(FullSpec
+ name: standardEmbed
+ window:
+ (WindowSpec
+ label: 'Misc'
+ name: 'Misc'
+ min: (Point 10 10)
+ bounds: (Rectangle 14 46 456 269)
)
- #component:
- #(#SpecCollection
- #collection: #(
- #(#ArbitraryComponentSpec
- #name: 'Arbitrary Component'
- #layout: #(#LayoutFrame 3 0 3 0 128 0 104 0)
- #hasBorder: false
+ component:
+ (SpecCollection
+ collection: (
+ (ArbitraryComponentSpec
+ name: 'Arbitrary Component'
+ layout: (LayoutFrame 3 0 3 0 128 0 104 0)
+ hasBorder: false
)
- #(#LabelSpec
- #label: 'Scrollable'
- #name: 'ScrollableArbitraryLabel1'
- #layout: #(#AlignmentOrigin 7 0 7 0 0 0)
- #style: #(#FontDescription #helvetica #medium #roman 10)
- #resizeForLabel: true
- #adjust: #left
- #canUIDrag: false
+ (LabelSpec
+ label: 'Scrollable'
+ name: 'ScrollableArbitraryLabel1'
+ layout: (AlignmentOrigin 7 0 7 0 0 0)
+ style: (FontDescription helvetica medium roman 10)
+ resizeForLabel: true
+ adjust: left
+ canUIDrag: false
)
- #(#LabelSpec
- #label: 'Arbitrary-'
- #name: 'ScrollableArbitraryLabel2'
- #layout: #(#AlignmentOrigin 7 0 23 0 0 0)
- #style: #(#FontDescription #helvetica #medium #roman 10)
- #resizeForLabel: true
- #adjust: #left
- #canUIDrag: false
+ (LabelSpec
+ label: 'Arbitrary-'
+ name: 'ScrollableArbitraryLabel2'
+ layout: (AlignmentOrigin 7 0 23 0 0 0)
+ style: (FontDescription helvetica medium roman 10)
+ resizeForLabel: true
+ adjust: left
+ canUIDrag: false
)
- #(#LabelSpec
- #label: 'Component'
- #name: 'ScrollableArbitraryLabel3'
- #layout: #(#AlignmentOrigin 7 0 39 0 0 0)
- #style: #(#FontDescription #helvetica #medium #roman 10)
- #resizeForLabel: true
- #adjust: #left
- #canUIDrag: false
+ (LabelSpec
+ label: 'Component'
+ name: 'ScrollableArbitraryLabel3'
+ layout: (AlignmentOrigin 7 0 39 0 0 0)
+ style: (FontDescription helvetica medium roman 10)
+ resizeForLabel: true
+ adjust: left
+ canUIDrag: false
)
- #(#UISubSpecification
- #name: 'SubSpecification'
- #layout: #(#LayoutFrame 145 0 3 0 280 0 104 0)
+ (UISubSpecification
+ name: 'SubSpecification'
+ layout: (LayoutFrame 145 0 3 0 280 0 104 0)
)
- #(#LabelSpec
- #label: 'SubSpecification'
- #name: 'SubSpecificationLabel'
- #layout: #(#Point 149 7)
- #style: #(#FontDescription #helvetica #medium #roman 10)
- #resizeForLabel: true
- #canUIDrag: false
+ (LabelSpec
+ label: 'SubSpecification'
+ name: 'SubSpecificationLabel'
+ layout: (Point 149 7)
+ style: (FontDescription helvetica medium roman 10)
+ resizeForLabel: true
+ canUIDrag: false
)
- #(#SubCanvasSpec
- #name: 'SubCanvas'
- #layout: #(#LayoutFrame 297 0 3 0 433 0 104 0)
- #hasHorizontalScrollBar: true
- #hasVerticalScrollBar: true
+ (SubCanvasSpec
+ name: 'SubCanvas'
+ layout: (LayoutFrame 297 0 3 0 433 0 104 0)
+ hasHorizontalScrollBar: true
+ hasVerticalScrollBar: true
)
- #(#LabelSpec
- #label: 'SubCanvas'
- #name: 'SubCanvasLabel'
- #layout: #(#AlignmentOrigin 324 0 7 0 0 0)
- #style: #(#FontDescription #helvetica #medium #roman 10)
- #resizeForLabel: true
- #adjust: #left
- #canUIDrag: false
+ (LabelSpec
+ label: 'SubCanvas'
+ name: 'SubCanvasLabel'
+ layout: (AlignmentOrigin 324 0 7 0 0 0)
+ style: (FontDescription helvetica medium roman 10)
+ resizeForLabel: true
+ adjust: left
+ canUIDrag: false
)
- #(#NonScrollableArbitraryComponentSpec
- #name: 'NonSrollable Arbitrary Component'
- #layout: #(#LayoutFrame 3 0 120 0 128 0 221 0)
+ (NonScrollableArbitraryComponentSpec
+ name: 'NonSrollable Arbitrary Component'
+ layout: (LayoutFrame 3 0 120 0 128 0 221 0)
)
- #(#LabelSpec
- #label: 'NonScrollable'
- #name: 'NonScrollableArbitraryLabel1'
- #layout: #(#AlignmentOrigin 7 0 124 0 0 0)
- #style: #(#FontDescription #helvetica #medium #roman 10)
- #resizeForLabel: true
- #adjust: #left
- #canUIDrag: false
+ (LabelSpec
+ label: 'NonScrollable'
+ name: 'NonScrollableArbitraryLabel1'
+ layout: (AlignmentOrigin 7 0 124 0 0 0)
+ style: (FontDescription helvetica medium roman 10)
+ resizeForLabel: true
+ adjust: left
+ canUIDrag: false
)
- #(#LabelSpec
- #label: 'Arbitrary-'
- #name: 'NonScrollableArbitraryLabel2'
- #layout: #(#AlignmentOrigin 7 0 140 0 0 0)
- #style: #(#FontDescription #helvetica #medium #roman 10)
- #resizeForLabel: true
- #adjust: #left
- #canUIDrag: false
+ (LabelSpec
+ label: 'Arbitrary-'
+ name: 'NonScrollableArbitraryLabel2'
+ layout: (AlignmentOrigin 7 0 140 0 0 0)
+ style: (FontDescription helvetica medium roman 10)
+ resizeForLabel: true
+ adjust: left
+ canUIDrag: false
)
- #(#LabelSpec
- #label: 'Component'
- #name: 'NonScrollableArbitraryLabel3'
- #layout: #(#AlignmentOrigin 7 0 156 0 0 0)
- #style: #(#FontDescription #helvetica #medium #roman 10)
- #resizeForLabel: true
- #adjust: #left
- #canUIDrag: false
+ (LabelSpec
+ label: 'Component'
+ name: 'NonScrollableArbitraryLabel3'
+ layout: (AlignmentOrigin 7 0 156 0 0 0)
+ style: (FontDescription helvetica medium roman 10)
+ resizeForLabel: true
+ adjust: left
+ canUIDrag: false
)
)
@@ -637,51 +623,45 @@
<resource: #canvas>
^
- #(#FullSpec
- #name: #standardGraphs
- #window:
- #(#WindowSpec
- #label: 'Graphs'
- #name: 'Graphs'
- #layout: #(#LayoutFrame 81 0 219 0 519 0 333 0)
- #level: 0
- #min: #(#Point 10 10)
- #max: #(#Point 1280 1024)
- #bounds: #(#Rectangle 81 219 520 334)
- #usePreferredExtent: false
- #returnIsOKInDialog: true
- #escapeIsCancelInDialog: true
+ #(FullSpec
+ name: standardGraphs
+ window:
+ (WindowSpec
+ label: 'Graphs'
+ name: 'Graphs'
+ min: (Point 10 10)
+ bounds: (Rectangle 14 46 453 161)
)
- #component:
- #(#SpecCollection
- #collection: #(
- #(#GraphColumnView2DSpec
- #name: 'GraphColumnView2D'
- #layout: #(#LayoutFrame 3 0 3 0 208 0 98 0)
- #gridX: 0
- #gridY: 0
+ component:
+ (SpecCollection
+ collection: (
+ (GraphColumnView2DSpec
+ name: 'GraphColumnView2D'
+ layout: (LayoutFrame 3 0 3 0 208 0 98 0)
+ gridX: 0
+ gridY: 0
)
- #(#LabelSpec
- #label: 'GraphColumnViewView2D'
- #name: 'GraphColumnView2DLabel'
- #layout: #(#AlignmentOrigin 7 0 7 0 0 0)
- #style: #(#FontDescription #helvetica #medium #roman 10)
- #resizeForLabel: true
- #adjust: #left
- #canUIDrag: false
+ (LabelSpec
+ label: 'GraphColumnViewView2D'
+ name: 'GraphColumnView2DLabel'
+ layout: (AlignmentOrigin 7 0 7 0 0 0)
+ style: (FontDescription helvetica medium roman 10)
+ resizeForLabel: true
+ adjust: left
+ canUIDrag: false
)
- #(#GraphColumnView3DSpec
- #name: 'GraphColumnView3D'
- #layout: #(#LayoutFrame 228 0 3 0 433 0 98 0)
+ (GraphColumnView3DSpec
+ name: 'GraphColumnView3D'
+ layout: (LayoutFrame 228 0 3 0 433 0 98 0)
)
- #(#LabelSpec
- #label: 'GraphColumnViewView3D'
- #name: 'GraphColumnView3DLabel'
- #layout: #(#AlignmentOrigin 232 0 7 0 0 0)
- #style: #(#FontDescription #helvetica #medium #roman 10)
- #resizeForLabel: true
- #adjust: #left
- #canUIDrag: false
+ (LabelSpec
+ label: 'GraphColumnViewView3D'
+ name: 'GraphColumnView3DLabel'
+ layout: (AlignmentOrigin 232 0 7 0 0 0)
+ style: (FontDescription helvetica medium roman 10)
+ resizeForLabel: true
+ adjust: left
+ canUIDrag: false
)
)
@@ -704,235 +684,229 @@
<resource: #canvas>
^
- #(#FullSpec
- #name: #standardGroups
- #window:
- #(#WindowSpec
- #label: 'Groups'
- #name: 'Groups'
- #layout: #(#LayoutFrame 92 0 174 0 534 0 395 0)
- #level: 0
- #min: #(#Point 10 10)
- #max: #(#Point 1280 1024)
- #bounds: #(#Rectangle 92 174 535 396)
- #usePreferredExtent: false
- #returnIsOKInDialog: true
- #escapeIsCancelInDialog: true
+ #(FullSpec
+ name: standardGroups
+ window:
+ (WindowSpec
+ label: 'Groups'
+ name: 'Groups'
+ min: (Point 10 10)
+ bounds: (Rectangle 14 46 457 268)
)
- #component:
- #(#SpecCollection
- #collection: #(
- #(#ViewSpec
- #name: 'Box'
- #layout: #(#LayoutFrame 3 0 3 0 208 0 98 0)
+ component:
+ (SpecCollection
+ collection: (
+ (ViewSpec
+ name: 'Box'
+ layout: (LayoutFrame 3 0 3 0 208 0 98 0)
+ )
+ (LabelSpec
+ label: 'Box'
+ name: 'ViewLabel'
+ layout: (AlignmentOrigin 6 0 5 0 0 0)
+ style: (FontDescription helvetica medium roman 10)
+ resizeForLabel: true
+ adjust: left
+ canUIDrag: false
)
- #(#LabelSpec
- #label: 'Box'
- #name: 'ViewLabel'
- #layout: #(#AlignmentOrigin 6 0 5 0 0 0)
- #style: #(#FontDescription #helvetica #medium #roman 10)
- #resizeForLabel: true
- #adjust: #left
- #canUIDrag: false
- )
- #(#LabelSpec
- #label: 'Variable Panels'
- #name: 'VPanelLabel'
- #layout: #(#LayoutFrame 3 0 104 0 208 0 127 0)
- #style: #(#FontDescription #helvetica #medium #roman 10)
- #adjust: #left
- #canUIDrag: false
+ (LabelSpec
+ label: 'Variable Panels'
+ name: 'VPanelLabel'
+ layout: (LayoutFrame 3 0 104 0 208 0 127 0)
+ style: (FontDescription helvetica medium roman 10)
+ adjust: left
+ canUIDrag: false
)
- #(#VariableHorizontalPanelSpec
- #name: 'Variable Horizontal Panel'
- #layout: #(#LayoutFrame 3 0 128 0 98 0 218 0)
- #handles: #(#Any 0.5 1.0)
- #component:
- #(#SpecCollection
- #collection: #(
- #(#LabelSpec
- #label: 'A'
- #name: 'label4'
- #level: 2
- #style: #(#FontDescription #helvetica #medium #roman 12)
- #canUIDrag: false
+ (VariableHorizontalPanelSpec
+ name: 'Variable Horizontal Panel'
+ layout: (LayoutFrame 3 0 128 0 98 0 218 0)
+ component:
+ (SpecCollection
+ collection: (
+ (LabelSpec
+ label: 'A'
+ name: 'label4'
+ level: 2
+ style: (FontDescription helvetica medium roman 12)
+ canUIDrag: false
)
- #(#LabelSpec
- #label: 'B'
- #name: 'label5'
- #level: 2
- #style: #(#FontDescription #helvetica #medium #roman 12)
- #canUIDrag: false
+ (LabelSpec
+ label: 'B'
+ name: 'label5'
+ level: 2
+ style: (FontDescription helvetica medium roman 12)
+ canUIDrag: false
)
)
)
+ handles: (Any 0.5 1.0)
)
- #(#VariableVerticalPanelSpec
- #name: 'Variable Vertical Panel'
- #layout: #(#LayoutFrame 113 0 128 0 208 0 218 0)
- #handles: #(#Any 0.5 1.0)
- #component:
- #(#SpecCollection
- #collection: #(
- #(#LabelSpec
- #label: 'A'
- #name: 'label9'
- #level: 2
- #style: #(#FontDescription #helvetica #medium #roman 12)
- #canUIDrag: false
+ (VariableVerticalPanelSpec
+ name: 'Variable Vertical Panel'
+ layout: (LayoutFrame 113 0 128 0 208 0 218 0)
+ component:
+ (SpecCollection
+ collection: (
+ (LabelSpec
+ label: 'A'
+ name: 'label9'
+ level: 2
+ style: (FontDescription helvetica medium roman 12)
+ canUIDrag: false
+ )
+ (LabelSpec
+ label: 'B'
+ name: 'label10'
+ level: 2
+ style: (FontDescription helvetica medium roman 12)
+ canUIDrag: false
)
- #(#LabelSpec
- #label: 'B'
- #name: 'label10'
- #level: 2
- #style: #(#FontDescription #helvetica #medium #roman 12)
- #canUIDrag: false
+ )
+
+ )
+ handles: (Any 0.5 1.0)
+ )
+ (FramedBoxSpec
+ label: 'Framed Box'
+ name: 'Framed Box'
+ layout: (LayoutFrame 228 0 3 0 433 0 98 0)
+ labelPosition: topLeft
+ translateLabel: true
+ )
+ (LabelSpec
+ label: 'Panels'
+ name: 'PanelLabel'
+ layout: (LayoutFrame 228 0 104 0 433 0 127 0)
+ style: (FontDescription helvetica medium roman 10)
+ adjust: left
+ canUIDrag: false
+ )
+ (HorizontalPanelViewSpec
+ name: 'Horizontal Panel'
+ layout: (LayoutFrame 228 0 128 0 312 0 218 0)
+ horizontalLayout: center
+ verticalLayout: center
+ horizontalSpace: 3
+ verticalSpace: 3
+ component:
+ (SpecCollection
+ collection: (
+ (LabelSpec
+ label: 'A'
+ name: 'label1'
+ level: 2
+ style: (FontDescription helvetica medium roman 12)
+ extent: (Point 23 23)
+ canUIDrag: false
+ )
+ (LabelSpec
+ label: 'B'
+ name: 'label2'
+ level: 2
+ style: (FontDescription helvetica medium roman 12)
+ extent: (Point 23 23)
+ canUIDrag: false
+ )
+ (LabelSpec
+ label: 'C'
+ name: 'label3'
+ level: 2
+ style: (FontDescription helvetica medium roman 12)
+ extent: (Point 23 23)
+ canUIDrag: false
)
)
)
)
- #(#FramedBoxSpec
- #label: 'Framed Box'
- #name: 'Framed Box'
- #layout: #(#LayoutFrame 228 0 3 0 433 0 98 0)
- #labelPosition: #topLeft
- #translateLabel: true
- )
- #(#LabelSpec
- #label: 'Panels'
- #name: 'PanelLabel'
- #layout: #(#LayoutFrame 228 0 104 0 433 0 127 0)
- #style: #(#FontDescription #helvetica #medium #roman 10)
- #adjust: #left
- #canUIDrag: false
- )
- #(#HorizontalPanelViewSpec
- #name: 'Horizontal Panel'
- #layout: #(#LayoutFrame 228 0 128 0 312 0 218 0)
- #horizontalLayout: #center
- #verticalLayout: #center
- #horizontalSpace: 3
- #verticalSpace: 3
- #component:
- #(#SpecCollection
- #collection: #(
- #(#LabelSpec
- #label: 'A'
- #name: 'label1'
- #level: 2
- #style: #(#FontDescription #helvetica #medium #roman 12)
- #extent: #(#Point 23 23)
- #canUIDrag: false
+ (VerticalPanelViewSpec
+ name: 'Vertical Panel'
+ layout: (LayoutFrame 320 0 128 0 367 0 218 0)
+ horizontalLayout: center
+ verticalLayout: center
+ horizontalSpace: 3
+ verticalSpace: 3
+ component:
+ (SpecCollection
+ collection: (
+ (LabelSpec
+ label: 'A'
+ name: 'label6'
+ level: 2
+ style: (FontDescription helvetica medium roman 12)
+ extent: (Point 23 23)
+ canUIDrag: false
)
- #(#LabelSpec
- #label: 'B'
- #name: 'label2'
- #level: 2
- #style: #(#FontDescription #helvetica #medium #roman 12)
- #extent: #(#Point 23 23)
- #canUIDrag: false
+ (LabelSpec
+ label: 'B'
+ name: 'label7'
+ level: 2
+ style: (FontDescription helvetica medium roman 12)
+ extent: (Point 23 23)
+ canUIDrag: false
)
- #(#LabelSpec
- #label: 'C'
- #name: 'label3'
- #level: 2
- #style: #(#FontDescription #helvetica #medium #roman 12)
- #extent: #(#Point 23 23)
- #canUIDrag: false
+ (LabelSpec
+ label: 'C'
+ name: 'label8'
+ level: 2
+ style: (FontDescription helvetica medium roman 12)
+ extent: (Point 23 23)
+ canUIDrag: false
)
)
)
)
- #(#VerticalPanelViewSpec
- #name: 'Vertical Panel'
- #layout: #(#LayoutFrame 320 0 128 0 367 0 218 0)
- #horizontalLayout: #center
- #verticalLayout: #center
- #horizontalSpace: 3
- #verticalSpace: 3
- #component:
- #(#SpecCollection
- #collection: #(
- #(#LabelSpec
- #label: 'A'
- #name: 'label6'
- #level: 2
- #style: #(#FontDescription #helvetica #medium #roman 12)
- #extent: #(#Point 23 23)
- #canUIDrag: false
- )
- #(#LabelSpec
- #label: 'B'
- #name: 'label7'
- #level: 2
- #style: #(#FontDescription #helvetica #medium #roman 12)
- #extent: #(#Point 23 23)
- #canUIDrag: false
- )
- #(#LabelSpec
- #label: 'C'
- #name: 'label8'
- #level: 2
- #style: #(#FontDescription #helvetica #medium #roman 12)
- #extent: #(#Point 23 23)
- #canUIDrag: false
+ (PanelViewSpec
+ name: 'Panel'
+ layout: (LayoutFrame 375 0 128 0 433 0 218 0)
+ horizontalLayout: fitSpace
+ verticalLayout: fitSpace
+ horizontalSpace: 3
+ verticalSpace: 3
+ component:
+ (SpecCollection
+ collection: (
+ (LabelSpec
+ label: 'A'
+ name: 'label11'
+ level: 2
+ style: (FontDescription helvetica medium roman 12)
+ extent: (Point 23 23)
+ canUIDrag: false
)
- )
-
- )
- )
- #(#PanelViewSpec
- #name: 'Panel'
- #layout: #(#LayoutFrame 375 0 128 0 433 0 218 0)
- #horizontalLayout: #fitSpace
- #verticalLayout: #fitSpace
- #horizontalSpace: 3
- #verticalSpace: 3
- #component:
- #(#SpecCollection
- #collection: #(
- #(#LabelSpec
- #label: 'A'
- #name: 'label11'
- #level: 2
- #style: #(#FontDescription #helvetica #medium #roman 12)
- #extent: #(#Point 23 23)
- #canUIDrag: false
+ (LabelSpec
+ label: 'B'
+ name: 'label12'
+ level: 2
+ style: (FontDescription helvetica medium roman 12)
+ extent: (Point 23 23)
+ canUIDrag: false
+ )
+ (LabelSpec
+ label: 'C'
+ name: 'label13'
+ level: 2
+ style: (FontDescription helvetica medium roman 12)
+ extent: (Point 23 23)
+ canUIDrag: false
)
- #(#LabelSpec
- #label: 'B'
- #name: 'label12'
- #level: 2
- #style: #(#FontDescription #helvetica #medium #roman 12)
- #extent: #(#Point 23 23)
- #canUIDrag: false
- )
- #(#LabelSpec
- #label: 'C'
- #name: 'label13'
- #level: 2
- #style: #(#FontDescription #helvetica #medium #roman 12)
- #extent: #(#Point 23 23)
- #canUIDrag: false
+ (LabelSpec
+ label: 'D'
+ name: 'label14'
+ level: 2
+ style: (FontDescription helvetica medium roman 12)
+ extent: (Point 23 23)
+ canUIDrag: false
)
- #(#LabelSpec
- #label: 'D'
- #name: 'label14'
- #level: 2
- #style: #(#FontDescription #helvetica #medium #roman 12)
- #extent: #(#Point 23 23)
- #canUIDrag: false
- )
- #(#LabelSpec
- #label: 'E'
- #name: 'label15'
- #level: 2
- #style: #(#FontDescription #helvetica #medium #roman 12)
- #extent: #(#Point 23 23)
- #canUIDrag: false
+ (LabelSpec
+ label: 'E'
+ name: 'label15'
+ level: 2
+ style: (FontDescription helvetica medium roman 12)
+ extent: (Point 23 23)
+ canUIDrag: false
)
)
@@ -959,40 +933,39 @@
<resource: #canvas>
^
- #(#FullSpec
- #name: #standardLists
- #window:
- #(#WindowSpec
- #label: 'Lists'
- #name: 'Lists'
- #layout: #(#LayoutFrame 61 0 96 0 501 0 313 0)
- #min: #(#Point 10 10)
- #max: #(#Point 1280 1024)
- #bounds: #(#Rectangle 61 96 502 314)
+ #(FullSpec
+ name: standardLists
+ window:
+ (WindowSpec
+ label: 'Lists'
+ name: 'Lists'
+ min: (Point 10 10)
+ bounds: (Rectangle 14 46 455 264)
)
- #component:
- #(#SpecCollection
- #collection: #(
- #(#SequenceViewSpec
- #name: 'List'
- #layout: #(#LayoutFrame 3 0 3 0 208 0 101 0)
- #hasHorizontalScrollBar: true
- #hasVerticalScrollBar: true
- #useIndex: false
+ component:
+ (SpecCollection
+ collection: (
+ (SequenceViewSpec
+ name: 'List'
+ layout: (LayoutFrame 3 0 3 0 208 0 101 0)
+ hasHorizontalScrollBar: true
+ hasVerticalScrollBar: true
+ useIndex: false
)
- #(#DataSetSpec
- #name: 'Table'
- #layout: #(#LayoutFrame 228 0 3 0 433 0 101 0)
- #hasHorizontalScrollBar: true
- #hasVerticalScrollBar: true
- #has3Dsepartors: false
+ (DataSetSpec
+ name: 'Table'
+ layout: (LayoutFrame 228 0 3 0 433 0 101 0)
+ hasHorizontalScrollBar: true
+ hasVerticalScrollBar: true
+ has3Dsepartors: false
)
- #(#SelectionInListModelViewSpec
- #name: 'New SelectionInListView'
- #layout: #(#LayoutFrame 3 0 110 0 208 0 208 0)
- #hasHorizontalScrollBar: true
- #hasVerticalScrollBar: true
- #useIndex: false
+ (SelectionInListModelViewSpec
+ name: 'New SelectionInListView'
+ layout: (LayoutFrame 3 0 110 0 208 0 208 0)
+ hasHorizontalScrollBar: true
+ hasVerticalScrollBar: true
+ useIndex: false
+ highlightMode: line
)
)
@@ -1015,92 +988,91 @@
<resource: #canvas>
^
- #(#FullSpec
- #name: #standardMenus
- #window:
- #(#WindowSpec
- #label: 'Menus'
- #name: 'Menus'
- #min: #(#Point 10 10)
- #max: #(#Point 1280 1024)
- #bounds: #(#Rectangle 16 42 493 265)
+ #(FullSpec
+ name: standardMenus
+ window:
+ (WindowSpec
+ label: 'Menus'
+ name: 'Menus'
+ min: (Point 10 10)
+ bounds: (Rectangle 14 46 491 269)
)
- #component:
- #(#SpecCollection
- #collection: #(
- #(#MenuPanelSpec
- #name: 'Tool Bar'
- #layout: #(#LayoutFrame 4 0 134 0 129 0 166 0)
- #textDefault: true
+ component:
+ (SpecCollection
+ collection: (
+ (MenuPanelSpec
+ name: 'Tool Bar'
+ layout: (LayoutFrame 4 0 134 0 129 0 166 0)
+ textDefault: true
)
- #(#LabelSpec
- #label: 'Tool Bar'
- #name: 'ToolBarLabel'
- #layout: #(#AlignmentOrigin 4 0 134 0 0 1)
- #style: #(#FontDescription #helvetica #medium #roman 10)
- #resizeForLabel: true
- #adjust: #left
- #canUIDrag: false
+ (LabelSpec
+ label: 'Tool Bar'
+ name: 'ToolBarLabel'
+ layout: (AlignmentOrigin 4 0 134 0 0 1)
+ style: (FontDescription helvetica medium roman 10)
+ resizeForLabel: true
+ adjust: left
+ canUIDrag: false
)
- #(#MenuPanelSpec
- #name: 'Menu Bar'
- #layout: #(#LayoutFrame 4 0 188 0 129 0 210 0)
+ (MenuPanelSpec
+ name: 'Menu Bar'
+ layout: (LayoutFrame 4 0 188 0 129 0 210 0)
)
- #(#LabelSpec
- #label: 'Menu Bar'
- #name: 'MenuBarLabel'
- #layout: #(#AlignmentOrigin 4 0 187 0 0 1)
- #style: #(#FontDescription #helvetica #medium #roman 10)
- #resizeForLabel: true
- #adjust: #left
- #canUIDrag: false
+ (LabelSpec
+ label: 'Menu Bar'
+ name: 'MenuBarLabel'
+ layout: (AlignmentOrigin 4 0 187 0 0 1)
+ style: (FontDescription helvetica medium roman 10)
+ resizeForLabel: true
+ adjust: left
+ canUIDrag: false
)
- #(#PopUpListSpec
- #label: 'PopUp List'
- #name: 'PopUp List'
- #layout: #(#LayoutFrame 4 0 3 0 129 0 25 0)
- #tabable: true
+ (PopUpListSpec
+ label: 'PopUp List'
+ name: 'PopUp List'
+ layout: (LayoutFrame 4 0 3 0 129 0 25 0)
+ tabable: true
)
- #(#ComboListSpec
- #name: 'Combo List'
- #layout: #(#LayoutFrame 4 0 33 0 129 0 53 0)
- #useIndex: false
+ (ComboListSpec
+ name: 'Combo List'
+ layout: (LayoutFrame 4 0 33 0 129 0 53 0)
+ useIndex: false
)
- #(#ComboBoxSpec
- #name: 'Combo Box'
- #layout: #(#LayoutFrame 4 0 61 0 129 0 81 0)
- #acceptOnPointerLeave: false
+ (ComboBoxSpec
+ name: 'Combo Box'
+ layout: (LayoutFrame 4 0 61 0 129 0 81 0)
+ acceptOnPointerLeave: false
)
- #(#ExtendedComboBoxSpec
- #name: 'Extended Combo Box'
- #layout: #(#LayoutFrame 4 0 88 0 129 0 108 0)
- #miniScrollerHorizontal: true
+ (ExtendedComboBoxSpec
+ name: 'Extended Combo Box'
+ layout: (LayoutFrame 4 0 88 0 129 0 108 0)
+ miniScrollerHorizontal: true
)
- #(#TabViewSpec
- #name: 'Tab Header'
- #layout: #(#LayoutFrame 146 0 3 0 281 0 39 0)
+ (TabViewSpec
+ name: 'Tab Header'
+ layout: (LayoutFrame 146 0 3 0 281 0 39 0)
)
- #(#NoteBookViewSpec
- #name: 'Note Book'
- #layout: #(#LayoutFrame 146 0 46 0 281 0 138 0)
+ (NoteBookViewSpec
+ name: 'Note Book'
+ layout: (LayoutFrame 146 0 46 0 281 0 138 0)
)
- #(#UIGalleryViewSpec
- #name: 'Gallery'
- #layout: #(#LayoutFrame 298 0 3 0 434 0 138 0)
+ (UIGalleryViewSpec
+ name: 'Gallery'
+ layout: (LayoutFrame 298 0 3 0 434 0 138 0)
)
- #(#ColorMenuSpec
- #name: 'ColorMenu'
- #layout: #(#LayoutFrame 143 0 188 0 -46 1.0 210 0)
- #labelsAreColored: true
+ (ColorMenuSpec
+ name: 'ColorMenu'
+ layout: (LayoutFrame 143 0 188 0 -46 1.0 210 0)
+ labelsAreColored: true
)
- #(#LabelSpec
- #label: 'Color Menu'
- #name: 'Label1'
- #layout: #(#AlignmentOrigin 142 0 187 0 0 1)
- #style: #(#FontDescription #helvetica #medium #roman 10)
- #resizeForLabel: true
- #adjust: #left
- #canUIDrag: false
+ (LabelSpec
+ label: 'Color Menu'
+ name: 'Label1'
+ layout: (AlignmentOrigin 142 0 187 0 0 1)
+ style: (FontDescription helvetica medium roman 10)
+ resizeForLabel: true
+ adjust: left
+ canUIDrag: false
)
)
@@ -1116,174 +1088,167 @@
the UIPainter may not be able to read the specification."
"
- UIPainter new openOnClass:Smalltalk::UISelectionPanel andSelector:#standardMisc
- Smalltalk::UISelectionPanel new openInterface:#standardMisc
+ UIPainter new openOnClass:UISelectionPanel andSelector:#standardMisc
+ UISelectionPanel new openInterface:#standardMisc
"
<resource: #canvas>
^
- #(#FullSpec
- #name: #standardMisc
- #window:
- #(#WindowSpec
- #label: 'NewApplication'
- #name: 'NewApplication'
- #layout: #(#LayoutFrame 44 0 195 0 482 0 437 0)
- #min: #(#Point 10 10)
- #max: #(#Point 1280 1024)
- #bounds: #(#Rectangle 44 195 483 438)
+ #(FullSpec
+ name: standardMisc
+ window:
+ (WindowSpec
+ label: 'NewApplication'
+ name: 'NewApplication'
+ min: (Point 10 10)
+ bounds: (Rectangle 14 46 453 289)
)
- #component:
- #(#SpecCollection
- #collection: #(
- #(#LabelSpec
- #label: 'StepSlider'
- #name: 'StepSliderLabel'
- #layout: #(#AlignmentOrigin 87 0 9 0 1 0)
- #style: #(#FontDescription #helvetica #medium #roman 10)
- #resizeForLabel: true
- #canUIDrag: false
+ component:
+ (SpecCollection
+ collection: (
+ (LabelSpec
+ label: 'StepSlider'
+ name: 'StepSliderLabel'
+ layout: (AlignmentOrigin 87 0 9 0 1 0)
+ style: (FontDescription helvetica medium roman 10)
+ resizeForLabel: true
+ canUIDrag: false
)
- #(#SteppingSliderSpec
- #name: 'StepSlider'
- #layout: #(#LayoutFrame 88 0 7 0 203 0 25 0)
- #orientation: #horizontal
+ (LabelSpec
+ label: 'Slider'
+ name: 'SliderLabel'
+ layout: (AlignmentOrigin 87 0 35 0 1 0)
+ style: (FontDescription helvetica medium roman 10)
+ resizeForLabel: true
+ canUIDrag: false
)
- #(#LabelSpec
- #label: 'Slider'
- #name: 'SliderLabel'
- #layout: #(#AlignmentOrigin 87 0 35 0 1 0)
- #style: #(#FontDescription #helvetica #medium #roman 10)
- #resizeForLabel: true
- #canUIDrag: false
- )
- #(#SliderSpec
- #name: 'Slider'
- #layout: #(#LayoutFrame 88 0 34 0 203 0 52 0)
- #orientation: #horizontal
+ (SliderSpec
+ name: 'Slider'
+ layout: (LayoutFrame 88 0 34 0 203 0 52 0)
+ orientation: horizontal
)
- #(#LabelSpec
- #label: 'ThumbWheel'
- #name: 'ThumbWheelLabel'
- #layout: #(#AlignmentOrigin 88 0 62 0 1 0)
- #style: #(#FontDescription #helvetica #medium #roman 10)
- #resizeForLabel: true
- #canUIDrag: false
+ (LabelSpec
+ label: 'ThumbWheel'
+ name: 'ThumbWheelLabel'
+ layout: (AlignmentOrigin 88 0 62 0 1 0)
+ style: (FontDescription helvetica medium roman 10)
+ resizeForLabel: true
+ canUIDrag: false
)
- #(#ThumbWheelSpec
- #name: 'Thumb Wheel'
- #layout: #(#LayoutFrame 88 0 60 0 203 0 80 0)
- #orientation: #horizontal
+ (ThumbWheelSpec
+ name: 'Thumb Wheel'
+ layout: (LayoutFrame 88 0 60 0 203 0 80 0)
+ orientation: horizontal
)
- #(#LabelSpec
- #label: 'ScrollBar'
- #name: 'ScrollBarLabel'
- #layout: #(#AlignmentOrigin 87 0 103 0 1 0)
- #initiallyInvisible: true
- #style: #(#FontDescription #helvetica #medium #roman 10)
- #resizeForLabel: true
- #canUIDrag: false
+ (LabelSpec
+ label: 'ScrollBar'
+ name: 'ScrollBarLabel'
+ layout: (AlignmentOrigin 87 0 103 0 1 0)
+ initiallyInvisible: true
+ style: (FontDescription helvetica medium roman 10)
+ resizeForLabel: true
+ canUIDrag: false
)
- #(#LabelSpec
- #label: 'Scroller'
- #name: 'ScrollerLabel'
- #layout: #(#AlignmentOrigin 87 0 130 0 1 0)
- #initiallyInvisible: true
- #style: #(#FontDescription #helvetica #medium #roman 10)
- #resizeForLabel: true
- #canUIDrag: false
+ (LabelSpec
+ label: 'Scroller'
+ name: 'ScrollerLabel'
+ layout: (AlignmentOrigin 87 0 130 0 1 0)
+ initiallyInvisible: true
+ style: (FontDescription helvetica medium roman 10)
+ resizeForLabel: true
+ canUIDrag: false
)
- #(#ScrollerSpec
- #name: 'Scroller'
- #layout: #(#LayoutFrame 88 0 127 0 203 0 145 0)
- #initiallyInvisible: true
- #orientation: #horizontal
+ (ScrollerSpec
+ name: 'Scroller'
+ layout: (LayoutFrame 88 0 127 0 203 0 145 0)
+ initiallyInvisible: true
+ orientation: horizontal
)
- #(#SteppingSliderSpec
- #name: 'VStepSlider'
- #layout: #(#LayoutFrame 226 0 6 0 244 0 106 0)
+ (SteppingSliderSpec
+ name: 'VStepSlider'
+ layout: (LayoutFrame 226 0 6 0 244 0 106 0)
)
- #(#SliderSpec
- #name: 'VSlider'
- #layout: #(#LayoutFrame 254 0 6 0 272 0 106 0)
+ (SliderSpec
+ name: 'VSlider'
+ layout: (LayoutFrame 254 0 6 0 272 0 106 0)
)
- #(#ThumbWheelSpec
- #name: 'VThumbWheel'
- #layout: #(#LayoutFrame 280 0 6 0 298 0 106 0)
+ (ThumbWheelSpec
+ name: 'VThumbWheel'
+ layout: (LayoutFrame 280 0 6 0 298 0 106 0)
)
- #(#ScrollerSpec
- #name: 'VScroller'
- #layout: #(#LayoutFrame 345 0 6 0 363 0 106 0)
- #initiallyInvisible: true
+ (ScrollerSpec
+ name: 'VScroller'
+ layout: (LayoutFrame 345 0 6 0 363 0 106 0)
+ initiallyInvisible: true
)
- #(#LabelSpec
- #label: 'Region'
- #name: 'RegionLabel'
- #layout: #(#AlignmentOrigin 83 0 177 0 1 0)
- #style: #(#FontDescription #helvetica #medium #roman 10)
- #resizeForLabel: true
- #adjust: #left
- #canUIDrag: false
+ (LabelSpec
+ label: 'Region'
+ name: 'RegionLabel'
+ layout: (AlignmentOrigin 83 0 177 0 1 0)
+ style: (FontDescription helvetica medium roman 10)
+ resizeForLabel: true
+ adjust: left
+ canUIDrag: false
)
- #(#RegionSpec
- #name: 'Region'
- #layout: #(#LayoutFrame 88 0 171 0 203 0 200 0)
- #lineWidth: 2
- #regionType: #ellipse
+ (RegionSpec
+ name: 'Region'
+ layout: (LayoutFrame 88 0 171 0 203 0 200 0)
+ lineWidth: 2
+ regionType: ellipse
)
- #(#LabelSpec
- #label: 'Separator'
- #name: 'SeparatorLabel'
- #layout: #(#AlignmentOrigin 83 0 207 0 1 0)
- #style: #(#FontDescription #helvetica #medium #roman 10)
- #resizeForLabel: true
- #adjust: #left
- #canUIDrag: false
+ (LabelSpec
+ label: 'Separator'
+ name: 'SeparatorLabel'
+ layout: (AlignmentOrigin 83 0 207 0 1 0)
+ style: (FontDescription helvetica medium roman 10)
+ resizeForLabel: true
+ adjust: left
+ canUIDrag: false
)
- #(#DividerSpec
- #name: 'Separator'
- #layout: #(#LayoutFrame 88 0 213 0 203 0 217 0)
+ (DividerSpec
+ name: 'Separator'
+ layout: (LayoutFrame 88 0 213 0 203 0 217 0)
)
- #(#LabelSpec
- #label: 'Progress Indicator'
- #name: 'ProgressIndicatorsLabel'
- #layout: #(#AlignmentOrigin 333 0 117 0 1 0)
- #style: #(#FontDescription #helvetica #medium #roman 10)
- #resizeForLabel: true
- #adjust: #left
- #canUIDrag: false
+ (LabelSpec
+ label: 'Progress Indicator'
+ name: 'ProgressIndicatorsLabel'
+ layout: (AlignmentOrigin 333 0 117 0 1 0)
+ style: (FontDescription helvetica medium roman 10)
+ resizeForLabel: true
+ adjust: left
+ canUIDrag: false
)
- #(#ProgressIndicatorSpec
- #name: 'Progress Indicator'
- #layout: #(#LayoutFrame 338 0 114 0 433 0 132 0)
+ (ProgressIndicatorSpec
+ name: 'Progress Indicator'
+ layout: (LayoutFrame 338 0 114 0 433 0 132 0)
)
- #(#LabelSpec
- #label: 'Round
+ (LabelSpec
+ label: 'Round
Progress Indicator'
- #name: 'RoundProgressIndicatorsLabel'
- #layout: #(#AlignmentOrigin 333 0 167 0 1 0)
- #style: #(#FontDescription #helvetica #medium #roman 10)
- #resizeForLabel: true
- #adjust: #left
- #canUIDrag: false
+ name: 'RoundProgressIndicatorsLabel'
+ layout: (AlignmentOrigin 333 0 167 0 1 0)
+ style: (FontDescription helvetica medium roman 10)
+ resizeForLabel: true
+ adjust: left
+ canUIDrag: false
)
- #(#RoundProgressIndicatorSpec
- #name: 'Round Progress Indicator'
- #layout: #(#LayoutFrame 338 0 136 0 425 0 219 0)
- #level: 0
- #borderWidth: 1
+ (RoundProgressIndicatorSpec
+ name: 'Round Progress Indicator'
+ layout: (LayoutFrame 338 0 136 0 425 0 219 0)
+ level: 0
+ borderWidth: 1
)
- #(#ScrollBarSpec
- #name: 'ScrollBar'
- #layout: #(#LayoutFrame 88 0 100 0 203 0 118 0)
- #initiallyInvisible: true
- #orientation: #horizontal
+ (ScrollBarSpec
+ name: 'ScrollBar'
+ layout: (LayoutFrame 88 0 100 0 203 0 118 0)
+ initiallyInvisible: true
+ orientation: horizontal
)
- #(#ScrollBarSpec
- #name: 'VScrollBar'
- #layout: #(#LayoutFrame 317 0 6 0 335 0 106 0)
- #initiallyInvisible: true
+ (ScrollBarSpec
+ name: 'VScrollBar'
+ layout: (LayoutFrame 317 0 6 0 335 0 106 0)
+ initiallyInvisible: true
)
)
@@ -1306,49 +1271,48 @@
<resource: #canvas>
^
- #(#FullSpec
- #name: #standardTexts
- #window:
- #(#WindowSpec
- #label: 'Texts'
- #name: 'Texts'
- #min: #(#Point 10 10)
- #max: #(#Point 1280 1024)
- #bounds: #(#Rectangle 12 22 451 202)
+ #(FullSpec
+ name: standardTexts
+ window:
+ (WindowSpec
+ label: 'Texts'
+ name: 'Texts'
+ min: (Point 10 10)
+ bounds: (Rectangle 14 46 453 226)
)
- #component:
- #(#SpecCollection
- #collection: #(
- #(#TextEditorSpec
- #name: 'Text Editor'
- #layout: #(#LayoutFrame 3 0 3 0 208 0 98 0)
- #hasHorizontalScrollBar: true
- #hasVerticalScrollBar: true
+ component:
+ (SpecCollection
+ collection: (
+ (TextEditorSpec
+ name: 'Text Editor'
+ layout: (LayoutFrame 3 0 3 0 208 0 98 0)
+ hasHorizontalScrollBar: true
+ hasVerticalScrollBar: true
)
- #(#HTMLViewSpec
- #name: 'HTML Browser'
- #layout: #(#LayoutFrame 228 0 3 0 433 0 98 0)
- #hasHorizontalScrollBar: true
- #hasVerticalScrollBar: true
+ (HTMLViewSpec
+ name: 'HTML Browser'
+ layout: (LayoutFrame 228 0 3 0 433 0 98 0)
+ hasHorizontalScrollBar: true
+ hasVerticalScrollBar: true
)
- #(#InputFieldSpec
- #name: 'Entry Field'
- #layout: #(#LayoutFrame 3 0 113 0 208 0 135 0)
- #acceptOnReturn: true
- #acceptOnTab: true
- #acceptOnPointerLeave: false
- #acceptOnLostFocus: true
+ (InputFieldSpec
+ name: 'Entry Field'
+ layout: (LayoutFrame 3 0 113 0 208 0 135 0)
+ acceptOnReturn: true
+ acceptOnTab: true
+ acceptOnLostFocus: true
+ acceptOnPointerLeave: false
)
- #(#FilenameInputFieldSpec
- #name: 'Filename Entry Field'
- #layout: #(#LayoutFrame 3 0 141 0 208 0 163 0)
- #acceptOnPointerLeave: false
+ (FilenameInputFieldSpec
+ name: 'Filename Entry Field'
+ layout: (LayoutFrame 3 0 141 0 208 0 163 0)
+ acceptOnPointerLeave: false
)
- #(#LabelSpec
- #label: 'Label'
- #name: 'Label'
- #layout: #(#LayoutFrame 228 0 113 0 433 0 135 0)
- #translateLabel: true
+ (LabelSpec
+ label: 'Label'
+ name: 'Label'
+ layout: (LayoutFrame 228 0 113 0 433 0 135 0)
+ translateLabel: true
)
)
@@ -1371,40 +1335,38 @@
<resource: #canvas>
^
- #(#FullSpec
- #name: #standardTrees
- #window:
- #(#WindowSpec
- #label: 'Trees'
- #name: 'Trees'
- #layout: #(#LayoutFrame 61 0 96 0 501 0 313 0)
- #min: #(#Point 10 10)
- #max: #(#Point 1280 1024)
- #bounds: #(#Rectangle 61 96 502 314)
+ #(FullSpec
+ name: standardTrees
+ window:
+ (WindowSpec
+ label: 'Trees'
+ name: 'Trees'
+ min: (Point 10 10)
+ bounds: (Rectangle 14 46 455 264)
)
- #component:
- #(#SpecCollection
- #collection: #(
- #(#SelectionInTreeViewSpec
- #name: 'Tree List'
- #layout: #(#LayoutFrame 4 0 3 0 209 0 101 0)
- #hasHorizontalScrollBar: true
- #hasVerticalScrollBar: true
- #highlightMode: #line
+ component:
+ (SpecCollection
+ collection: (
+ (SelectionInTreeViewSpec
+ name: 'Tree List'
+ layout: (LayoutFrame 4 0 3 0 209 0 101 0)
+ hasHorizontalScrollBar: true
+ hasVerticalScrollBar: true
+ highlightMode: line
)
- #(#FileSelectionTreeSpec
- #name: 'File Tree List'
- #layout: #(#LayoutFrame 229 0 3 0 434 0 101 0)
- #hasHorizontalScrollBar: true
- #hasVerticalScrollBar: true
- #highlightMode: #line
+ (FileSelectionTreeSpec
+ name: 'File Tree List'
+ layout: (LayoutFrame 229 0 3 0 434 0 101 0)
+ hasHorizontalScrollBar: true
+ hasVerticalScrollBar: true
+ highlightMode: line
)
- #(#HierarchicalListViewSpec
- #name: 'New ModelTree List'
- #layout: #(#LayoutFrame 4 0 110 0 209 0 208 0)
- #hasHorizontalScrollBar: true
- #hasVerticalScrollBar: true
- #highlightMode: #line
+ (HierarchicalListViewSpec
+ name: 'New ModelTree List'
+ layout: (LayoutFrame 4 0 110 0 209 0 208 0)
+ hasHorizontalScrollBar: true
+ hasVerticalScrollBar: true
+ highlightMode: line
)
)
@@ -1957,51 +1919,50 @@
<resource: #canvas>
^
- #(#FullSpec
- #name: #businessGraphicsSpec
- #window:
- #(#WindowSpec
- #label: 'Interface Builder'
- #name: 'Interface Builder'
- #min: #(#Point 10 10)
- #max: #(#Point 1280 1024)
- #bounds: #(#Rectangle 16 46 396 317)
+ #(FullSpec
+ name: businessGraphicsSpec
+ window:
+ (WindowSpec
+ label: 'Interface Builder'
+ name: 'Interface Builder'
+ min: (Point 10 10)
+ bounds: (Rectangle 14 46 394 317)
)
- #component:
- #(#SpecCollection
- #collection: #(
- #(#LabelSpec
- #label: 'PieChart'
- #name: 'Label2'
- #layout: #(#LayoutFrame 5 0 5 0 126 0 20 0)
- #translateLabel: true
- #canUIDrag: false
+ component:
+ (SpecCollection
+ collection: (
+ (LabelSpec
+ label: 'PieChart'
+ name: 'Label2'
+ layout: (LayoutFrame 5 0 5 0 126 0 20 0)
+ translateLabel: true
+ canUIDrag: false
)
- #(#PieChartWidgetSpec
- #name: 'PIE Chart'
- #layout: #(#LayoutFrame 15 0 21 0 103 0 141 0)
+ (PieChartWidgetSpec
+ name: 'PIE Chart'
+ layout: (LayoutFrame 15 0 21 0 103 0 141 0)
)
- #(#LabelSpec
- #label: 'ChartDescription'
- #name: 'Label1'
- #layout: #(#LayoutFrame 8 0.0 153 0 131 0 168 0)
- #translateLabel: true
- #canUIDrag: false
+ (LabelSpec
+ label: 'ChartDescription'
+ name: 'Label1'
+ layout: (LayoutFrame 8 0.0 153 0 131 0 168 0)
+ translateLabel: true
+ canUIDrag: false
)
- #(#ChartDescriptionSpec
- #name: 'Chart Legend'
- #layout: #(#LayoutFrame 14 0.0 -9 0.656827 14 0.323684 -9 1.0)
+ (ChartDescriptionSpec
+ name: 'Chart Legend'
+ layout: (LayoutFrame 14 0.0 -9 0.656827 14 0.323684 -9 1.0)
)
- #(#LabelSpec
- #label: 'BarChart'
- #name: 'Label3'
- #layout: #(#LayoutFrame 115 0 5 0 237 0 20 0)
- #translateLabel: true
- #canUIDrag: false
+ (LabelSpec
+ label: 'BarChart'
+ name: 'Label3'
+ layout: (LayoutFrame 115 0 5 0 237 0 20 0)
+ translateLabel: true
+ canUIDrag: false
)
- #(#BarChartWidgetSpec
- #name: 'Bar Chart'
- #layout: #(#LayoutFrame 121 0 21 0 232 0 141 0)
+ (BarChartWidgetSpec
+ name: 'Bar Chart'
+ layout: (LayoutFrame 121 0 21 0 232 0 141 0)
)
)
@@ -2023,85 +1984,84 @@
<resource: #canvas>
^
- #(#FullSpec
- #name: #clocksSpec
- #window:
- #(#WindowSpec
- #label: 'Interface Builder'
- #name: 'Interface Builder'
- #min: #(#Point 10 10)
- #max: #(#Point 1280 1024)
- #bounds: #(#Rectangle 16 46 441 319)
+ #(FullSpec
+ name: clocksSpec
+ window:
+ (WindowSpec
+ label: 'Interface Builder'
+ name: 'Interface Builder'
+ min: (Point 10 10)
+ bounds: (Rectangle 14 46 439 319)
)
- #component:
- #(#SpecCollection
- #collection: #(
- #(#NonScrollableArbitraryComponentSpec
- #name: 'Analog Clock'
- #layout: #(#LayoutFrame 15 0 39 0 129 0 151 0)
- #hasBorder: false
- #component: #ClockView
+ component:
+ (SpecCollection
+ collection: (
+ (NonScrollableArbitraryComponentSpec
+ name: 'Analog Clock'
+ layout: (LayoutFrame 15 0 39 0 129 0 151 0)
+ hasBorder: false
+ component: ClockView
)
- #(#NonScrollableArbitraryComponentSpec
- #name: 'Digital Clock'
- #layout: #(#LayoutOrigin 15 0 176 0)
- #hasBorder: false
- #component: #DigitalClockView
+ (NonScrollableArbitraryComponentSpec
+ name: 'Digital Clock'
+ layout: (LayoutOrigin 15 0 176 0)
+ hasBorder: false
+ component: DigitalClockView
)
- #(#NonScrollableArbitraryComponentSpec
- #name: 'Digital Number display'
- #layout: #(#LayoutOrigin 142 0 39 0)
- #hasBorder: false
- #component: #DigitalLedDisplay
+ (NonScrollableArbitraryComponentSpec
+ name: 'Digital Number display'
+ layout: (LayoutOrigin 142 0 39 0)
+ hasBorder: false
+ component: DigitalLedDisplay
)
- #(#LabelSpec
- #label: 'Analog Clock'
- #name: 'Label1'
- #layout: #(#LayoutFrame 15 0 16 0 128 0 38 0)
- #translateLabel: true
- #adjust: #left
- #canUIDrag: false
+ (LabelSpec
+ label: 'Analog Clock'
+ name: 'Label1'
+ layout: (LayoutFrame 15 0 16 0 128 0 38 0)
+ translateLabel: true
+ adjust: left
+ canUIDrag: false
)
- #(#LabelSpec
- #label: 'Number Display'
- #name: 'Label2'
- #layout: #(#LayoutFrame 142 0 16 0 270 0 38 0)
- #translateLabel: true
- #adjust: #left
- #canUIDrag: false
+ (LabelSpec
+ label: 'Number Display'
+ name: 'Label2'
+ layout: (LayoutFrame 142 0 16 0 270 0 38 0)
+ translateLabel: true
+ adjust: left
+ canUIDrag: false
)
- #(#LabelSpec
- #label: 'Digital Clock'
- #name: 'Label3'
- #layout: #(#LayoutFrame 15 0 155 0 128 0 177 0)
- #translateLabel: true
- #adjust: #left
- #canUIDrag: false
+ (LabelSpec
+ label: 'Digital Clock'
+ name: 'Label3'
+ layout: (LayoutFrame 15 0 155 0 128 0 177 0)
+ translateLabel: true
+ adjust: left
+ canUIDrag: false
)
- #(#MeterWidgetSpec
- #name: 'Meter Widget'
- #layout: #(#Rectangle 143 99 259 216)
- #model: #meterValue
+ (MeterWidgetSpec
+ name: 'Meter Widget'
+ layout: (Rectangle 143 99 259 216)
+ model: meterValue
)
- #(#LabelSpec
- #label: 'Meter Widget'
- #name: 'Label4'
- #layout: #(#LayoutFrame 142 0 77 0 269 0 99 0)
- #translateLabel: true
- #canUIDrag: false
+ (LabelSpec
+ label: 'Meter Widget'
+ name: 'Label4'
+ layout: (LayoutFrame 142 0 77 0 269 0 99 0)
+ translateLabel: true
+ canUIDrag: false
)
- #(#MeterClackCounterSpec
- #name: 'Meter Clack Counter'
- #layout: #(#Rectangle 291 40 387 72)
- #model: #model
+ (MeterClackCounterSpec
+ name: 'Meter Clack Counter'
+ layout: (Rectangle 291 40 387 72)
+ model: model
)
- #(#LabelSpec
- #label: 'Meter Clack Counter'
- #name: 'Label5'
- #layout: #(#LayoutFrame 290 0 16 0 417 0 38 0)
- #translateLabel: true
- #adjust: #left
- #canUIDrag: false
+ (LabelSpec
+ label: 'Meter Clack Counter'
+ name: 'Label5'
+ layout: (LayoutFrame 290 0 16 0 417 0 38 0)
+ translateLabel: true
+ adjust: left
+ canUIDrag: false
)
)