#FEATURE by cg
authorClaus Gittinger <cg@exept.de>
Sat, 25 Feb 2017 12:44:11 +0100
changeset 3422 005c4ce2070d
parent 3421 f46643590cb1
child 3423 1b9fb486b83c
#FEATURE by cg class: ImageEditor added: #grabFullScreenImage comment/format in: #grabScreenImage #grabScreenImageUsing: #grabWindowImage changed: #menuFile
ImageEditor.st
--- a/ImageEditor.st	Thu Feb 23 15:54:15 2017 +0100
+++ b/ImageEditor.st	Sat Feb 25 12:44:11 2017 +0100
@@ -3465,6 +3465,11 @@
                   label: 'Grab from Window...'
                   itemValue: grabWindowImage
                 )
+               (MenuItem
+                  activeHelpKey: fileGrabFullSreenImage
+                  label: 'Grab from whole Screen'
+                  itemValue: grabFullScreenImage
+                )
                )
               nil
               nil
@@ -3558,7 +3563,7 @@
         nil
       )
 
-    "Modified: / 18-02-2017 / 00:41:36 / cg"
+    "Modified: / 25-02-2017 / 12:40:30 / cg"
 !
 
 menuMouseButtonColors
@@ -8166,8 +8171,18 @@
     "Modified (comment): / 16-02-2017 / 10:22:19 / cg"
 !
 
+grabFullScreenImage
+    "grab all for editing"
+
+    self grabScreenImageUsing:[ 
+        Image fromScreen
+    ].
+
+    "Created: / 25-02-2017 / 12:41:29 / cg"
+!
+
 grabScreenImage
-    "let user choose an area and grab that are for editing"
+    "let user choose an area and grab that area for editing"
 
     self grabScreenImageUsing:[ 
         |r|
@@ -8181,6 +8196,8 @@
             Image fromScreen:r
         ]
     ].
+
+    "Modified (comment): / 25-02-2017 / 12:41:00 / cg"
 !
 
 grabScreenImageFromLastArea
@@ -8192,7 +8209,7 @@
 !
 
 grabScreenImageUsing:aBlock
-    "let user choose an area and grab that are for editing"
+    "let user choose an area and grab that area for editing"
 
     self checkModified ifFalse:[ ^ self ].
 
@@ -8228,12 +8245,13 @@
         ] 
         afterSeconds:1
 
-    "Created: / 29.7.1998 / 21:24:42 / cg"
-    "Modified: / 16.11.2001 / 16:21:19 / cg"
+    "Created: / 29-07-1998 / 21:24:42 / cg"
+    "Modified: / 16-11-2001 / 16:21:19 / cg"
+    "Modified (comment): / 25-02-2017 / 12:41:06 / cg"
 !
 
 grabWindowImage
-    "let user choose an area and grab that are for editing"
+    "let user choose a window and grab its area for editing"
 
     self grabScreenImageUsing:[
         |v topView|
@@ -8245,6 +8263,8 @@
             Image fromView:topView
         ].
     ].
+
+    "Modified (comment): / 25-02-2017 / 12:41:20 / cg"
 ! !
 
 !ImageEditor methodsFor:'user actions-saving'!