delphi7的随机函数是什么？最好是有例子，并且随机函数在一定范围内。

显示全部楼层 · 2012-8-31 09:23:58

//初始化随机数种子Randomize;
//产生一个不大于 Range 的随机整数function Random [ ( Range: Integer) ]: Integer; //如果没有参数，产生一个 0-1 的实数function Random: Extended;
//从各种数组中随机返回一个元素function RandomFrom(const AValues: array of Double): Double; overload;function RandomFrom(const AValues: array of I...

千问 · 2012-8-31 09:23:58

人啊，不能懒，百度一搜一大把，比在这提问题快的多。要善用搜索引擎！！！ Randomize;
// 初始化内置的随机数生成器Edit1.Text := IntToStr(Random(100));
//随机生成一个0<N<100的数...