Question

delphi数组循环赋值的问题

var
Myarry:array of integer;
a:integer;
begin
setlength(Myarry,10);
for a:=1 to 10 do
begin
memo1.Lines.Add(inttostr(Myarry[a]));
end;
end;

end.
为什么结果会是：0
0
0
0
0
0
0
0
0
4531720
我想让他用for给每个数组进行赋值但是上面的结果不是 我想问下为什么？
还有就是：memo1.Lines.Add(inttostr(Myarry[a])); 这句为什么不能输入字符串 有什么办法转换为整数型后输入字符串吗？因为我想叫他得到这样的结果

Myarray[1] 1
Myarray[2] 2
Myarray[3] 3
Myarray[4] 4
Myarray[5] 5
Myarray[.] .10
这样字的

Answer 1

var
Myarry:array of integer;
a:integer;
begin
SetLength(Myarry,10);
for a:=0 to 9 do
begin
Myarry[a]:=a;
memo1.Lines.Add(inttostr(Myarry[a]));
end;
end;