--- a/DragHandler.st Fri Nov 15 11:32:27 2019 +0100
+++ b/DragHandler.st Fri Nov 22 10:44:56 2019 +0100
@@ -340,7 +340,7 @@
|p point area rootDisplayPoint|
aRootPoint notNil ifTrue:[
- rootDisplayPoint := Screen transformVirtualDisplayPointToRootDisplayPoint:aRootPoint.
+ rootDisplayPoint := Screen convertVirtualResolutionPointToCurrentResolutionPoint:aRootPoint.
].
(saveArea notNil and:[lastRootPoint notNil]) ifTrue:[
@@ -376,6 +376,7 @@
"/ screen not yet saved; thus we have to save the area
"/
p := point - (self class additionalSaveSize).
+
saveUnder copyFrom:rootView
x:p x
y:p y
@@ -396,11 +397,11 @@
dragBlock value:(point - saveArea origin + dragOffset) value:tmpForm.
"if saveArea changed during dragBlock; lock operation"
- area == saveArea ifTrue:[
+ area == saveArea ifTrue:[
rootView copyFrom:tmpForm toX:area left y:area top.
].
- "Modified: / 15-11-2019 / 11:29:22 / Stefan Reise"
+ "Modified: / 22-11-2019 / 10:44:36 / Stefan Reise"
!
dropTargetWillChange