Source position: VGR32_Misc.pas line 96
function ClosestPointOnLine(
const pt: TFloatPoint;
const lnA: TFloatPoint;
const lnB: TFloatPoint;
ForceResultBetweenLinePts: Boolean
):TFloatPoint;