pl 

BeginDrag (TGtkWSDragImageList)

pl 

DragMove (TGtkWSDragImageList)

pl 

EndDrag (TGtkWSDragImageList)

pl 

HideDragImage (TGtkWSDragImageList)

pl 

ShowDragImage (TGtkWSDragImageList)