Source position: controls.pp line 1019
protected procedure TControl.DoStartDrag(
var DragObject: TDragObject
); dynamic;