delphi怎么实现一定范围内的随机数呢?


本文整理自网络,侵删。

 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使用文件拖放功能

Delphi编程实现sql server挂起清除

Delphi 调用sql和mysql存储过程

Delphi获取本地全部盘符并存如combobox1

Delphi 检查程序是否在(vm,vpc等)虚拟机运行 Delphi(测试可用)

Delphi 7 编写一个ie右键菜单项目:自动保存图片

Delphi isipadress 非正则表达式验证ip的方法

Delphi 服务端日志记录

Delphi getdrivetypea() 查看驱动器类型

更多相关阅读请进入《Delphi》频道 >>



打赏

取消

感谢您的支持,我会继续努力的!

扫码支持
扫码打赏,您说多少就多少

打开支付宝扫一扫,即可进行扫码打赏哦

分享从这里开始,精彩与您同在

评论

管理员已关闭评论功能...