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

ayo520

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

FishC

在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 小助理，如未能正确解答您的问题，请继续追问。