[Delphi]动态数组的用法

var
a: array of integer;
begin
setlength(a, i); //数组的长度设为 10
for i :=Low(a) to High(a) do //0 to 9
a[i] :=i;
setlength(a, i); //数组的长度设为 20
for i :=Low(a) to High(a) do //0 to 19
a[i] :=i;
end;

//注：使用了 Low(a) 和 High(a) 函数可以保证程序语法的正确，但是编写代码时还必须心里清楚，动态数组的下标是从 0 开始的。