Var
Arry:Array of array of Integer;
begin
SetLength(arry,10)//Delphi支持畸形数组,每行的列的个数可以不一样,这里先设置数组有10行
SetLength(Arry[0],10);//设置第一行有10列
SetLength(arry[1],5);//设置第二行有5列
for i:=2 to 9 do
begin
setLength(arry,9);//设置其它行为9列
end;
//赋值
Arry[0,0]:=1;
arry[1,4]:=3;