Start the docking process
Source position: controls.pp line 1019
protected procedure TControl.DoStartDock(
var DragObject: TDragObject
); dynamic;