Delphi Random() 随机函数
<p><span style="font-size: 16px"><strong>Delphi Random() 随机函数</strong></span><br><span style="font-size: 16px"><strong>函数原型</strong>：function Random ( Range: Integer) :integer;</span></p><p><span style="font-size: 16px"><strong>参数</strong>：Range:整数，</span><br><span style="font-size: 16px"><strong>返回值</strong>：整数，其范围为：</span></p>
<ul>
<li><span style="font-size: 16px">0 <= Random(Range) < Range (指定Range)</span></li>
<li><span style="font-size: 16px">0 <= Random< 1 (不带参数Range)</span></li>
</ul>
<p><span style="font-size: 16px">Random（）生成随机数。（运行几次会发现取得的随机数一样，因为系统的随机种子没有改变，Ramdomize; 用来改变随机种子）。</span></p>
<p><span style="font-size: 16px">例：</span></p>
<div class="cnblogs_Highlighter">
<pre class="brush:delphi;gutter:true;"><span style="font-size: 16px">begin
Randomize; //初始化随机数发生器
Random(N); //生成一个随机整数，范围在0-N之间，包含0;
end;//
</span></pre>
</div>
<p><span style="font-size: 16px"> </span></p>
<p><span style="font-size: 16px">在delphi7 中实测：</span></p>
<div class="cnblogs_Highlighter">
<pre class="brush:delphi;gutter:true;"><span style="font-size: 16px">var
i:integer;
begin
//Randomize; //无初始化，每次的随机数都一样 例如：0、2、6、9、5 下次打开又是 0、2、6、9、5
Listbox1.Clear ;
for i:=1 to 10 do
begin
Listbox1.Items.Add(inttostr(random(10)));
end;
end;</span></pre>
</div>
<p><span style="font-size: 16px"> </span></p>
<p> </p>
<p><span style="color: rgba(136, 136, 136, 1); font-size: 12px">创建时间：2020.03.19 更新时间：2020.03.19</span></p>
<p> </p>
</div>
<div id="MySignature" role="contentinfo">
博客园 滔Roy https://www.cnblogs.com/guorongtao 希望内容对你有所帮助，谢谢！<br><br>
来源：https://www.cnblogs.com/guorongtao/p/12523138.html
頁:
[1]