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 读取剪粘板内的html格式数据

Delphi 获取中文/数字星期的函数

Delphi inifile to xml

Delphi 字符串加单引号

Delphi zlib 流压缩解压

Delphi 2009 之 tcategorypanelgroup[1]: chevronalignment 等

Delphi禁止用鼠标拖动窗口的大小

Delphi-改进获取文件md5 hash方法

Delphi 简单实习窗体靠边隐藏

Delphi 取字符串中间

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

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