Source position: controls.pp line 1533
public function TControl.ClientToParent(
const Point: TPoint;
AParent: TWinControl = Nil
):TPoint;