注册 登录
编程论坛 Delphi论坛

[求助]随机选取数字错误,急!

aaron52088 发布于 2007-04-10 15:58, 839 次点击

在一个button的onmousedown中写如下程序:
n是一个panel的数目,
e:=Random(n); //表示随机选中一个panel
if a[e].Color=clGreen then showmessage('ok') //判断该panel的颜色如果是绿色则显示ok
else showmessage('no');
程序运行时候没有错,但是在单击button的时候,会出现如图错误,
程序如果把e改成一个固定的数就不会出现错误就可以正常运行,
是我在e:=Random(n)这里写错了吗?
要怎么改才可以呢?
麻烦大家看看,谢谢

只有本站会员才能查看附件,请 登录

2 回复
#2
xu20002007-04-11 00:43
a是什么?
#3
aaron520882007-04-11 07:52
a是数组,问题我已经解决了,谢谢帮忙的。
第一句e:=Random(e)+1;就可以了,
因为第一位是0
1