TDragControlObject
pt
GetDragCursor
GetDragImages
TDragObject
EndDrag
Create
AutoCreate
HideDragImage
ShowDragImage