type
tstr=array of array of array of array of string;
var
i:integer;
str:tstr;
begin
setlength(str,5,5,5,5);
for i:=0 to 4 do
begin
str[i,1]:=inttostr(i);
str[i,2]:='*';
end;end;为何出错?
tstr=array of array of array of array of string;
var
i:integer;
str:tstr;
begin
setlength(str,5,5,5,5);
for i:=0 to 4 do
begin
str[i,1]:=inttostr(i);
str[i,2]:='*';
end;end;为何出错?
i:integer;
str;array of array of array of array of string;
begin
setlength(str,5,5,5,5);
for i:=0 to 4 do
begin
str[i,1]:=inttostr(i);
str[i,2]:='*';
end;end;
[Error] Unit1.pas(34): Incompatible types: 'String' and 'dynamic array'
[Error] Unit1.pas(35): Incompatible types: 'Char' and 'dynamic array'
[Fatal Error] Project1.dpr(5): Could not compile used unit 'Unit1.pas'
tstr=array of string;
var
i:integer;
str:tstr;
begin
setlength(str,5);
for i:=0 to 4 do
begin
str[i,1]:=inttostr(i);
str[i,2]:='*';
end;end;
str[0,0,0,0]:=inttostr(i);str[i,1,1]是个三维的数组变量
str[i,1]是个二维的数组变量
str[i]是个三位的数组变量
type
tstr=array of array of string;
var
i:integer;
str:tstr;
begin
setlength(str,5,5);
for i:=0 to 4 do
begin
str[i,1]:=inttostr(i);
str[i,2]:='*';
end;end;
i:integer;
str:array of array of array of array of string;
begin
setlength(str,5,5,5,5);
for i:=0 to 4 do
begin
str[i,1,1,1]:=inttostr(i);
str[i,1,1,2]:='*';
end;end;
jinjazz(人雅的标记--落寞刺客)
是正确的