ConcatenatePoints

procedure ConcatenatePoints(

  var pts: TArrayOfFixedPoint;

  const extras: TArrayOfFixedPoint

); overload;

procedure ConcatenatePoints(

  var pts: TArrayOfFixedPoint;

  const extras: array of TFixedPoint

); overload;