用别名管理数组会给后期编写和调用带来很大的方便,尤其在以数组为参数的函数中更体现了优势。
type
TArr = array[0..255] of Byte;
TArr2= array of TArr;
var
i, j, iCount : integer; //iCount 数组第一维元素个数
a : TArr2;
begin
iCount := 8;
SetLength(a, iCount);
for i:= 0 to iCount - 1 do
for j:= 0 to 255 do
a[i, j]:= i + j;
end;
|
请发表评论