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 利用http的post方法做个在线翻译的小工

Delphi 中文大写日期转换函数

Delphi gdi+ 实现简单画图

Delphi 调用单元unit代码

Delphi 自带大小写转换

Delphi区分汉字和字母的函数

Delphi 自我拷贝复制

减小Delphi xe5编译出来的程序体积

Delphi xe5 android 调用 google zxing

Delphi 常用4种对话框

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

转载请注明出处：木庄网络博客 » delphi怎么实现一定范围内的随机数呢？