ayo520 发表于 2025-2-27 15:30:30

Delphi中Random随机数函数要怎么使用

随机数生成怎么使用和定义,举一个实例有没有

FishC 发表于 2025-2-27 15:31:56

在Delphi中,可以使用 Random 函数来生成随机数。在使用随机数函数前,你需要用 Randomize 函数初始化随机数生成器。下面是一个简单的示例,展示了如何生成随机数:

procedure TForm1.Button1Click(Sender: TObject);
var
randomNumber: Integer;
begin
Randomize; // 初始化随机数生成器
randomNumber := Random(100); // 生成0到99之间的随机数
ShowMessage('随机数: ' + IntToStr(randomNumber));
end;

上面的代码将在按钮点击时生成一个 0 到 99 之间的随机数,并显示在消息框中。

如果你有进一步的问题或需要更多示例,请告诉我!

以上回复来自 FishC AI 小助理,如未能正确解答您的问题,请继续追问。
页: [1]
查看完整版本: Delphi中Random随机数函数要怎么使用