--- a/DragAndDropManager.st Mon Feb 13 20:09:31 2017 +0100
+++ b/DragAndDropManager.st Mon Feb 13 20:37:35 2017 +0100
@@ -121,7 +121,7 @@
atEnd:
a 4-arg block that is evaluated when the d&d is finished.
It gets the target view (or nil, for alien views), the targets
- view ID (needed if its an alien view), the screen position and the
+ view ID (needed if it's an alien view), the screen position and the
relative position within the target view of the drop as arguments.
For internal (ST/X) views, the dropBlock should perform
@@ -361,7 +361,7 @@
startDrag:draggableObjects from:aView atEnd:aFourArgEndBlock
"start a drop at the current pointer position
When finished, the endAction is called with four args:
- the targetView, the targetViews windowID (useful, if its an alien view),
+ the targetView, the targetViews windowID (useful, if it's an alien view),
the dropPoint in root-coordinates and the dropPoint within the targetView"
^ self startDrag:draggableObjects
@@ -391,12 +391,14 @@
button openAt:100@100
"
+
+ "Modified (comment): / 13-02-2017 / 20:36:27 / cg"
!
startDrag:draggableObjects from:aView atEnd:aFourArgEndBlock display:something
"start a drop at the current pointer position
When finished, the endAction is called with four args:
- the targetView, the targetViews windowID (useful, if its an alien view),
+ the targetView, the targetViews windowID (useful, if it's an alien view),
the dropPoint in root-coordinates and the dropPoint within the targetView"
^ self startDrag:draggableObjects
@@ -427,6 +429,8 @@
button openAt:100@100
"
+
+ "Modified (comment): / 13-02-2017 / 20:36:31 / cg"
!
startDrag:draggableObjects from:aView display:something
@@ -499,7 +503,7 @@
startDrag:draggableObjects from:aView offset:anOffset atEnd:aFourArgEndBlock
"start a drop at the current pointer position
When finished, the endAction is called with four args:
- the targetView, the targetViews windowID (useful, if its an alien view),
+ the targetView, the targetViews windowID (useful, if it's an alien view),
the dropPoint in root-coordinates and the dropPoint within the targetView"
^ self startDrag:draggableObjects
@@ -530,12 +534,14 @@
button openAt:100@100
"
+
+ "Modified (comment): / 13-02-2017 / 20:36:35 / cg"
!
startDrag:draggableObjects from:aView offset:anOffset atEnd:aFourArgEndBlock display:something
"start a drop at the current pointer position
When finished, the endAction is called with four args:
- the targetView, the targetViews windowID (useful, if its an alien view),
+ the targetView, the targetViews windowID (useful, if it's an alien view),
the dropPoint in root-coordinates and the dropPoint within the targetView"
|manager|
@@ -573,6 +579,8 @@
button openAt:100@100
"
+
+ "Modified (comment): / 13-02-2017 / 20:18:39 / cg"
!
startDrag:draggableObjects from:aView offset:anOffset display:something
@@ -949,7 +957,7 @@
startDrag:draggableObjects from:aView offset:anOffset atEnd:aFourArgEndBlock
"start a drop at the current pointer position.
When finished, the endAction is called with four args:
- the targetView, the targetViews windowID (useful, if its an alien view),
+ the targetView, the targetViews windowID (useful, if it's an alien view),
the dropPoint in root-coordinates and the dropPoint within the targetView"
^ self
@@ -958,12 +966,14 @@
offset:anOffset
atEnd:aFourArgEndBlock
display:draggableObjects
+
+ "Modified (comment): / 13-02-2017 / 20:35:58 / cg"
!
startDrag:draggableObjects from:aView offset:anOffset atEnd:aFourArgBlock display:something
"start a drop at the current pointer position.
When finished, the endAction is called with four args:
- the targetView, the targetViews windowID (useful, if its an alien view),
+ the targetView, the targetViews windowID (useful, if it's an alien view),
the dropPoint in root-coordinates and the dropPoint within the targetView."
|height width fontWdt offset ascent device dispObjs list space|
@@ -1030,7 +1040,8 @@
at:nil
atEnd:aFourArgBlock
- "Modified: / 31.3.1998 / 11:18:04 / cg"
+ "Modified: / 31-03-1998 / 11:18:04 / cg"
+ "Modified (comment): / 13-02-2017 / 20:36:02 / cg"
!
startDrag:draggableObjects from:aView offset:anOffset display:something
@@ -1054,7 +1065,7 @@
aPoint and a drawingGC, to perform the drawing at some dragPoint.
The drag starts in aView at point p.
When finished, the endAction is called with four args:
- the targetView, the targetViews windowID (useful, if its an alien view),
+ the targetView, the targetViews windowID (useful, if it's an alien view),
the dropPoint in root-coordinates and the dropPoint within the targetView"
^ self
@@ -1064,6 +1075,8 @@
in:aView
at:nil
atEnd:aFourArgEndBlock
+
+ "Modified (comment): / 13-02-2017 / 20:36:06 / cg"
!
startOpaqueDrag:aDragBlock offset:offs extent:anExtent in:aView at:aDummyPoint atEnd:aFourArgEndBlock
@@ -1075,7 +1088,7 @@
drawingGC and the display objects, to perform the drawing at some dragPoint.
The drag starts in aView at point p.
When finished, the endAction is called with four args:
- the targetView, the targetViews windowID (useful, if its an alien view),
+ the targetView, the targetViews windowID (useful, if it's an alien view),
the dropPoint in root-coordinates and the dropPoint within the targetView"
|handler numArgs dragBlock dobjs|
@@ -1102,6 +1115,7 @@
self doStart:handler for:aView atEnd:aFourArgEndBlock.
"Modified: / 18-07-2011 / 09:38:21 / cg"
+ "Modified (comment): / 13-02-2017 / 20:36:18 / cg"
! !
!DragAndDropManager methodsFor:'dragging-lines'!
@@ -1110,7 +1124,7 @@
"start a line-drag of an arrow-line.
The drag starts in aView at point aStartPoint.
When finished, the endAction is called with four args:
- the targetView, the targetViews windowID (useful, if its an alien view),
+ the targetView, the targetViews windowID (useful, if it's an alien view),
the dropPoint in root-coordinates and the dropPoint within the targetView"
|p|
@@ -1120,13 +1134,15 @@
doStart:(DragHandler startArrowDragAt:p)
for:aView
atEnd:aFourArgEndBlock
+
+ "Modified (comment): / 13-02-2017 / 20:35:53 / cg"
!
startLineDragIn:aView at:aStartPoint atEnd:aFourArgEndBlock
"start a line-drag of a normal line.
The drag starts in aView at point aStartPoint.
When finished, the endAction is called with four args:
- the targetView, the targetViews windowID (useful, if its an alien view),
+ the targetView, the targetViews windowID (useful, if it's an alien view),
the dropPoint in root-coordinates and the dropPoint within the targetView"
|p|
@@ -1136,6 +1152,8 @@
doStart:(DragHandler startLineDragAt:p)
for:aView
atEnd:aFourArgEndBlock
+
+ "Modified (comment): / 13-02-2017 / 20:36:12 / cg"
! !
!DragAndDropManager methodsFor:'drawing'!