#ObjectPascalFeatures

var 
  di: array of Integer;
  i: Integer;

begin
  di := [1, 2, 3];       // initialization
  di := di + di;         // concatenation
  di := di + [4, 5];   // mixed concatenation

  for i in di do
  begin
     Show(i.ToString);
  end;

end.

These features to dynamic arrays were added in Delphi XE7