本文整理自网络,侵删。
delphi怎么实现一定范围内的随机数呢?
//指定范围的随机数函数
function Rand(min,max:Integer):Integer;
begin
randomize;
Result:=random(max) mod (max-min+1)+min;
end;
//调用
Rand(100,1000);
显示结果是100~1000之间的随机数
相关阅读 >>
Delphi 10.3版本获取windows系统版本和cpu信息
Delphi 检查程序是否在(vm,vpc等)虚拟机运行 Delphi(测试可用)
Delphi isipadress 非正则表达式验证ip的方法
Delphi getdrivetypea() 查看驱动器类型
更多相关阅读请进入《Delphi》频道 >>