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未声明的标识符：'RandomRange'

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

Answer 1

RandomRange功能位于Math单元中。将该单元添加到uses子句中。

uses
  System.Math;