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;