delphi 随机函数简单问题。 我想请问一下,我定义一个函数比如:randomAB,我想让我的随机数在A和B之间产生,请问我的定义函数该如何编写?比如我想从10和20之间产生! 解决方案 » 免费领取超大流量手机卡,每月29元包185G流量+100分钟通话, 中国电信官方发货 Random(A, B: Integer)begin //生成一个随机数在0 ~ (A-B)之间,然后加上A就是想要的随机数 Result := A+ Random(B-A);end; Randomize; 10+Random(11); Random(A, B: Integer)begin //不好意思,刚才说错了,是在(B - A)之间 (B要是大于或等于A的) //生成一个随机数在0 ~ (B-A)之间,然后加上A就是想要的随机数 Result := A+ Random(B-A);end; Randomize;Result := A+ Random(B-A);先调用Randomize来初始化一下随机数种子。 为什么我是用的Randomize;Result := A+ Random(B-A);比如我的数字是522200到522300之间生成的数字是个12位数,请问一下为什么。 delphi2010编写代码出现的问题. 50分求,多表查询SQL语句,在线急等!!!!!!!!!!!!!!!! 帮忙看看这个类型转换,急啊 why ?? tell me why?thank you! 急问:关于delphi6报表中QRCompositeReport控件的问题 散分了:请问哪位大虾知道最新的spcomm控件的最新版本的下载啊,急!!!来者有分啊 分辨率问题!! delphi中如何实现像园角窗体的效果? 如何设置字型?立即给分?(up有分) 如何比较有效地捕捉程序中触发的错误?70分征答。 [求助]主窗体置前的问题 提取网页内容的出错
begin
//生成一个随机数在0 ~ (A-B)之间,然后加上A就是想要的随机数
Result := A+ Random(B-A);end;
10+Random(11);
begin
//不好意思,刚才说错了,是在(B - A)之间 (B要是大于或等于A的)
//生成一个随机数在0 ~ (B-A)之间,然后加上A就是想要的随机数
Result := A+ Random(B-A);
end;
Result := A+ Random(B-A);先调用Randomize来初始化一下随机数种子。
Randomize;
Result := A+ Random(B-A);
比如我的数字是522200到522300之间
生成的数字是个12位数,请问一下为什么。