MenuEditor.st
changeset 1430 ec2bc25674c3
parent 1426 fcf2ecbdde67
child 1454 367b8342663e
equal deleted inserted replaced
1429:0fb6421a93e9 1430:ec2bc25674c3
  1394           
  1394           
  1395            #(
  1395            #(
  1396              #(#MenuItem
  1396              #(#MenuItem
  1397                 #label: 'About'
  1397                 #label: 'About'
  1398                 #translateLabel: true
  1398                 #translateLabel: true
  1399                 #accessCharacterPosition: 1
       
  1400                 #labelImage: #(#ResourceRetriever nil #menuIcon)
  1399                 #labelImage: #(#ResourceRetriever nil #menuIcon)
  1401                 #submenuChannel: #menuAbout
  1400                 #submenuChannel: #menuAbout
  1402             )
  1401             )
  1403              #(#MenuItem
  1402              #(#MenuItem
  1404                 #label: 'File'
  1403                 #label: 'File'
  1689                 #label: 'Cut'
  1688                 #label: 'Cut'
  1690                 #translateLabel: true
  1689                 #translateLabel: true
  1691                 #value: #doCut
  1690                 #value: #doCut
  1692                 #activeHelpKey: #editCut
  1691                 #activeHelpKey: #editCut
  1693                 #enabled: #hasValidSelection
  1692                 #enabled: #hasValidSelection
  1694                 #shortcutKeyCharacter: #Cut
       
  1695             )
  1693             )
  1696              #(#MenuItem
  1694              #(#MenuItem
  1697                 #label: 'Copy'
  1695                 #label: 'Copy'
  1698                 #translateLabel: true
  1696                 #translateLabel: true
  1699                 #value: #doCopy
  1697                 #value: #doCopy
  1700                 #activeHelpKey: #editCopy
  1698                 #activeHelpKey: #editCopy
  1701                 #enabled: #hasValidSelection
  1699                 #enabled: #hasValidSelection
  1702                 #shortcutKeyCharacter: #Copy
       
  1703             )
  1700             )
  1704              #(#MenuItem
  1701              #(#MenuItem
  1705                 #label: 'Paste'
  1702                 #label: 'Paste'
  1706                 #translateLabel: true
  1703                 #translateLabel: true
  1707                 #value: #doPaste
  1704                 #value: #doPaste
  1708                 #activeHelpKey: #editPaste
  1705                 #activeHelpKey: #editPaste
  1709                 #enabled: #valueOfCanPaste
  1706                 #enabled: #valueOfCanPaste
  1710                 #shortcutKeyCharacter: #Paste
       
  1711             )
  1707             )
  1712              #(#MenuItem
  1708              #(#MenuItem
  1713                 #label: 'Delete'
  1709                 #label: 'Delete'
  1714                 #translateLabel: true
  1710                 #translateLabel: true
  1715                 #value: #doDelete
  1711                 #value: #doDelete
  1716                 #activeHelpKey: #editDelete
  1712                 #activeHelpKey: #editDelete
  1717                 #enabled: #hasValidSelection
  1713                 #enabled: #hasValidSelection
  1718                 #shortcutKeyCharacter: #Delete
       
  1719             )
  1714             )
  1720              #(#MenuItem
  1715              #(#MenuItem
  1721                 #label: '-'
  1716                 #label: '-'
  1722             )
  1717             )
  1723              #(#MenuItem
  1718              #(#MenuItem
  1780                 #label: 'Edit'
  1775                 #label: 'Edit'
  1781                 #translateLabel: true
  1776                 #translateLabel: true
  1782                 #value: #doEditImage
  1777                 #value: #doEditImage
  1783                 #activeHelpKey: #editCut
  1778                 #activeHelpKey: #editCut
  1784                 #enabled: #hasValidSelection
  1779                 #enabled: #hasValidSelection
  1785                 #shortcutKeyCharacter: #Cut
       
  1786             )
  1780             )
  1787              #(#MenuItem
  1781              #(#MenuItem
  1788                 #label: 'Remove'
  1782                 #label: 'Remove'
  1789                 #translateLabel: true
  1783                 #translateLabel: true
  1790                 #value: #doRemoveImage
  1784                 #value: #doRemoveImage
  1791                 #activeHelpKey: #editCopy
  1785                 #activeHelpKey: #editCopy
  1792                 #enabled: #hasValidSelection
  1786                 #enabled: #hasValidSelection
  1793                 #shortcutKeyCharacter: #Copy
       
  1794             )
  1787             )
  1795           ) nil
  1788           ) nil
  1796           nil
  1789           nil
  1797       )
  1790       )
  1798 !
  1791 !