获取 65 到 90 之间的随机数

Question

我需要得到一个介于 65 和 90 之间的随机数。我试着说 random(65, 90) 但它说我有太多的实际参数。

procedure TfrmWordGame.FormCreate(Sender: TObject);
var
  randomNumber : integer;
begin
  randomNumber := random(65, 90);
end;

end.

此外，我尝试说 randomRange(65, 90)

Answer 1

多年来我一直在使用这个自制功能：

FUNCTION RND(MIN,MAX : INTEGER) : INTEGER; INLINE;
  BEGIN
    Result:=RANDOM(SUCC(MAX-MIN))+MIN
  END;

替代方案（使用现代 Delphis 中可用的 System.Math.RandomRange）是：

FUNCTION RND(MIN,MAX : INTEGER) : INTEGER; INLINE;
  BEGIN
    Result:=RandomRange(MIN,SUCC(MAX))
  END;

Get a random number between 65 and 90