动态数组

SetLength(Ary1, Length(Ary2));
Array1 := Copy(Ary2);

引用直接=号就可以了！

Delphi动态数组使用FillChar初始化动态数组：A:Array of integer,B:integer;

使用FillChar(A[0],sizeof(a[0])*length(A),#0);