added: #pointsAreOnSameMonitor:and:
authorStefan Vogel <sv@exept.de>
Mon, 25 Oct 2010 00:22:04 +0200
changeset 5637 460a01c483d2
parent 5636 850d83c40ad3
child 5638 910b8566b7c0
added: #pointsAreOnSameMonitor:and:
WinWorkstation.st
--- a/WinWorkstation.st	Mon Oct 25 00:20:38 2010 +0200
+++ b/WinWorkstation.st	Mon Oct 25 00:22:04 2010 +0200
@@ -7327,6 +7327,12 @@
     "
 !
 
+pointsAreOnSameMonitor:point1 and:point2
+    "are the two points on the same (multi-screen) monitors?"
+
+    ^ (self monitorHandleForPoint:point1) = (self monitorHandleForPoint:point2)
+!
+
 preferredIconSize
     "Get the preferrered icon size.
      Here, workaround windows (bug?) which returns 32@32
@@ -18914,11 +18920,11 @@
 !WinWorkstation class methodsFor:'documentation'!
 
 version
-    ^ '$Header: /cvs/stx/stx/libview/WinWorkstation.st,v 1.439 2010-10-22 13:39:51 cg Exp $'
+    ^ '$Header: /cvs/stx/stx/libview/WinWorkstation.st,v 1.440 2010-10-24 22:22:04 stefan Exp $'
 !
 
 version_CVS
-    ^ '$Header: /cvs/stx/stx/libview/WinWorkstation.st,v 1.439 2010-10-22 13:39:51 cg Exp $'
+    ^ '$Header: /cvs/stx/stx/libview/WinWorkstation.st,v 1.440 2010-10-24 22:22:04 stefan Exp $'
 ! !
 
 WinWorkstation initialize!