--- a/MenuEditor.st Mon Mar 17 17:31:22 2003 +0100
+++ b/MenuEditor.st Wed Mar 19 09:52:28 2003 +0100
@@ -240,7 +240,159 @@
!
helpSpec
- ^super helpSpec addPairsFrom:(self localHelpSpecStrings)
+ "This resource specification was automatically generated
+ by the UIHelpTool of ST/X."
+
+ "Do not manually edit this!! If it is corrupted,
+ the UIHelpTool may not be able to read the specification."
+
+ "
+ UIHelpTool openOnClass:MenuEditor
+ "
+
+ <resource: #help>
+
+ ^ super helpSpec addPairsFrom:#(
+
+#addDelayedMenu
+'Add a new delayed menu to item.'
+
+#addDelayedSubMenuLink
+'Add a new linked delayed menu to item.'
+
+#addMenuItem
+'Add a new menu item.'
+
+#addMenuSeparator
+'Add a new menu separator.'
+
+#addSubMenu
+'Add a new sub menu.'
+
+#addSubMenuLink
+'Add a new linked sub menu.'
+
+#basicsAction
+'An action selector with 0, 1 (the argument field), or 2 (the selected item) arguments.'
+
+#basicsArgument
+'An optional arg passed with above selector, if it is a 1 or 2 arg selector (enter a Smalltalk literal).'
+
+#basicsChoice
+'Aspect for a boolean holder, block or method, specifying the choices state (RadioButton behavior).'
+
+#basicsChoiceValue
+'That choices value (typically number or symbol).'
+
+#basicsIndication
+'Aspect for boolean holder, block, or method, specifying the indication state (CheckToggle behavior).'
+
+#basicsIsButton
+'Button-like look and behavior.'
+
+#basicsKey
+'Internal key of the item (optional, for programmed accesses).'
+
+#basicsLabel
+'Label of the item.'
+
+#basicsMenu
+'Aspect providing the sub menu to be opened if item is selected (provide spec or valueHolder).'
+
+#basicsMenuArgument
+'An argument passed with the menu selector.'
+
+#basicsNameKey
+'Unique identifier of the item (optional).'
+
+#basicsSelector
+'Selector under which the generated menu spec is saved.'
+
+#basicsSeparatorType
+'List of valid separators.'
+
+#basicsTranslateLabel
+'Translate the label via the classes resource file (internationalization).'
+
+#browseResource
+'Search for methods with image resource.'
+
+#detailsAccelerator
+'Accelerator key to select the menu item from the keyboard (Cmdx or Ctrlx).'
+
+#detailsAccessCharaterPosition
+'Index of the access character position of the textual label (obsolete, VW compatibility).'
+
+#detailsAuxValue
+'Some additional value - for arbitrary use by the program.'
+
+#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
+'Boolean, or aspect or binding for a boolean holder controlling the visibility of the menu item.'
+
+#fileLoad
+'Load a menu spec from a class.'
+
+#fileNew
+'Create a new menu spec.'
+
+#filePickAMenu
+'Select a menu from an open view and read its specification'
+
+#fileSave
+'Save the menu spec (and the help spec, if modified).'
+
+#fileSaveAs
+'Open a dialog to save the menu spec (and the help spec, if modified).'
+
+#fileShowMenuSpec
+'Opens a Workspace showing the current menu spec.'
+
+#generateAspectMethods
+'Generates aspect methods for defined aspect selectors of the menu.'
+
+#hideMenuOnActivated
+'If on, the menu hides itself after the item was activated.'
+
+#horizontalLayout
+'If on, the submenu organizes its items horizontal insteat of vertical (default).'
+
+#imageImageAndLabel
+'Toggle display of both image and textual label.'
+
+#imageImageEditor
+'Open an Image Editor on the resource method defined by retriever and selector.'
+
+#imageImageList
+'Currently existing image resources.'
+
+#imageRetriever
+'Class implementing the image resource method. If no class is given, the current application class will be taken.'
+
+#imageSelector
+'Selector returning an image (sent to above or the application).'
+
+#keepLinkedMenu
+'Keep the linked menu after activation (do not destroy).'
+
+#sendToOriginator
+'Send action-Message to widget (instead of application).'
+
+#settingsRedefineAspectMethods
+'Toggles the permission to overwrite existing aspect methods.'
+
+#showBusyCursorWhilePerforming
+'If on, a busy cursor is shown while the items action is performing.'
+
+#triggerOnDown
+'If on, the items action is performed on mouse-button press (default is on button-release).'
+
+)
!
localFlyHelpSpecStrings
@@ -1101,13 +1253,21 @@
#(#Menu
#(
#(#MenuItem
+ #activeHelpKey: #fileNew
+ #label: 'New'
+ #itemValue: #doNew
+ #translateLabel: true
+ #isButton: true
+ #labelImage: #(#ResourceRetriever #ToolbarIconLibrary #newMenu24x24Icon)
+ )
+ #(#MenuItem
#activeHelpKey: #fileLoad
#label: 'Load'
#itemValue: #doLoad
#translateLabel: true
#isButton: true
#submenuChannel: #menuHistory
- #labelImage: #(#ResourceRetriever #Icon #loadIcon)
+ #labelImage: #(#ResourceRetriever #ToolbarIconLibrary #load22x22Icon)
)
#(#MenuItem
#activeHelpKey: #fileSave
@@ -1115,7 +1275,7 @@
#itemValue: #doSave
#translateLabel: true
#isButton: true
- #labelImage: #(#ResourceRetriever #Icon #saveIcon)
+ #labelImage: #(#ResourceRetriever #ToolbarIconLibrary #save22x22Icon)
)
#(#MenuItem
#label: ''
@@ -1127,7 +1287,7 @@
#itemValue: #doCut
#translateLabel: true
#isButton: true
- #labelImage: #(#ResourceRetriever #Icon #cutIcon)
+ #labelImage: #(#ResourceRetriever #ToolbarIconLibrary #cut22x22Icon)
)
#(#MenuItem
#activeHelpKey: #editCopy
@@ -1136,7 +1296,7 @@
#itemValue: #doCopy
#translateLabel: true
#isButton: true
- #labelImage: #(#ResourceRetriever #Icon #copyIcon)
+ #labelImage: #(#ResourceRetriever #ToolbarIconLibrary #copy22x22Icon)
)
#(#MenuItem
#activeHelpKey: #editPaste
@@ -1145,7 +1305,7 @@
#itemValue: #doPaste
#translateLabel: true
#isButton: true
- #labelImage: #(#ResourceRetriever #Icon #pasteIcon)
+ #labelImage: #(#ResourceRetriever #ToolbarIconLibrary #paste22x22Icon)
)
#(#MenuItem
#label: ''
@@ -1177,7 +1337,6 @@
#isButton: true
#submenuChannel: #standardMenus
#labelImage: #(#ResourceRetriever #'MenuEditor::Item' #iconMenu)
- #keepLinkedMenu: true
)
#(#MenuItem
#activeHelpKey: #addSubMenuLink