Aar*_*ron 8 delphi random numbers range
这是Delphi(确切地说是7).如何在特定范围内生成随机数？与random.randint(1,6)Python 类似.我正在尝试模拟掷骰子.另一种选择是以某种方式排除0.
random.randint(1,6)
目前我有:
Randomize; Roll := Random(7); Label3.Caption := IntToStr(Roll);
And*_*and 22
您可以使用
RandomRange(1, 7)
这将从集{1,2,3,4,5,6}中返回一个随机整数.
(uses Math)
uses Math
[顺便说一下,'以某种方式'排除零是微不足道的.做吧Random(6) + 1.]
Random(6) + 1
归档时间：
14 年，1 月 前
查看次数：
20563 次
最近记录：
12 年，1 月 前