--- a/MenuEditor.st Tue Jun 29 19:55:52 1999 +0200
+++ b/MenuEditor.st Fri Jul 02 11:21:20 1999 +0200
@@ -179,7 +179,7 @@
'An argument passed to above selector, if it is a 1 or a 2 argument selector.'
#basicsChoice
-'A boolean holder, a boolean block, or a boolean method, specifying the choices state.'
+'A boolean holder, block or method, specifying the choices state (like a RadioButtonGroup).'
#basicsChoiceValue
'That choices value (typically number or symbol).'
@@ -351,201 +351,213 @@
<resource: #canvas>
- ^
-
- #(#FullSpec
- #window:
- #(#WindowSpec
- #name: 'Basics Item'
- #layout: #(#LayoutFrame 216 0 173 0 482 0 491 0)
- #label: 'Basics Item'
- #min: #(#Point 10 10)
- #max: #(#Point 1160 870)
- #bounds: #(#Rectangle 216 173 483 492)
- #usePreferredExtent: false
- )
- #component:
- #(#SpecCollection
- #collection:
- #(
- #(#LabelSpec
- #name: 'nameKeyLabel'
- #layout: #(#AlignmentOrigin 107 0 26 0 1 0.5)
- #activeHelpKey: #basicsKey
- #label: 'Name Key:'
- #adjust: #right
- #resizeForLabel: true
- )
- #(#InputFieldSpec
- #name: 'nameKeyField'
- #layout: #(#LayoutFrame 110 0 15 0 -5 1.0 37 0)
- #activeHelpKey: #basicsKey
- #tabable: true
- #model: #nameKey
- #group: #inputGroup
- #type: #symbolOrNil
- #acceptOnReturn: false
- #acceptOnTab: false
- #acceptOnLostFocus: true
- #modifiedChannel: #modifiedChannel
- #acceptChannel: #acceptChannel
- )
- #(#LabelSpec
- #name: 'labelLabel'
- #layout: #(#AlignmentOrigin 107 0 51 0 1 0.5)
- #activeHelpKey: #basicsLabel
- #label: 'Label:'
- #adjust: #right
- #resizeForLabel: true
- )
- #(#InputFieldSpec
- #name: 'labelField'
- #layout: #(#LayoutFrame 110 0 40 0 -5 1.0 62 0)
- #activeHelpKey: #basicsLabel
- #tabable: true
- #model: #label
- #group: #inputGroup
- #acceptOnReturn: false
- #acceptOnTab: false
- #acceptOnLostFocus: true
- #modifiedChannel: #modifiedChannel
- #acceptChannel: #acceptChannel
- )
- #(#LabelSpec
- #name: 'valueLabel'
- #layout: #(#AlignmentOrigin 107 0 90 0 1 0.5)
- #activeHelpKey: #basicsAction
- #label: 'Action:'
- #adjust: #right
- #resizeForLabel: true
- )
- #(#InputFieldSpec
- #name: 'valueField'
- #layout: #(#LayoutFrame 110 0 79 0 -5 1.0 101 0)
- #activeHelpKey: #basicsAction
- #tabable: true
- #model: #value
- #group: #inputGroup
- #type: #symbolOrNil
- #acceptOnReturn: false
- #acceptOnTab: false
- #acceptOnLostFocus: true
- #modifiedChannel: #modifiedChannel
- #acceptChannel: #acceptChannel
- )
- #(#LabelSpec
- #name: 'argumentLabel'
- #layout: #(#AlignmentOrigin 107 0 115 0 1 0.5)
- #activeHelpKey: #basicsArgument
- #label: 'Argument:'
- #adjust: #right
- #resizeForLabel: true
- )
- #(#InputFieldSpec
- #name: 'argumentField'
- #layout: #(#LayoutFrame 110 0 104 0 -5 1.0 126 0)
- #activeHelpKey: #basicsArgument
- #tabable: true
- #model: #argument
- #group: #inputGroup
- #type: #string
- #acceptOnReturn: false
- #acceptOnTab: false
- #acceptOnLostFocus: true
- #modifiedChannel: #modifiedChannel
- #acceptChannel: #acceptChannel
- )
- #(#LabelSpec
- #name: 'indicationLabel'
- #layout: #(#AlignmentOrigin 107 0 155 0 1 0.5)
- #activeHelpKey: #basicsIndication
- #label: 'Indication:'
- #adjust: #right
- #resizeForLabel: true
- )
- #(#InputFieldSpec
- #name: 'indicationField'
- #layout: #(#LayoutFrame 110 0 144 0 -5 1.0 166 0)
- #activeHelpKey: #basicsIndication
- #enableChannel: #indicationEnabled
- #tabable: true
- #model: #indication
- #group: #inputGroup
- #type: #symbolOrNil
- #acceptOnReturn: false
- #acceptOnTab: false
- #acceptOnLostFocus: true
- #modifiedChannel: #modifiedChannel
- #acceptChannel: #acceptChannel
- )
- #(#LabelSpec
- #name: 'choiceLabel'
- #layout: #(#AlignmentOrigin 107 0 180 0 1 0.5)
- #activeHelpKey: #basicsChoice
- #label: 'Choice:'
- #translateLabel: true
- #adjust: #right
- #resizeForLabel: true
- )
- #(#InputFieldSpec
- #name: 'choiceField'
- #layout: #(#LayoutFrame 110 0 169 0 -5 1.0 191 0)
- #activeHelpKey: #basicsChoice
- #enableChannel: #choiceEnabled
- #tabable: true
- #model: #choice
- #group: #inputGroup
- #type: #symbolOrNil
- #acceptOnReturn: false
- #acceptOnTab: false
- #acceptOnLostFocus: true
- #modifiedChannel: #modifiedChannel
- #acceptChannel: #acceptChannel
- )
- #(#LabelSpec
- #name: 'choiceValueLabel'
- #layout: #(#AlignmentOrigin 107 0 205 0 1 0.5)
- #activeHelpKey: #basicsChoiceValue
- #label: 'Value:'
- #translateLabel: true
- #adjust: #right
- #resizeForLabel: true
- )
- #(#InputFieldSpec
- #name: 'choiceValueField'
- #layout: #(#LayoutFrame 110 0 194 0 -5 1.0 216 0)
- #activeHelpKey: #basicsChoiceValue
- #enableChannel: #choiceValueEnabled
- #tabable: true
- #model: #choiceValue
- #group: #inputGroup
- #type: #smalltalkObject
- #immediateAccept: false
- #acceptOnLeave: true
- #acceptOnReturn: true
- #acceptOnTab: true
- #acceptOnLostFocus: true
- #modifiedChannel: #modifiedChannel
- #acceptChannel: #acceptChannel
- )
- #(#CheckBoxSpec
- #name: 'translateLabelCheckBox'
- #layout: #(#Point 20 230)
- #activeHelpKey: #basicsTranslateLabel
- #tabable: true
- #model: #translateLabel
- #label: 'Translate Label'
- )
- #(#CheckBoxSpec
- #name: 'isButtonCheckBox'
- #layout: #(#Point 20 259)
- #activeHelpKey: #basicsIsButton
- #tabable: true
- #model: #isButton
- #label: 'Is Button'
- )
- )
- )
+ ^
+ #(#FullSpec
+ #name: #basicsItemSpec
+ #window:
+ #(#WindowSpec
+ #label: 'Basics Item'
+ #name: 'Basics Item'
+ #layout: #(#LayoutFrame 40 0 116 0 306 0 434 0)
+ #level: 0
+ #min: #(#Point 10 10)
+ #max: #(#Point 1160 870)
+ #bounds: #(#Rectangle 40 116 307 435)
+ #usePreferredExtent: false
+ #returnIsOKInDialog: true
+ #escapeIsCancelInDialog: true
+ )
+ #component:
+ #(#SpecCollection
+ #collection: #(
+ #(#LabelSpec
+ #label: 'Name Key:'
+ #name: 'nameKeyLabel'
+ #layout: #(#AlignmentOrigin 107 0 26 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
+ #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
+ )
+ #(#InputFieldSpec
+ #name: 'labelField'
+ #layout: #(#LayoutFrame 110 0 40 0 -5 1.0 62 0)
+ #activeHelpKey: #basicsLabel
+ #tabable: true
+ #model: #label
+ #group: #inputGroup
+ #acceptOnReturn: true
+ #acceptOnTab: true
+ #acceptOnLostFocus: false
+ #acceptChannel: #acceptChannel
+ #modifiedChannel: #modifiedChannel
+ #acceptOnPointerLeave: false
+ )
+ #(#LabelSpec
+ #label: 'Action:'
+ #name: 'valueLabel'
+ #layout: #(#AlignmentOrigin 107 0 90 0 1 0.5)
+ #activeHelpKey: #basicsAction
+ #resizeForLabel: true
+ #adjust: #right
+ )
+ #(#InputFieldSpec
+ #name: 'valueField'
+ #layout: #(#LayoutFrame 110 0 79 0 -5 1.0 101 0)
+ #activeHelpKey: #basicsAction
+ #tabable: true
+ #model: #value
+ #group: #inputGroup
+ #type: #symbolOrNil
+ #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: #basicsArgument
+ #resizeForLabel: true
+ #adjust: #right
+ )
+ #(#InputFieldSpec
+ #name: 'argumentField'
+ #layout: #(#LayoutFrame 110 0 104 0 -5 1.0 126 0)
+ #activeHelpKey: #basicsArgument
+ #tabable: true
+ #model: #argument
+ #group: #inputGroup
+ #type: #string
+ #acceptOnReturn: true
+ #acceptOnTab: true
+ #acceptOnLostFocus: false
+ #acceptChannel: #acceptChannel
+ #modifiedChannel: #modifiedChannel
+ #acceptOnPointerLeave: false
+ )
+ #(#LabelSpec
+ #label: 'Indication:'
+ #name: 'indicationLabel'
+ #layout: #(#AlignmentOrigin 107 0 155 0 1 0.5)
+ #activeHelpKey: #basicsIndication
+ #resizeForLabel: true
+ #adjust: #right
+ )
+ #(#InputFieldSpec
+ #name: 'indicationField'
+ #layout: #(#LayoutFrame 110 0 144 0 -5 1.0 166 0)
+ #activeHelpKey: #basicsIndication
+ #enableChannel: #indicationEnabled
+ #tabable: true
+ #model: #indication
+ #group: #inputGroup
+ #type: #symbolOrNil
+ #immediateAccept: true
+ #acceptOnReturn: true
+ #acceptOnTab: true
+ #acceptOnLostFocus: false
+ #acceptChannel: #acceptChannel
+ #modifiedChannel: #modifiedChannel
+ #acceptOnPointerLeave: false
+ )
+ #(#LabelSpec
+ #label: 'Choice:'
+ #name: 'choiceLabel'
+ #layout: #(#AlignmentOrigin 107 0 180 0 1 0.5)
+ #activeHelpKey: #basicsChoice
+ #translateLabel: true
+ #resizeForLabel: true
+ #adjust: #right
+ )
+ #(#InputFieldSpec
+ #name: 'choiceField'
+ #layout: #(#LayoutFrame 110 0 169 0 -5 1.0 191 0)
+ #activeHelpKey: #basicsChoice
+ #enableChannel: #choiceEnabled
+ #tabable: true
+ #model: #choice
+ #group: #inputGroup
+ #type: #symbolOrNil
+ #immediateAccept: true
+ #acceptOnReturn: true
+ #acceptOnTab: true
+ #acceptOnLostFocus: false
+ #acceptChannel: #acceptChannel
+ #modifiedChannel: #modifiedChannel
+ #acceptOnPointerLeave: false
+ )
+ #(#LabelSpec
+ #label: 'Value:'
+ #name: 'choiceValueLabel'
+ #layout: #(#AlignmentOrigin 107 0 205 0 1 0.5)
+ #activeHelpKey: #basicsChoiceValue
+ #translateLabel: true
+ #resizeForLabel: true
+ #adjust: #right
+ )
+ #(#InputFieldSpec
+ #name: 'choiceValueField'
+ #layout: #(#LayoutFrame 110 0 194 0 -5 1.0 216 0)
+ #activeHelpKey: #basicsChoiceValue
+ #enableChannel: #choiceValueEnabled
+ #tabable: true
+ #model: #choiceValue
+ #group: #inputGroup
+ #type: #smalltalkObject
+ #acceptOnLeave: false
+ #acceptOnReturn: true
+ #acceptOnTab: true
+ #acceptOnLostFocus: false
+ #acceptChannel: #acceptChannel
+ #modifiedChannel: #modifiedChannel
+ #acceptOnPointerLeave: false
+ )
+ #(#CheckBoxSpec
+ #label: 'Translate Label'
+ #name: 'translateLabelCheckBox'
+ #layout: #(#Point 20 230)
+ #activeHelpKey: #basicsTranslateLabel
+ #tabable: true
+ #model: #translateLabel
+ )
+ #(#CheckBoxSpec
+ #label: 'Is Button'
+ #name: 'isButtonCheckBox'
+ #layout: #(#Point 20 259)
+ #activeHelpKey: #basicsIsButton
+ #tabable: true
+ #model: #isButton
+ )
+ )
+
+ )
)
!
@@ -563,112 +575,117 @@
<resource: #canvas>
- ^
-
- #(#FullSpec
- #window:
- #(#WindowSpec
- #name: 'Basics Link'
- #layout: #(#LayoutFrame 473 0 301 0 739 0 619 0)
- #label: 'Basics Link'
- #min: #(#Point 10 10)
- #max: #(#Point 1280 1024)
- #bounds: #(#Rectangle 473 301 740 620)
- #usePreferredExtent: false
- )
- #component:
- #(#SpecCollection
- #collection:
- #(
- #(#LabelSpec
- #name: 'nameKeyLabel'
- #layout: #(#AlignmentOrigin 107 0 26 0 1 0.5)
- #activeHelpKey: #nameKey
- #label: 'Name Key:'
- #adjust: #right
- #resizeForLabel: true
- )
- #(#InputFieldSpec
- #name: 'nameKeyField'
- #layout: #(#LayoutFrame 110 0 15 0 -5 1.0 37 0)
- #activeHelpKey: #basicsNameKey
- #tabable: true
- #model: #nameKey
- #type: #symbolOrNil
- #acceptOnReturn: false
- #acceptOnTab: false
- #group: #inputGroup
- #modifiedChannel: #modifiedChannel
- #acceptChannel: #acceptChannel
- )
- #(#LabelSpec
- #name: 'labelLabel'
- #layout: #(#AlignmentOrigin 107 0 51 0 1 0.5)
- #label: 'Label:'
- #resizeForLabel: true
- )
- #(#InputFieldSpec
- #name: 'labelField'
- #layout: #(#LayoutFrame 110 0 40 0 -5 1.0 62 0)
- #activeHelpKey: #basicsLabel
- #tabable: true
- #model: #label
- #acceptOnReturn: false
- #acceptOnTab: false
- #group: #inputGroup
- #modifiedChannel: #modifiedChannel
- #acceptChannel: #acceptChannel
- )
- #(#LabelSpec
- #name: 'menuLabel'
- #layout: #(#AlignmentOrigin 107 0 76 0 1 0.5)
- #label: 'Menu:'
- #resizeForLabel: true
- )
- #(#InputFieldSpec
- #name: 'menuField'
- #layout: #(#LayoutFrame 110 0 65 0 -5 1.0 87 0)
- #activeHelpKey: #basicsMenu
- #tabable: true
- #model: #submenuChannel
- #type: #symbolOrNil
- #acceptOnReturn: false
- #acceptOnTab: false
- #group: #inputGroup
- #modifiedChannel: #modifiedChannel
- #acceptChannel: #acceptChannel
- )
- #(#LabelSpec
- #name: 'ArgumentLabel'
- #layout: #(#AlignmentOrigin 107 0 100 0 1 0.5)
- #label: 'Argument:'
- #resizeForLabel: true
- )
- #(#InputFieldSpec
- #name: 'argumentField'
- #layout: #(#LayoutFrame 110 0 90 0 -5 1.0 112 0)
- #activeHelpKey: #basicsMenuArgument
- #tabable: true
- #model: #argument
- #acceptOnReturn: false
- #acceptOnTab: false
- #group: #inputGroup
- #modifiedChannel: #modifiedChannel
- #acceptChannel: #acceptChannel
- )
- #(#CheckBoxSpec
- #name: 'translateLabelCheckBox'
- #layout: #(#Point 20 190)
- #activeHelpKey: #basicsTranslateLabel
- #tabable: true
- #model: #translateLabel
- #label: 'Translate Label'
- )
- )
- )
+ ^
+ #(#FullSpec
+ #name: #basicsLinkSpec
+ #window:
+ #(#WindowSpec
+ #label: 'Basics Link'
+ #name: 'Basics Link'
+ #layout: #(#LayoutFrame 8 0 143 0 274 0 461 0)
+ #level: 0
+ #min: #(#Point 10 10)
+ #max: #(#Point 1280 1024)
+ #bounds: #(#Rectangle 8 143 275 462)
+ #usePreferredExtent: false
+ #returnIsOKInDialog: true
+ #escapeIsCancelInDialog: true
+ )
+ #component:
+ #(#SpecCollection
+ #collection: #(
+ #(#LabelSpec
+ #label: 'Name Key:'
+ #name: 'nameKeyLabel'
+ #layout: #(#AlignmentOrigin 107 0 26 0 1 0.5)
+ #activeHelpKey: #nameKey
+ #resizeForLabel: true
+ #adjust: #right
+ )
+ #(#InputFieldSpec
+ #name: 'nameKeyField'
+ #layout: #(#LayoutFrame 110 0 15 0 -5 1.0 37 0)
+ #activeHelpKey: #basicsNameKey
+ #tabable: true
+ #model: #nameKey
+ #group: #inputGroup
+ #type: #symbolOrNil
+ #acceptOnReturn: true
+ #acceptOnTab: true
+ #acceptChannel: #acceptChannel
+ #modifiedChannel: #modifiedChannel
+ #acceptOnPointerLeave: false
+ )
+ #(#LabelSpec
+ #label: 'Label:'
+ #name: 'labelLabel'
+ #layout: #(#AlignmentOrigin 107 0 51 0 1 0.5)
+ #resizeForLabel: true
+ )
+ #(#InputFieldSpec
+ #name: 'labelField'
+ #layout: #(#LayoutFrame 110 0 40 0 -5 1.0 62 0)
+ #activeHelpKey: #basicsLabel
+ #tabable: true
+ #model: #label
+ #group: #inputGroup
+ #acceptOnReturn: true
+ #acceptOnTab: true
+ #acceptChannel: #acceptChannel
+ #modifiedChannel: #modifiedChannel
+ #acceptOnPointerLeave: false
+ )
+ #(#LabelSpec
+ #label: 'Menu:'
+ #name: 'menuLabel'
+ #layout: #(#AlignmentOrigin 107 0 76 0 1 0.5)
+ #resizeForLabel: true
+ )
+ #(#InputFieldSpec
+ #name: 'menuField'
+ #layout: #(#LayoutFrame 110 0 65 0 -5 1.0 87 0)
+ #activeHelpKey: #basicsMenu
+ #tabable: true
+ #model: #submenuChannel
+ #group: #inputGroup
+ #type: #symbolOrNil
+ #acceptOnReturn: true
+ #acceptOnTab: true
+ #acceptChannel: #acceptChannel
+ #modifiedChannel: #modifiedChannel
+ #acceptOnPointerLeave: false
+ )
+ #(#LabelSpec
+ #label: 'Argument:'
+ #name: 'ArgumentLabel'
+ #layout: #(#AlignmentOrigin 107 0 100 0 1 0.5)
+ #resizeForLabel: true
+ )
+ #(#InputFieldSpec
+ #name: 'argumentField'
+ #layout: #(#LayoutFrame 110 0 90 0 -5 1.0 112 0)
+ #activeHelpKey: #basicsMenuArgument
+ #tabable: true
+ #model: #argument
+ #group: #inputGroup
+ #acceptOnReturn: true
+ #acceptOnTab: true
+ #acceptChannel: #acceptChannel
+ #modifiedChannel: #modifiedChannel
+ #acceptOnPointerLeave: false
+ )
+ #(#CheckBoxSpec
+ #label: 'Translate Label'
+ #name: 'translateLabelCheckBox'
+ #layout: #(#Point 20 190)
+ #activeHelpKey: #basicsTranslateLabel
+ #tabable: true
+ #model: #translateLabel
+ )
+ )
+
+ )
)
-
- "Modified: / 31.7.1998 / 01:18:16 / cg"
!
basicsMenuSpec
@@ -685,75 +702,78 @@
<resource: #canvas>
- ^
-
- #(#FullSpec
- #window:
- #(#WindowSpec
- #name: 'Basics Menu'
- #layout: #(#LayoutFrame 473 0 301 0 739 0 619 0)
- #label: 'Basics Menu'
- #min: #(#Point 10 10)
- #max: #(#Point 1280 1024)
- #bounds: #(#Rectangle 473 301 740 620)
- #usePreferredExtent: false
- )
- #component:
- #(#SpecCollection
- #collection:
- #(
- #(#LabelSpec
- #name: 'nameKeyLabel'
- #layout: #(#AlignmentOrigin 107 0 26 0 1 0.5)
- #label: 'Name Key:'
- #adjust: #right
- #resizeForLabel: true
- )
- #(#InputFieldSpec
- #name: 'nameKeyField'
- #layout: #(#LayoutFrame 110 0 15 0 -5 1.0 37 0)
- #activeHelpKey: #basicsNameKey
- #tabable: true
- #model: #nameKey
- #type: #symbolOrNil
- #acceptOnReturn: false
- #acceptOnTab: false
- #group: #inputGroup
- #modifiedChannel: #modifiedChannel
- #acceptChannel: #acceptChannel
- )
- #(#LabelSpec
- #name: 'labelLabel'
- #layout: #(#AlignmentOrigin 107 0 51 0 1 0.5)
- #label: 'Label:'
- #adjust: #right
- #resizeForLabel: true
- )
- #(#InputFieldSpec
- #name: 'labelField'
- #layout: #(#LayoutFrame 110 0 40 0 -5 1.0 62 0)
- #activeHelpKey: #basicsLabel
- #tabable: true
- #model: #label
- #acceptOnReturn: false
- #acceptOnTab: false
- #group: #inputGroup
- #modifiedChannel: #modifiedChannel
- #acceptChannel: #acceptChannel
- )
- #(#CheckBoxSpec
- #name: 'translateLabelCheckBox'
- #layout: #(#Point 20 190)
- #activeHelpKey: #basicsTranslateLabel
- #tabable: true
- #model: #translateLabel
- #label: 'Translate Label'
- )
- )
- )
+ ^
+ #(#FullSpec
+ #name: #basicsMenuSpec
+ #window:
+ #(#WindowSpec
+ #label: 'Basics Menu'
+ #name: 'Basics Menu'
+ #layout: #(#LayoutFrame 50 0 134 0 316 0 452 0)
+ #level: 0
+ #min: #(#Point 10 10)
+ #max: #(#Point 1280 1024)
+ #bounds: #(#Rectangle 50 134 317 453)
+ #usePreferredExtent: false
+ #returnIsOKInDialog: true
+ #escapeIsCancelInDialog: true
+ )
+ #component:
+ #(#SpecCollection
+ #collection: #(
+ #(#LabelSpec
+ #label: 'Name Key:'
+ #name: 'nameKeyLabel'
+ #layout: #(#AlignmentOrigin 107 0 26 0 1 0.5)
+ #resizeForLabel: true
+ #adjust: #right
+ )
+ #(#InputFieldSpec
+ #name: 'nameKeyField'
+ #layout: #(#LayoutFrame 110 0 15 0 -5 1.0 37 0)
+ #activeHelpKey: #basicsNameKey
+ #tabable: true
+ #model: #nameKey
+ #group: #inputGroup
+ #type: #symbolOrNil
+ #acceptOnReturn: true
+ #acceptOnTab: true
+ #acceptChannel: #acceptChannel
+ #modifiedChannel: #modifiedChannel
+ #acceptOnPointerLeave: false
+ )
+ #(#LabelSpec
+ #label: 'Label:'
+ #name: 'labelLabel'
+ #layout: #(#AlignmentOrigin 107 0 51 0 1 0.5)
+ #resizeForLabel: true
+ #adjust: #right
+ )
+ #(#InputFieldSpec
+ #name: 'labelField'
+ #layout: #(#LayoutFrame 110 0 40 0 -5 1.0 62 0)
+ #activeHelpKey: #basicsLabel
+ #tabable: true
+ #model: #label
+ #group: #inputGroup
+ #acceptOnReturn: true
+ #acceptOnTab: true
+ #acceptChannel: #acceptChannel
+ #modifiedChannel: #modifiedChannel
+ #acceptOnPointerLeave: false
+ )
+ #(#CheckBoxSpec
+ #label: 'Translate Label'
+ #name: 'translateLabelCheckBox'
+ #layout: #(#Point 20 190)
+ #activeHelpKey: #basicsTranslateLabel
+ #tabable: true
+ #model: #translateLabel
+ )
+ )
+
+ )
)
-
- "Modified: / 31.7.1998 / 01:18:23 / cg"
!
basicsRootSpec
@@ -770,47 +790,49 @@
<resource: #canvas>
- ^
-
- #(#FullSpec
- #window:
- #(#WindowSpec
- #name: 'Basics Root'
- #layout: #(#LayoutFrame 473 0 301 0 739 0 619 0)
- #label: 'Basics Root'
- #min: #(#Point 10 10)
- #max: #(#Point 1280 1024)
- #bounds: #(#Rectangle 473 301 740 620)
- #usePreferredExtent: false
- )
- #component:
- #(#SpecCollection
- #collection:
- #(
- #(#LabelSpec
- #name: 'selectorLabel'
- #layout: #(#AlignmentOrigin 107 0 26 0 1 0.5)
- #label: 'Selector:'
- #adjust: #right
- #resizeForLabel: true
- )
- #(#InputFieldSpec
- #name: 'selectorField'
- #layout: #(#LayoutFrame 110 0 15 0 -5 1.0 37 0)
- #activeHelpKey: #basicsSelector
- #tabable: true
- #model: #label
- #acceptOnReturn: false
- #acceptOnTab: false
- #group: #inputGroup
- #modifiedChannel: #modifiedChannel
- #acceptChannel: #acceptChannel
- )
- )
- )
+ ^
+ #(#FullSpec
+ #name: #basicsRootSpec
+ #window:
+ #(#WindowSpec
+ #label: 'Basics Root'
+ #name: 'Basics Root'
+ #layout: #(#LayoutFrame 11 0 100 0 277 0 418 0)
+ #level: 0
+ #min: #(#Point 10 10)
+ #max: #(#Point 1280 1024)
+ #bounds: #(#Rectangle 11 100 278 419)
+ #usePreferredExtent: false
+ #returnIsOKInDialog: true
+ #escapeIsCancelInDialog: true
+ )
+ #component:
+ #(#SpecCollection
+ #collection: #(
+ #(#LabelSpec
+ #label: 'Selector:'
+ #name: 'selectorLabel'
+ #layout: #(#AlignmentOrigin 107 0 26 0 1 0.5)
+ #resizeForLabel: true
+ #adjust: #right
+ )
+ #(#InputFieldSpec
+ #name: 'selectorField'
+ #layout: #(#LayoutFrame 110 0 15 0 -5 1.0 37 0)
+ #activeHelpKey: #basicsSelector
+ #tabable: true
+ #model: #label
+ #group: #inputGroup
+ #acceptOnReturn: true
+ #acceptOnTab: true
+ #acceptChannel: #acceptChannel
+ #modifiedChannel: #modifiedChannel
+ #acceptOnPointerLeave: false
+ )
+ )
+
+ )
)
-
- "Modified: / 31.7.1998 / 01:18:28 / cg"
!
basicsSeparatorSpec
@@ -827,63 +849,65 @@
<resource: #canvas>
- ^
-
- #(#FullSpec
- #window:
- #(#WindowSpec
- #name: 'Basics Separator'
- #layout: #(#LayoutFrame 473 0 301 0 739 0 619 0)
- #label: 'Basics Separator'
- #min: #(#Point 10 10)
- #max: #(#Point 1160 870)
- #bounds: #(#Rectangle 473 301 740 620)
- #usePreferredExtent: false
- )
- #component:
- #(#SpecCollection
- #collection:
- #(
- #(#LabelSpec
- #name: 'separatorLabel'
- #layout: #(#AlignmentOrigin 127 0 26 0 1 0.5)
- #label: 'Separator Type:'
- #adjust: #right
- #resizeForLabel: true
- )
- #(#ComboListSpec
- #name: 'seperatorList'
- #layout: #(#LayoutFrame 132 0 15 0 -5 1.0 37 0)
- #activeHelpKey: #basicsSeparatorType
- #tabable: true
- #model: #seperatorSelection
- #useIndex: true
- )
- #(#LabelSpec
- #name: 'visibilityLabel'
- #layout: #(#AlignmentOrigin 127 0 76 0 1 0.5)
- #label: 'Visibility:'
- #adjust: #right
- #resizeForLabel: true
- )
- #(#InputFieldSpec
- #name: 'visibilityInputField'
- #layout: #(#LayoutFrame 132 0 65 0 -5 1.0 87 0)
- #activeHelpKey: #detailsVisibility
- #tabable: true
- #model: #isVisible
- #type: #symbolOrNil
- #acceptOnReturn: false
- #acceptOnTab: false
- #group: #inputGroup
- #modifiedChannel: #modifiedChannel
- #acceptChannel: #acceptChannel
- )
- )
- )
+ ^
+ #(#FullSpec
+ #name: #basicsSeparatorSpec
+ #window:
+ #(#WindowSpec
+ #label: 'Basics Separator'
+ #name: 'Basics Separator'
+ #layout: #(#LayoutFrame 9 0 149 0 275 0 467 0)
+ #level: 0
+ #min: #(#Point 10 10)
+ #max: #(#Point 1160 870)
+ #bounds: #(#Rectangle 9 149 276 468)
+ #usePreferredExtent: false
+ #returnIsOKInDialog: true
+ #escapeIsCancelInDialog: true
+ )
+ #component:
+ #(#SpecCollection
+ #collection: #(
+ #(#LabelSpec
+ #label: 'Separator Type:'
+ #name: 'separatorLabel'
+ #layout: #(#AlignmentOrigin 127 0 26 0 1 0.5)
+ #resizeForLabel: true
+ #adjust: #right
+ )
+ #(#ComboListSpec
+ #name: 'seperatorList'
+ #layout: #(#LayoutFrame 132 0 15 0 -5 1.0 37 0)
+ #activeHelpKey: #basicsSeparatorType
+ #tabable: true
+ #model: #seperatorSelection
+ #useIndex: true
+ )
+ #(#LabelSpec
+ #label: 'Visibility:'
+ #name: 'visibilityLabel'
+ #layout: #(#AlignmentOrigin 127 0 76 0 1 0.5)
+ #resizeForLabel: true
+ #adjust: #right
+ )
+ #(#InputFieldSpec
+ #name: 'visibilityInputField'
+ #layout: #(#LayoutFrame 132 0 65 0 -5 1.0 87 0)
+ #activeHelpKey: #detailsVisibility
+ #tabable: true
+ #model: #isVisible
+ #group: #inputGroup
+ #type: #symbolOrNil
+ #acceptOnReturn: true
+ #acceptOnTab: true
+ #acceptChannel: #acceptChannel
+ #modifiedChannel: #modifiedChannel
+ #acceptOnPointerLeave: false
+ )
+ )
+
+ )
)
-
- "Modified: / 31.7.1998 / 01:18:32 / cg"
!
detailsEditSpec
@@ -900,133 +924,139 @@
<resource: #canvas>
- ^
-
- #(#FullSpec
- #window:
- #(#WindowSpec
- #name: 'Details Edit'
- #layout: #(#LayoutFrame 332 0 374 0 590 0 661 0)
- #label: 'Details Edit'
- #min: #(#Point 10 10)
- #max: #(#Point 1280 1024)
- #bounds: #(#Rectangle 332 374 591 662)
- #usePreferredExtent: false
- )
- #component:
- #(#SpecCollection
- #collection:
- #(
- #(#LabelSpec
- #name: 'shortcutKeyLabel'
- #layout: #(#AlignmentOrigin 107 0 26 0 1 0.5)
- #activeHelpKey: #detailsAccelerator
- #label: 'Accelerator:'
- #adjust: #right
- #resizeForLabel: true
- )
- #(#InputFieldSpec
- #name: 'shortcutKeyField'
- #layout: #(#LayoutFrame 110 0 15 0 -5 1.0 37 0)
- #activeHelpKey: #detailsAccelerator
- #tabable: true
- #model: #shortcutKey
- #type: #symbolOrNil
- #acceptOnReturn: false
- #acceptOnTab: false
- #group: #inputGroup
- #modifiedChannel: #modifiedChannel
- #acceptChannel: #acceptChannel
- )
- #(#LabelSpec
- #name: 'enabledLabel'
- #layout: #(#AlignmentOrigin 107 0 51 0 1 0.5)
- #activeHelpKey: #detailsEnabled
- #label: 'Enabled:'
- #adjust: #right
- #resizeForLabel: true
- )
- #(#InputFieldSpec
- #name: 'enabledField'
- #layout: #(#LayoutFrame 110 0 40 0 -5 1.0 62 0)
- #activeHelpKey: #detailsEnabled
- #tabable: true
- #model: #enabled
- #type: #symbolOrNil
- #acceptOnReturn: false
- #acceptOnTab: false
- #group: #inputGroup
- #modifiedChannel: #modifiedChannel
- #acceptChannel: #acceptChannel
- )
- #(#LabelSpec
- #name: 'visibilityLabel'
- #layout: #(#AlignmentOrigin 107 0 76 0 1 0.5)
- #activeHelpKey: #detailsVisibility
- #label: 'Visibility:'
- #adjust: #right
- #resizeForLabel: true
- )
- #(#InputFieldSpec
- #name: 'isVisibleInputField'
- #layout: #(#LayoutFrame 110 0 65 0 -5 1.0 87 0)
- #activeHelpKey: #detailsVisibility
- #tabable: true
- #model: #isVisible
- #type: #symbolOrNil
- #acceptOnReturn: false
- #acceptOnTab: false
- #group: #inputGroup
- #modifiedChannel: #modifiedChannel
- #acceptChannel: #acceptChannel
- )
- #(#LabelSpec
- #name: 'StartGroupLabel'
- #layout: #(#AlignmentOrigin 107 0 111 0 1 0.5)
- #activeHelpKey: #detailsStartGroup
- #label: 'Start Group:'
- #adjust: #right
- #resizeForLabel: true
- )
- #(#PopUpListSpec
- #name: 'StartGroupPopUp'
- #activeHelpKey: #detailsStartGroup
- #layout: #(#LayoutFrame 110 0 100 0 -5 1.0 122 0)
- #label: 'PopUpList'
- #tabable: true
- #model: #startGroup
- #menu:
- #(nil
- #right
- )
- #useIndex: false
- )
- #(#LabelSpec
- #name: 'accessCharLabel'
- #layout: #(#AlignmentOrigin 217 0 142 0 1 0.5)
- #activeHelpKey: #detailsAccessCharaterPosition
- #label: 'Access Character Position:'
- #adjust: #right
- #resizeForLabel: true
- )
- #(#InputFieldSpec
- #name: 'accessCharField'
- #layout: #(#LayoutFrame 220 0 131 0 -5 1.0 153 0)
- #activeHelpKey: #detailsAccessCharaterPosition
- #tabable: true
- #model: #accessCharacterPos
- #type: #numberOrNil
- #acceptOnReturn: false
- #acceptOnTab: false
- #group: #inputGroup
- #modifiedChannel: #modifiedChannel
- #acceptChannel: #acceptChannel
- )
+ ^
+ #(#FullSpec
+ #name: #detailsEditSpec
+ #window:
+ #(#WindowSpec
+ #label: 'Details Edit'
+ #name: 'Details Edit'
+ #layout: #(#LayoutFrame 707 0 270 0 965 0 557 0)
+ #level: 0
+ #min: #(#Point 10 10)
+ #max: #(#Point 1280 1024)
+ #bounds: #(#Rectangle 707 270 966 558)
+ #usePreferredExtent: false
+ #returnIsOKInDialog: true
+ #escapeIsCancelInDialog: true
+ )
+ #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: #shortcutKey
+ #group: #inputGroup
+ #type: #symbolOrNil
+ #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
+ )
+ #(#InputFieldSpec
+ #name: 'enabledField'
+ #layout: #(#LayoutFrame 110 0 40 0 -5 1.0 62 0)
+ #activeHelpKey: #detailsEnabled
+ #tabable: true
+ #model: #enabled
+ #group: #inputGroup
+ #type: #symbolOrNil
+ #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
+ )
+ #(#InputFieldSpec
+ #name: 'isVisibleInputField'
+ #layout: #(#LayoutFrame 110 0 65 0 -5 1.0 87 0)
+ #activeHelpKey: #detailsVisibility
+ #tabable: true
+ #model: #isVisible
+ #group: #inputGroup
+ #type: #symbolOrNil
+ #acceptOnReturn: true
+ #acceptOnTab: true
+ #acceptChannel: #acceptChannel
+ #modifiedChannel: #modifiedChannel
+ #acceptOnPointerLeave: false
+ )
+ #(#LabelSpec
+ #label: 'Start Group:'
+ #name: 'StartGroupLabel'
+ #layout: #(#AlignmentOrigin 107 0 111 0 1 0.5)
+ #activeHelpKey: #detailsStartGroup
+ #resizeForLabel: true
+ #adjust: #right
+ )
+ #(#PopUpListSpec
+ #label: 'PopUpList'
+ #name: 'StartGroupPopUp'
+ #layout: #(#LayoutFrame 110 0 100 0 -5 1.0 122 0)
+ #activeHelpKey: #detailsStartGroup
+ #tabable: true
+ #model: #startGroup
+ #menu:
+ #(nil
+ #right
)
- )
+ #useIndex: false
+ )
+ #(#LabelSpec
+ #label: 'Access Character Position:'
+ #name: 'accessCharLabel'
+ #layout: #(#AlignmentOrigin 217 0 142 0 1 0.5)
+ #activeHelpKey: #detailsAccessCharaterPosition
+ #resizeForLabel: true
+ #adjust: #right
+ )
+ #(#InputFieldSpec
+ #name: 'accessCharField'
+ #layout: #(#LayoutFrame 220 0 131 0 -5 1.0 153 0)
+ #activeHelpKey: #detailsAccessCharaterPosition
+ #tabable: true
+ #model: #accessCharacterPos
+ #group: #inputGroup
+ #type: #numberOrNil
+ #immediateAccept: false
+ #acceptOnReturn: true
+ #acceptOnTab: true
+ #acceptChannel: #acceptChannel
+ #modifiedChannel: #modifiedChannel
+ #acceptOnPointerLeave: false
+ )
+ )
+
+ )
)
-
- "Modified: / 18.8.1998 / 16:16:46 / cg"
!
imageEditSpec
@@ -1043,102 +1073,108 @@
<resource: #canvas>
- ^
-
- #(#FullSpec
- #window:
- #(#WindowSpec
- #name: 'Image Item'
- #layout: #(#LayoutFrame 25 0 119 0 420 0 395 0)
- #label: 'Image Item'
- #min: #(#Point 10 10)
- #max: #(#Point 1280 1024)
- #bounds: #(#Rectangle 25 119 421 396)
- #usePreferredExtent: false
- )
- #component:
- #(#SpecCollection
- #collection:
- #(
- #(#CheckBoxSpec
- #name: 'iconAndLabelCheckBox'
- #layout: #(#LayoutOrigin 20 0 215 0)
- #activeHelpKey: #imageImageAndLabel
- #tabable: true
- #model: #iconAndLabel
- #label: 'Image & Label'
- )
- #(#LabelSpec
- #name: 'retrieverLabel'
- #layout: #(#AlignmentOrigin 107 0 26 0 1 0.5)
- #activeHelpKey: #imageRetriever
- #label: 'Retriever:'
- #resizeForLabel: true
- #adjust: #right
- )
- #(#ComboBoxSpec
- #name: 'retrieverField'
- #layout: #(#LayoutFrame 110 0 15 0 0 1.0 37 0)
- #activeHelpKey: #imageRetriever
- #tabable: true
- #model: #retriever
- #type: #symbolOrNil
- #acceptOnReturn: false
- #acceptOnTab: false
- #comboList: #retrieverClassList
- )
- #(#LabelSpec
- #name: 'iconLabel'
- #layout: #(#AlignmentOrigin 107 0 51 0 1 0.5)
- #activeHelpKey: #imageSelector
- #label: 'Selector:'
- #resizeForLabel: true
- #adjust: #right
- )
- #(#InputFieldSpec
- #name: 'iconField'
- #layout: #(#LayoutFrame 110 0 40 0 -31 1.0 62 0)
- #activeHelpKey: #imageSelector
- #tabable: true
- #model: #icon
- #group: #inputGroup
- #type: #symbolOrNil
- #acceptOnReturn: false
- #modifiedChannel: #modifiedChannel
- #acceptOnTab: false
- #acceptChannel: #acceptChannel
- )
- #(#ActionButtonSpec
- #name: 'imageEditorButton'
- #layout: #(#LayoutFrame 19 0.6 128 0 -5 1 152 0)
- #activeHelpKey: #imageImageEditor
- #label: 'Image Editor'
- #tabable: true
- #model: #doEditImage
- )
- #(#SequenceViewSpec
- #name: 'systemOrUserImagesList'
- #layout: #(#LayoutFrame 22 0 67 0 11 0.6 200 0)
- #activeHelpKey: #imageImageList
- #model: #selectionOfImage
- #menu: #menuEditImage
- #hasHorizontalScrollBar: true
- #hasVerticalScrollBar: true
- #miniScrollerHorizontal: true
- #doubleClickSelector: #doEditImage
- #valueChangeSelector: #imageSelected
- #useIndex: false
- #sequenceList: #listOfImages
- )
- #(#ActionButtonSpec
- #name: 'browseButton'
- #layout: #(#LayoutFrame -26 1 41 0 -2 1 63 0)
- #activeHelpKey: #browseResource
- #label: '...'
- #model: #doBrowseForImageResource
- )
- )
- )
+ ^
+ #(#FullSpec
+ #name: #imageEditSpec
+ #window:
+ #(#WindowSpec
+ #label: 'Image Item'
+ #name: 'Image Item'
+ #layout: #(#LayoutFrame 21 0 108 0 416 0 384 0)
+ #level: 0
+ #min: #(#Point 10 10)
+ #max: #(#Point 1280 1024)
+ #bounds: #(#Rectangle 21 108 417 385)
+ #usePreferredExtent: false
+ #returnIsOKInDialog: true
+ #escapeIsCancelInDialog: true
+ )
+ #component:
+ #(#SpecCollection
+ #collection: #(
+ #(#CheckBoxSpec
+ #label: 'Image & Label'
+ #name: 'iconAndLabelCheckBox'
+ #layout: #(#LayoutOrigin 20 0 215 0)
+ #activeHelpKey: #imageImageAndLabel
+ #tabable: true
+ #model: #iconAndLabel
+ )
+ #(#LabelSpec
+ #label: 'Retriever:'
+ #name: 'retrieverLabel'
+ #layout: #(#AlignmentOrigin 107 0 26 0 1 0.5)
+ #activeHelpKey: #imageRetriever
+ #resizeForLabel: true
+ #adjust: #right
+ )
+ #(#ComboBoxSpec
+ #name: 'retrieverField'
+ #layout: #(#LayoutFrame 110 0 15 0 0 1.0 37 0)
+ #activeHelpKey: #imageRetriever
+ #tabable: true
+ #model: #retriever
+ #type: #symbolOrNil
+ #acceptOnReturn: true
+ #acceptOnTab: true
+ #acceptChannel: #acceptChannel
+ #acceptOnPointerLeave: false
+ #comboList: #retrieverClassList
+ )
+ #(#LabelSpec
+ #label: 'Selector:'
+ #name: 'iconLabel'
+ #layout: #(#AlignmentOrigin 107 0 51 0 1 0.5)
+ #activeHelpKey: #imageSelector
+ #resizeForLabel: true
+ #adjust: #right
+ )
+ #(#InputFieldSpec
+ #name: 'iconField'
+ #layout: #(#LayoutFrame 110 0 40 0 -31 1.0 62 0)
+ #activeHelpKey: #imageSelector
+ #tabable: true
+ #model: #icon
+ #group: #inputGroup
+ #type: #symbolOrNil
+ #acceptOnReturn: true
+ #acceptOnTab: true
+ #acceptChannel: #acceptChannel
+ #modifiedChannel: #modifiedChannel
+ #acceptOnPointerLeave: false
+ )
+ #(#ActionButtonSpec
+ #label: 'Image Editor'
+ #name: 'imageEditorButton'
+ #layout: #(#LayoutFrame 19 0.6 128 0 -5 1 152 0)
+ #activeHelpKey: #imageImageEditor
+ #tabable: true
+ #model: #doEditImage
+ )
+ #(#SequenceViewSpec
+ #name: 'systemOrUserImagesList'
+ #layout: #(#LayoutFrame 22 0 67 0 11 0.6 200 0)
+ #activeHelpKey: #imageImageList
+ #model: #selectionOfImage
+ #menu: #menuEditImage
+ #hasHorizontalScrollBar: true
+ #hasVerticalScrollBar: true
+ #miniScrollerHorizontal: true
+ #doubleClickSelector: #doEditImage
+ #valueChangeSelector: #imageSelected
+ #useIndex: false
+ #sequenceList: #listOfImages
+ )
+ #(#ActionButtonSpec
+ #label: '...'
+ #name: 'browseButton'
+ #layout: #(#LayoutFrame -26 1 41 0 -2 1 63 0)
+ #activeHelpKey: #browseResource
+ #model: #doBrowseForImageResource
+ )
+ )
+
+ )
)
!
@@ -2365,7 +2401,8 @@
]
].
self updateInfoLabel.
- self updateListAndSelectionOfImage
+ self updateListAndSelectionOfImage.
+
!
cancel
@@ -2375,7 +2412,7 @@
(node := self treeView selectedNode) notNil ifTrue:[
self helpTool helpKey:(self helpKey).
- aspects do:[:anAspect| anAspect value:nil].
+ aspects do:[:anAspect| anAspect value:'' ].
node contents toAspects:aspects
].
self valueOfEnablingCommitButtons value: false.