Source position: XGR32_Algebra.pas line 60
function Distance(
const Pt1: TPoint;
const Pt2: TPoint
):Single;