DoStartDrag - start performing the drag
Source position: controls.pp line 1020
protected procedure TControl.DoStartDrag(
var DragObject: TDragObject
); dynamic;