Randomize

Delphi7中如何使用Randomize生成1至6的随机数而非0？

本文共计161个文字，预计阅读时间需要1分钟。我想制作两个骰子，但不希望它们都投出0，这是我的代码：procedure TForm1.Button1Click(Sender: TObject);varx1, x2: integer;text