Source position: Img32.pas line 857
function ShortenPath(
const path: TPathD;
pathEnd: TPathEnd;
amount: Double
):TPathD;