--- a/Image.st	Fri Nov 15 11:05:24 2019 +0100
+++ b/Image.st	Fri Nov 15 11:10:43 2019 +0100
@@ -2607,18 +2607,14 @@
     r := Rectangle fromUser.
     r width == 0 ifTrue:[^ nil].
     r height == 0 ifTrue:[^ nil].
-
-    ^ self 
-        fromScreen:(Screen 
-            transformVirtualDisplayRectangleToRootDisplayRectangle:r)
+    ^ self fromScreen:r
 
     "
      Image fromScreenArea
      Image fromScreenArea inspect
     "
 
-    "Modified: / 10-09-1998 / 15:59:58 / cg"
-    "Modified: / 15-11-2019 / 10:29:29 / Stefan Reise"
+    "Modified: / 10.9.1998 / 15:59:58 / cg"
 !
 
 fromUser
@@ -16684,7 +16680,7 @@
      get the pixels
     "
     [
-        self from:rootView in:aRectangle.
+        self from:rootView in:(Screen transformVirtualDisplayRectangleToRootDisplayRectangle:aRectangle).
     ] ensure:[
         doGrab ifTrue:[
             aDevice ungrabPointer.
@@ -16698,6 +16694,8 @@
      Image fromScreen:((100@100) corner:(200@200)) on:Display grab:false
      Image fromScreen:((100@100) corner:(200@200)) on:Display grab:true
     "
+
+    "Modified: / 15-11-2019 / 11:07:05 / Stefan Reise"
 !
 
 photometricFromScreen:aDevice