MenuEditor.st
changeset 1690 7428f8744d87
parent 1685 85559494e8aa
child 1691 a3f8baada9e6
equal deleted inserted replaced
1689:5d02658c548a 1690:7428f8744d87
   238 flyByHelpSpec
   238 flyByHelpSpec
   239     ^super flyByHelpSpec addPairsFrom:(self localFlyHelpSpecStrings)
   239     ^super flyByHelpSpec addPairsFrom:(self localFlyHelpSpecStrings)
   240 !
   240 !
   241 
   241 
   242 helpSpec
   242 helpSpec
   243     ^super helpSpec addPairsFrom:(self localHelpSpecStrings)
   243     "This resource specification was automatically generated
       
   244      by the UIHelpTool of ST/X."
       
   245 
       
   246     "Do not manually edit this!! If it is corrupted,
       
   247      the UIHelpTool may not be able to read the specification."
       
   248 
       
   249     "
       
   250      UIHelpTool openOnClass:MenuEditor    
       
   251     "
       
   252 
       
   253     <resource: #help>
       
   254 
       
   255     ^ super helpSpec addPairsFrom:#(
       
   256 
       
   257 #addDelayedMenu
       
   258 'Add a new delayed menu to item.'
       
   259 
       
   260 #addDelayedSubMenuLink
       
   261 'Add a new linked delayed menu to item.'
       
   262 
       
   263 #addMenuItem
       
   264 'Add a new menu item.'
       
   265 
       
   266 #addMenuSeparator
       
   267 'Add a new menu separator.'
       
   268 
       
   269 #addSubMenu
       
   270 'Add a new sub menu.'
       
   271 
       
   272 #addSubMenuLink
       
   273 'Add a new linked sub menu.'
       
   274 
       
   275 #basicsAction
       
   276 'An action selector with 0, 1 (the argument field), or 2 (the selected item) arguments.'
       
   277 
       
   278 #basicsArgument
       
   279 'An optional arg passed with above selector, if it is a 1 or 2 arg selector (enter a Smalltalk literal).'
       
   280 
       
   281 #basicsChoice
       
   282 'Aspect for a boolean holder, block or method, specifying the choices state (RadioButton behavior).'
       
   283 
       
   284 #basicsChoiceValue
       
   285 'That choices value (typically number or symbol).'
       
   286 
       
   287 #basicsIndication
       
   288 'Aspect for boolean holder, block, or method, specifying the indication state (CheckToggle behavior).'
       
   289 
       
   290 #basicsIsButton
       
   291 'Button-like look and behavior.'
       
   292 
       
   293 #basicsKey
       
   294 'Internal key of the item (optional, for programmed accesses).'
       
   295 
       
   296 #basicsLabel
       
   297 'Label of the item.'
       
   298 
       
   299 #basicsMenu
       
   300 'Aspect providing the sub menu to be opened if item is selected (provide spec or valueHolder).'
       
   301 
       
   302 #basicsMenuArgument
       
   303 'An argument passed with the menu selector.'
       
   304 
       
   305 #basicsNameKey
       
   306 'Unique identifier of the item (optional).'
       
   307 
       
   308 #basicsSelector
       
   309 'Selector under which the generated menu spec is saved.'
       
   310 
       
   311 #basicsSeparatorType
       
   312 'List of valid separators.'
       
   313 
       
   314 #basicsTranslateLabel
       
   315 'Translate the label via the classes resource file (internationalization).'
       
   316 
       
   317 #browseResource
       
   318 'Search for methods with image resource.'
       
   319 
       
   320 #detailsAccelerator
       
   321 'Accelerator key to select the menu item from the keyboard (Cmdx or Ctrlx).'
       
   322 
       
   323 #detailsAccessCharaterPosition
       
   324 'Index of the access character position of the textual label (obsolete, VW compatibility).'
       
   325 
       
   326 #detailsAuxValue
       
   327 'Some additional value - for arbitrary use by the program.'
       
   328 
       
   329 #detailsEnabled
       
   330 'Aspect or binding providing a boolean value holder for the enable-state of the menu item.'
       
   331 
       
   332 #detailsStartGroup
       
   333 'Specify start of a right-aligned item group.'
       
   334 
       
   335 #detailsVisibility
       
   336 'Boolean, or aspect or binding for a boolean holder controlling the visibility of the menu item.'
       
   337 
       
   338 #fileLoad
       
   339 'Load a menu spec from a class.'
       
   340 
       
   341 #fileNew
       
   342 'Create a new menu spec.'
       
   343 
       
   344 #filePickAMenu
       
   345 'Select a menu from an open view and read its specification'
       
   346 
       
   347 #fileSave
       
   348 'Save the menu spec (and the help spec, if modified).'
       
   349 
       
   350 #fileSaveAs
       
   351 'Open a dialog to save the menu spec (and the help spec, if modified).'
       
   352 
       
   353 #fileShowMenuSpec
       
   354 'Opens a Workspace showing the current menu spec.'
       
   355 
       
   356 #generateAspectMethods
       
   357 'Generates aspect methods for defined aspect selectors of the menu.'
       
   358 
       
   359 #hideMenuOnActivated
       
   360 'If on, the menu hides itself after the item was activated.'
       
   361 
       
   362 #horizontalLayout
       
   363 'If on, the submenu organizes its items horizontal insteat of vertical (default).'
       
   364 
       
   365 #imageImageAndLabel
       
   366 'Toggle display of both image and textual label.'
       
   367 
       
   368 #imageImageEditor
       
   369 'Open an Image Editor on the resource method defined by retriever and selector.'
       
   370 
       
   371 #imageImageList
       
   372 'Currently existing image resources.'
       
   373 
       
   374 #imageRetriever
       
   375 'Class implementing the image resource method. If no class is given, the current application class will be taken.'
       
   376 
       
   377 #imageSelector
       
   378 'Selector returning an image (sent to above or the application).'
       
   379 
       
   380 #keepLinkedMenu
       
   381 'Keep the linked menu after activation (do not destroy).'
       
   382 
       
   383 #sendToOriginator
       
   384 'Send action-Message to widget (instead of application).'
       
   385 
       
   386 #settingsRedefineAspectMethods
       
   387 'Toggles the permission to overwrite existing aspect methods.'
       
   388 
       
   389 #showBusyCursorWhilePerforming
       
   390 'If on, a busy cursor is shown while the items action is performing.'
       
   391 
       
   392 #triggerOnDown
       
   393 'If on, the items action is performed on mouse-button press (default is on button-release).'
       
   394 
       
   395 )
   244 !
   396 !
   245 
   397 
   246 localFlyHelpSpecStrings
   398 localFlyHelpSpecStrings
   247     "This resource specification was automatically generated
   399     "This resource specification was automatically generated
   248      by the UIHelpTool of ST/X."
   400      by the UIHelpTool of ST/X."
  1099 
  1251 
  1100     ^ 
  1252     ^ 
  1101      #(#Menu
  1253      #(#Menu
  1102         #(
  1254         #(
  1103          #(#MenuItem
  1255          #(#MenuItem
       
  1256             #activeHelpKey: #fileNew
       
  1257             #label: 'New'
       
  1258             #itemValue: #doNew
       
  1259             #translateLabel: true
       
  1260             #isButton: true
       
  1261             #labelImage: #(#ResourceRetriever #ToolbarIconLibrary #newMenu24x24Icon)
       
  1262           )
       
  1263          #(#MenuItem
  1104             #activeHelpKey: #fileLoad
  1264             #activeHelpKey: #fileLoad
  1105             #label: 'Load'
  1265             #label: 'Load'
  1106             #itemValue: #doLoad
  1266             #itemValue: #doLoad
  1107             #translateLabel: true
  1267             #translateLabel: true
  1108             #isButton: true
  1268             #isButton: true
  1109             #submenuChannel: #menuHistory
  1269             #submenuChannel: #menuHistory
  1110             #labelImage: #(#ResourceRetriever #Icon #loadIcon)
  1270             #labelImage: #(#ResourceRetriever #ToolbarIconLibrary #load22x22Icon)
  1111           )
  1271           )
  1112          #(#MenuItem
  1272          #(#MenuItem
  1113             #activeHelpKey: #fileSave
  1273             #activeHelpKey: #fileSave
  1114             #label: 'Save'
  1274             #label: 'Save'
  1115             #itemValue: #doSave
  1275             #itemValue: #doSave
  1116             #translateLabel: true
  1276             #translateLabel: true
  1117             #isButton: true
  1277             #isButton: true
  1118             #labelImage: #(#ResourceRetriever #Icon #saveIcon)
  1278             #labelImage: #(#ResourceRetriever #ToolbarIconLibrary #save22x22Icon)
  1119           )
  1279           )
  1120          #(#MenuItem
  1280          #(#MenuItem
  1121             #label: ''
  1281             #label: ''
  1122           )
  1282           )
  1123          #(#MenuItem
  1283          #(#MenuItem
  1125             #enabled: #hasSelectionChannel
  1285             #enabled: #hasSelectionChannel
  1126             #label: 'Cut'
  1286             #label: 'Cut'
  1127             #itemValue: #doCut
  1287             #itemValue: #doCut
  1128             #translateLabel: true
  1288             #translateLabel: true
  1129             #isButton: true
  1289             #isButton: true
  1130             #labelImage: #(#ResourceRetriever #Icon #cutIcon)
  1290             #labelImage: #(#ResourceRetriever #ToolbarIconLibrary #cut22x22Icon)
  1131           )
  1291           )
  1132          #(#MenuItem
  1292          #(#MenuItem
  1133             #activeHelpKey: #editCopy
  1293             #activeHelpKey: #editCopy
  1134             #enabled: #hasSelectionChannel
  1294             #enabled: #hasSelectionChannel
  1135             #label: 'Copy'
  1295             #label: 'Copy'
  1136             #itemValue: #doCopy
  1296             #itemValue: #doCopy
  1137             #translateLabel: true
  1297             #translateLabel: true
  1138             #isButton: true
  1298             #isButton: true
  1139             #labelImage: #(#ResourceRetriever #Icon #copyIcon)
  1299             #labelImage: #(#ResourceRetriever #ToolbarIconLibrary #copy22x22Icon)
  1140           )
  1300           )
  1141          #(#MenuItem
  1301          #(#MenuItem
  1142             #activeHelpKey: #editPaste
  1302             #activeHelpKey: #editPaste
  1143             #enabled: #valueOfCanPaste
  1303             #enabled: #valueOfCanPaste
  1144             #label: 'Paste'
  1304             #label: 'Paste'
  1145             #itemValue: #doPaste
  1305             #itemValue: #doPaste
  1146             #translateLabel: true
  1306             #translateLabel: true
  1147             #isButton: true
  1307             #isButton: true
  1148             #labelImage: #(#ResourceRetriever #Icon #pasteIcon)
  1308             #labelImage: #(#ResourceRetriever #ToolbarIconLibrary #paste22x22Icon)
  1149           )
  1309           )
  1150          #(#MenuItem
  1310          #(#MenuItem
  1151             #label: ''
  1311             #label: ''
  1152           )
  1312           )
  1153          #(#MenuItem
  1313          #(#MenuItem
  1175             #itemValue: #doCreateMenu
  1335             #itemValue: #doCreateMenu
  1176             #translateLabel: true
  1336             #translateLabel: true
  1177             #isButton: true
  1337             #isButton: true
  1178             #submenuChannel: #standardMenus
  1338             #submenuChannel: #standardMenus
  1179             #labelImage: #(#ResourceRetriever #'MenuEditor::Item' #iconMenu)
  1339             #labelImage: #(#ResourceRetriever #'MenuEditor::Item' #iconMenu)
  1180             #keepLinkedMenu: true
       
  1181           )
  1340           )
  1182          #(#MenuItem
  1341          #(#MenuItem
  1183             #activeHelpKey: #addSubMenuLink
  1342             #activeHelpKey: #addSubMenuLink
  1184             #enabled: #hasSingleSelectionChannel
  1343             #enabled: #hasSingleSelectionChannel
  1185             #label: 'Add Linked Menu'
  1344             #label: 'Add Linked Menu'