ImageEditor.st
changeset 1703 7cf51b5b6ac5
parent 1690 7428f8744d87
child 1704 3e0e31541f2e
equal deleted inserted replaced
1702:ace326bd303f 1703:7cf51b5b6ac5
  1702                #(#MenuItem
  1702                #(#MenuItem
  1703                   #activeHelpKey: #fileSaveButtonImageAs
  1703                   #activeHelpKey: #fileSaveButtonImageAs
  1704                   #enabled: #imageIsLoaded
  1704                   #enabled: #imageIsLoaded
  1705                   #label: 'Save as Button to File...'
  1705                   #label: 'Save as Button to File...'
  1706                   #itemValue: #doSaveButtonImageToFileAs
  1706                   #itemValue: #doSaveButtonImageToFileAs
       
  1707                   #translateLabel: true
       
  1708                 )
       
  1709                #(#MenuItem
       
  1710                   #label: 'Copy to Clipboard'
       
  1711                   #itemValue: #doCopyImageToClipboard
       
  1712                   #enabled: #imageIsLoaded
  1707                   #translateLabel: true
  1713                   #translateLabel: true
  1708                 )
  1714                 )
  1709                #(#MenuItem
  1715                #(#MenuItem
  1710                   #label: '-'
  1716                   #label: '-'
  1711                 )
  1717                 )
  4017         selector:(imageEditView resourceSelector)
  4023         selector:(imageEditView resourceSelector)
  4018 
  4024 
  4019     "Modified: / 31.7.1998 / 02:01:15 / cg"
  4025     "Modified: / 31.7.1998 / 02:01:15 / cg"
  4020 !
  4026 !
  4021 
  4027 
       
  4028 doCopyImageToClipboard
       
  4029     imageEditView copyImageToClipboard.
       
  4030 !
       
  4031 
  4022 doCropAll
  4032 doCropAll
  4023     "find all borders and cut them off"
  4033     "find all borders and cut them off"
  4024 
  4034 
  4025     imageEditView cropLeft:true right:true top:true bottom:true.   
  4035     imageEditView cropLeft:true right:true top:true bottom:true.   
  4026     self updateInfoLabel
  4036     self updateInfoLabel