Source position: tpa.pas line 94
function TPAInATPA(
const TPA: TPointArray;
const InATPA: T2DPointArray;
var Index: LongInt
):Boolean;