ImageEditor.st
changeset 2592 9f52f9ca9b93
parent 2590 9f2cb061d07f
child 2595 e1eeda9d1639
equal deleted inserted replaced
2591:11e318ee1039 2592:9f52f9ca9b93
  2687     "
  2687     "
  2688 
  2688 
  2689     <resource: #menu>
  2689     <resource: #menu>
  2690 
  2690 
  2691     ^ 
  2691     ^ 
  2692      #(#Menu
  2692      #(Menu
  2693         #(
  2693         (
  2694          #(#MenuItem
  2694          (MenuItem
  2695             #activeHelpKey: #drawModePoint
  2695             activeHelpKey: drawModePoint
  2696             #enabled: #imageIsLoaded
  2696             enabled: imageIsLoaded
  2697             #label: 'Point'
  2697             label: 'Point'
  2698             #translateLabel: true
  2698             translateLabel: true
  2699             #choice: #editMode
  2699             labelImage: (ResourceRetriever ImageEditor pointIcon 'Point')
  2700             #choiceValue: #point
  2700             choice: editMode
  2701           )
  2701             choiceValue: point
  2702          #(#MenuItem
  2702           )
  2703             #activeHelpKey: #drawModeBox
  2703          (MenuItem
  2704             #enabled: #imageIsLoaded
  2704             activeHelpKey: drawModePoint
  2705             #label: 'Rect'
  2705             enabled: imageIsLoaded
  2706             #translateLabel: true
  2706             label: 'Spray'
  2707             #choice: #editMode
  2707             translateLabel: true
  2708             #choiceValue: #box
  2708             labelImage: (ResourceRetriever ImageEditor sprayIcon 'Spray')
  2709           )
  2709             choice: editMode
  2710          #(#MenuItem
  2710             choiceValue: spray
  2711             #activeHelpKey: #drawModeFilledBox
  2711           )
  2712             #enabled: #imageIsLoaded
  2712          (MenuItem
  2713             #label: 'Filled Rectangle'
  2713             activeHelpKey: drawModeBox
  2714             #translateLabel: true
  2714             enabled: imageIsLoaded
  2715             #choice: #editMode
  2715             label: 'Rect'
  2716             #choiceValue: #filledBox
  2716             translateLabel: true
  2717           )
  2717             labelImage: (ResourceRetriever ImageEditor rectIcon 'Rect')
  2718          #(#MenuItem
  2718             choice: editMode
  2719             #activeHelpKey: #drawModeFill
  2719             choiceValue: box
  2720             #enabled: #imageIsLoaded
  2720           )
  2721             #label: 'Fill'
  2721          (MenuItem
  2722             #translateLabel: true
  2722             activeHelpKey: drawModeFilledBox
  2723             #choice: #editMode
  2723             enabled: imageIsLoaded
  2724             #choiceValue: #fill
  2724             label: 'Filled Rectangle'
  2725           )
  2725             translateLabel: true
  2726          #(#MenuItem
  2726             labelImage: (ResourceRetriever ImageEditor fillRectIcon 'Filled Rectangle')
  2727             #activeHelpKey: #drawModeCopy
  2727             choice: editMode
  2728             #enabled: #imageIsLoaded
  2728             choiceValue: filledBox
  2729             #label: 'Copy'
  2729           )
  2730             #translateLabel: true
  2730          (MenuItem
  2731             #choice: #editMode
  2731             activeHelpKey: drawModeBox
  2732             #choiceValue: #copy
  2732             enabled: imageIsLoaded
  2733           )
  2733             label: 'Circle'
  2734          #(#MenuItem
  2734             translateLabel: true
  2735             #activeHelpKey: #drawModePaste
  2735             labelImage: (ResourceRetriever ImageEditor circleIcon 'Circle')
  2736             #enabled: #imageIsLoaded
  2736             choice: editMode
  2737             #label: 'Paste'
  2737             choiceValue: circle
  2738             #translateLabel: true
  2738           )
  2739             #choice: #editMode
  2739          (MenuItem
  2740             #choiceValue: #paste
  2740             activeHelpKey: drawModeFill
  2741           )
  2741             enabled: imageIsLoaded
  2742          #(#MenuItem
  2742             label: 'Fill'
  2743             #activeHelpKey: #drawModePasteUnder
  2743             translateLabel: true
  2744             #enabled: #imageIsLoaded
  2744             labelImage: (ResourceRetriever ImageEditor fillIcon 'Fill')
  2745             #label: 'Paste Under'
  2745             choice: editMode
  2746             #translateLabel: true
  2746             choiceValue: fill
  2747             #choice: #editMode
  2747           )
  2748             #choiceValue: #pasteUnder
  2748          (MenuItem
  2749           )
  2749             activeHelpKey: drawModeCopy
  2750          #(#MenuItem
  2750             enabled: imageIsLoaded
  2751             #activeHelpKey: #drawModePasteWithMask
  2751             label: 'Copy'
  2752             #enabled: #imageIsLoaded
  2752             translateLabel: true
  2753             #label: 'Paste with Mask'
  2753             labelImage: (ResourceRetriever ImageEditor copyIcon 'Copy')
  2754             #translateLabel: true
  2754             choice: editMode
  2755             #choice: #editMode
  2755             choiceValue: copy
  2756             #choiceValue: #pasteWithMask
  2756           )
  2757           )
  2757          (MenuItem
  2758          #(#MenuItem
  2758             activeHelpKey: drawModePaste
  2759             #activeHelpKey: #drawModeSpecial
  2759             enabled: imageIsLoaded
  2760             #enabled: #imageIsLoaded
  2760             label: 'Paste'
  2761             #label: 'Special'
  2761             translateLabel: true
  2762             #translateLabel: true
  2762             labelImage: (ResourceRetriever ImageEditor pasteIcon 'Paste')
  2763             #choice: #editMode
  2763             choice: editMode
  2764             #choiceValue: #specialOperation
  2764             choiceValue: paste
       
  2765           )
       
  2766          (MenuItem
       
  2767             activeHelpKey: drawModePasteUnder
       
  2768             enabled: imageIsLoaded
       
  2769             label: 'Paste Under'
       
  2770             translateLabel: true
       
  2771             labelImage: (ResourceRetriever ImageEditor pasteUnderIcon 'Paste Under')
       
  2772             choice: editMode
       
  2773             choiceValue: pasteUnder
       
  2774           )
       
  2775          (MenuItem
       
  2776             activeHelpKey: drawModePasteWithMask
       
  2777             enabled: imageIsLoaded
       
  2778             label: 'Paste with Mask'
       
  2779             translateLabel: true
       
  2780             labelImage: (ResourceRetriever ImageEditor pasteWithMaskIcon 'Paste with Mask')
       
  2781             choice: editMode
       
  2782             choiceValue: pasteWithMask
       
  2783           )
       
  2784          (MenuItem
       
  2785             activeHelpKey: drawModeSpecial
       
  2786             enabled: imageIsLoaded
       
  2787             label: 'Special'
       
  2788             translateLabel: true
       
  2789             labelImage: (ResourceRetriever ImageEditor specialIcon 'Special')
       
  2790             choice: editMode
       
  2791             choiceValue: specialOperation
  2765           )
  2792           )
  2766          )
  2793          )
  2767         nil
  2794         nil
  2768         nil
  2795         nil
  2769       )
  2796       )