--- a/DeviceWorkstation.st Wed Nov 27 17:24:40 2019 +0100
+++ b/DeviceWorkstation.st Thu Nov 28 17:52:40 2019 +0100
@@ -822,6 +822,28 @@
^ self subclassResponsibility
! !
+!DeviceWorkstation class methodsFor:'multi monitor support'!
+
+openViewWithBlock:openAction
+ view:aView
+ at:origin
+
+ "
+ HACK for multi monitor support.
+ sub views needs to be opened on the same monitor as their top view,
+ so that Windows create/place them into the same virtual resolution/display.
+ after the sub views are opened we can move them within the same virtual resolution/display.
+ to their actually origin
+
+ USED BY WINDOWS ONLY
+ "
+
+ aView origin:origin.
+ openAction value.
+
+ "Created: / 28-11-2019 / 17:52:16 / Stefan Reise"
+! !
+
!DeviceWorkstation class methodsFor:'queries'!
allScreens