Randomize

Delphi7中如何实现Randomize后从1至6随机选择非0数字的功能？

本文共计156个文字，预计阅读时间需要1分钟。我想要制作2个骰子，但我不想它选0，这是我的代码：procedure TForm1.Button1Click(Sender: TObject);varx1, x2: integer;text1,