编程论坛
注册
登录
编程论坛
→
Delphi论坛
一个简单随机数问题
白狗狗
发布于 2006-10-31 17:51, 837 次点击
我想在一些固定整数中随机取值,该怎样做?
比如: 1, 5, 17, 88中随机取得一个整数。我使用了random()函数,配合数组array来实现,结果发现,定义数组必须是一个连续的整数范围;
谁能告诉我该怎么实现啊?拜托了!
2 回复
#2
wqz7436
2006-11-02 21:58
function MyRandom:integer;
const
NumList: array[0..6] of integer =(n1,n2,n3,n4,n5,n6,n7);//例:欲选的随机数为7个。
begin
Randomize;
result:=NumList[random(7)];
end;
#3
白狗狗
2006-11-06 15:25
太感谢这位朋友了!
看了你的代码,我知道怎么做了!谢谢你哦~感谢!
1