delphi - RandomRange函数 'Undeclared Identifier'错误？

Question

我试图在 Delphi XE2 中使用 randomrange 函数，但由于某种原因，它在尝试运行它时不断给我一个未声明的标识符错误，这是我的代码。

var
  Form3: TForm3;
  number_of_digits, values, single, doubledig, triple, four, I : nativeint;

implementation

{$R *.dfm}

procedure TForm3.Button1Click(Sender: TObject);

begin
  Randomize;
  number_of_digits := radiogroup1.ItemIndex;
  single := RandomRange(0, 9);
  doubledig := RandomRange(10,99);
  triple := RandomRange(100,999);
  four := RandomRange(1000,9999);
  case number_of_digits of
  0 : values := single;
  1 : values := doubledig;
  2 : values := triple;
  3 : values := four;
  end;

我收到的错误是

E2003 Undeclared identifier: 'RandomRange'

任何帮助将不胜感激..谢谢。

Answer 1

RandomRange函数位于数学单元中。将该单元添加到您的 uses 子句中。

uses
  System.Math;