DragItem.Drag

From Xojo Documentation

Method

DragItem.Drag()

Supported for all project types and targets.

Allows the drag to take place. Note that it is only possible to change the image before calling Drag(), any attempt to do so after that point will fail.

Sample Code

This code drags the picture that is assigned to the Image property of an ImageWell to another ImageWell. In the MouseDown event of the first ImageWell, Drag is used to allow the drag.

Var d As DragItem
d = New DragItem(Self, X, Y, Me.Width, Me.Height)

d.DragPicture = Keaton534
d.MouseCursor = System.Cursors.HandOpen
d.Picture = Me.Image
d.Drag // Allow the drag

In the second ImageWell, put this code in its Open event to allow the picture drop:

Me.AcceptPictureDrop