Source position: comctrls.pp line 2308
protected procedure TCustomTreeView.DoStartDrag(
var DragObject: TDragObject
); override;