标题:[求助] 这个数组有什么问题?
只看楼主
p9998887778
Rank: 1
等 级:新手上路
帖 子:15
专家分:0
注 册:2006-5-13
 问题点数:0 回复次数:1 
[求助] 这个数组有什么问题?

代码是

procedure TForm1.Button1Click(Sender: TObject);
var
a:array of integer;
icount:integer;


begin
setlength(a,5);
for icount:=0 to 4 do
a[icount]:=icount+5;
edit1.Text:=inttostr(a[1]);
setlength(a,7);
edit2.Text:=inttostr(a[icount]);
setlength(a,3);
edit3.Text:=inttostr(a[3]);
end;

end.



结果得出edit1为6
edit2===0
可是怎么edit3就成天文数字了呢?(13968932)


为什么edit3会是天文数字啊?

求解
谢谢

2007-07-26 16:53
冰凝1984
Rank: 1
等 级:新手上路
威 望:1
帖 子:119
专家分:0
注 册:2006-5-25
得分:0 
setlength(a,3);
表明数组a的长度为3,那么它只能有3个值:a[0],a[1],a[2],而根本不存在a[3]

2007-07-31 15:07



参与讨论请移步原网站贴子:https://bbs.bccn.net/thread-158348-1-1.html




关于我们 | 广告合作 | 编程中国 | 清除Cookies | TOP | 手机版

编程中国 版权所有,并保留所有权利。
Powered by Discuz, Processed in 0.281192 second(s), 7 queries.
Copyright©2004-2025, BCCN.NET, All Rights Reserved