TDragObject
pt
EndDrag
pt
GetDragImages
pt
GetDragCursor
Create
AutoCreate
HideDragImage
ShowDragImage