DragAndDropManager.st
changeset 4185 6d6795c91e9c
parent 4184 4d4033f31e3c
child 4343 1441ab3626b6
equal deleted inserted replaced
4184:4d4033f31e3c 4185:6d6795c91e9c
  1615                         point := point + targetPoint.
  1615                         point := point + targetPoint.
  1616                     ].
  1616                     ].
  1617                     "/
  1617                     "/
  1618                     "/ FeedBack: set the widget which handles the drop
  1618                     "/ FeedBack: set the widget which handles the drop
  1619                     "/
  1619                     "/
  1620                     aContext targetWidget:aWidget id:(aWidget id).
  1620                     aContext targetWidget:aWidget id:(aWidget drawableId).
  1621                 ].
  1621                 ].
  1622                 aWidget dropObjects:(aContext dropObjects) at:point
  1622                 aWidget dropObjects:(aContext dropObjects) at:point
  1623             ]
  1623             ]
  1624         ].
  1624         ].
  1625     ].
  1625     ].
  1626 
  1626 
  1627     "Modified: / 13-10-2006 / 17:52:56 / cg"
  1627     "Modified: / 13-10-2006 / 17:52:56 / cg"
       
  1628     "Modified: / 01-10-2018 / 17:05:54 / Claus Gittinger"
  1628 !
  1629 !
  1629 
  1630 
  1630 doFindDropTargetIn:aView at:aPoint
  1631 doFindDropTargetIn:aView at:aPoint
  1631     "get the drop target for a view and source at a point or nil"
  1632     "get the drop target for a view and source at a point or nil"
  1632 
  1633