Concatenação de arrays

var
  Pontos1: array[0..1] of TPoint;
  Pontos2: array[0..2] of TPoint
begin
  Pontos1[0] := Point(0, 100);
  Pontos1[1] := Point(100, 200);
  Pontos2[0] := Point(50, 200);
  Pontos2[1] := Point(0, 0);
 //Agora queria junta-los, mas sem precisar criar um novo vetor
  Canvas.Polygon(Pontos1 + Pontos2); //teoricamente
  Canvas.Polygon(Concat(Pontos1, Pontos2));
end;