hg/stx-libtool2: comparison MenuEditor.st

equal deleted inserted replaced

-:14088f998b72
+:96728cae02c4
 #basicsArgument
 'An argument passed to above selector, if it is a 1 or a 2 argument selector.'
 #basicsIndication
-'A boolean value holder, a boolean evaluating block, or a boolean returning selector for specifying indication state.'
+'A boolean holder, a boolean block, or a boolean method, specifying the indication state.'
+#basicsChoice
+'A boolean holder, a boolean block, or a boolean method, specifying the choices state.'
+#basicsChoiceValue
+'That choices value (typically number or symbol).'
 #basicsIsButton
 'Turns on/off a button behavior.'
 #basicsLabel
 'Label of the item.'
+#basicsKey
+'Internal key of the item (optional, for programmed accesses).'
 #basicsMenu
 'A value holder providing the sub menu to be opened if item is selected.'
 #basicsMenuArgument
 'An argument passed with the menu selector.'
 'Index of the access character position of the textual label (optional).'
 #detailsEnabled
 'Aspect or binding providing a boolean value holder for the enable-state of the menu item.'
+#detailsStartGroup
+'Specify start of a right-aligned item group.'
 #detailsVisibility
 'Aspect or binding providing a boolean value holder for the visibility-state of the menu item.'
 #fileLoad
 'Opens a dialog to select and load a menu spec from a class.'
 #imageRetriever
 'Class implementing the image resource method. If no class is given, the current application class will be taken.'
 #imageSelector
-'Selector returning an image.'
+'Selector returning an image (sent to above or the application).'
+#imageImageList
+'Currently existing image resources.'
 #test
 'Displays the current menu (layout test).'
 )
-"Modified: / 8.8.1998 / 02:37:32 / cg"
+"Modified: / 18.8.1998 / 16:19:13 / cg"
 ! !
 !MenuEditor class methodsFor:'image specs'!
 linkSubmenuImage
 #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
 )
 #(#LabelSpec
 #name: 'labelLabel'
 #layout: #(#AlignmentOrigin 107 0 51 0 1 0.5)
+#activeHelpKey: #basicsLabel
 #label: 'Label:'
 #adjust: #right
 #resizeForLabel: true
 )
 #(#InputFieldSpec
 #acceptOnReturn: false
 #acceptOnTab: false
 )
 #(#LabelSpec
 #name: 'valueLabel'
+#activeHelpKey: #basicsAction
 #layout: #(#AlignmentOrigin 107 0 90 0 1 0.5)
 #label: 'Action:'
 #adjust: #right
 #resizeForLabel: true
 )
 #acceptOnTab: false
 )
 #(#LabelSpec
 #name: 'argumentLabel'
 #layout: #(#AlignmentOrigin 107 0 115 0 1 0.5)
+#activeHelpKey: #basicsArgument
 #label: 'Argument:'
 #adjust: #right
 #resizeForLabel: true
 )
 #(#InputFieldSpec
 #acceptOnTab: false
 )
 #(#LabelSpec
 #name: 'indicationLabel'
 #layout: #(#AlignmentOrigin 107 0 155 0 1 0.5)
+#activeHelpKey: #basicsIndication
 #label: 'Indication:'
 #adjust: #right
 #resizeForLabel: true
 )
 #(#InputFieldSpec
 #label: 'Is Button'
 )
 #(#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: #basicsIndication
+#activeHelpKey: #basicsChoice
 #enableChannel: #choiceEnabled
 #tabable: true
 #model: #choice
 #group: #inputGroup
 #type: #symbolOrNil
 #acceptOnReturn: false
 #acceptOnTab: false
 )
 #(#LabelSpec
 #name: 'choiceValueLabel'
+#activeHelpKey: #basicsChoiceValue
 #layout: #(#AlignmentOrigin 107 0 205 0 1 0.5)
 #label: 'Value:'
 #translateLabel: true
 #adjust: #right
 #resizeForLabel: true
 )
 #(#InputFieldSpec
 #name: 'choiceValueField'
 #layout: #(#LayoutFrame 110 0 194 0 -5 1.0 216 0)
-#activeHelpKey: #basicsIndication
+#activeHelpKey: #basicsChoiceValue
 #enableChannel: #choiceValueEnabled
 #tabable: true
 #model: #choiceValue
 #group: #inputGroup
 #type: #smalltalkObject
 )
 )
 )
 )
-"Modified: / 14.8.1998 / 15:43:35 / cg"
+"Modified: / 18.8.1998 / 16:20:26 / cg"
 !
 basicsLinkSpec
 "This resource specification was automatically generated
 by the UIPainter of ST/X."
 #collection:
 #(
 #(#LabelSpec
 #name: 'shortcutKeyLabel'
 #layout: #(#AlignmentOrigin 107 0 26 0 1 0.5)
+#activeHelpKey: #detailsAccelerator
 #label: 'Accelerator:'
 #adjust: #right
 #resizeForLabel: true
 )
 #(#InputFieldSpec
 #group: #inputGroup
 )
 #(#LabelSpec
 #name: 'enabledLabel'
 #layout: #(#AlignmentOrigin 107 0 51 0 1 0.5)
+#activeHelpKey: #detailsEnabled
 #label: 'Enabled:'
 #adjust: #right
 #resizeForLabel: true
 )
 #(#InputFieldSpec
 #group: #inputGroup
 )
 #(#LabelSpec
 #name: 'visibilityLabel'
 #layout: #(#AlignmentOrigin 107 0 76 0 1 0.5)
+#activeHelpKey: #detailsVisibility
 #label: 'Visibility:'
 #adjust: #right
 #resizeForLabel: true
 )
 #(#InputFieldSpec
 #group: #inputGroup
 )
 #(#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:
 #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
 )
 )
 )
 )
-"Modified: / 31.7.1998 / 01:18:43 / cg"
+"Modified: / 18.8.1998 / 16:16:46 / cg"
 !
 imageEditSpec
 "This resource specification was automatically generated
 by the UIPainter of ST/X."
 #label: 'Image & Label'
 )
 #(#LabelSpec
 #name: 'retrieverLabel'
 #layout: #(#AlignmentOrigin 107 0 26 0 1 0.5)
+#activeHelpKey: #imageRetriever
 #label: 'Retriever:'
 #adjust: #right
 #resizeForLabel: true
 )
 #(#InputFieldSpec
 #group: #inputGroup
 )
 #(#LabelSpec
 #name: 'iconLabel'
 #layout: #(#AlignmentOrigin 107 0 51 0 1 0.5)
+#activeHelpKey: #imageSelector
 #label: 'Selector:'
 #adjust: #right
 #resizeForLabel: true
 )
 #(#InputFieldSpec
 #tabable: true
 #model: #doEditImage
 )
 #(#SequenceViewSpec
 #name: 'systemOrUserImagesList'
+#activeHelpKey: #imageImageList
 #layout: #(#LayoutFrame 110 0 67 0 0 0.6 200 0)
 #model: #selectionOfImage
 #menu: #menuEditImage
 #hasHorizontalScrollBar: true
 #hasVerticalScrollBar: true
 )
 )
 )
 )
-"Modified: / 31.7.1998 / 01:18:50 / cg"
+"Modified: / 18.8.1998 / 16:17:59 / cg"
 !
 windowSpec
 "This resource specification was automatically generated
 by the UIPainter of ST/X."

changeset 959	96728cae02c4
parent 955	f4f7d2ebd3ce
child 968	f52b5744063b