RandomRange函数'Undeclared Identifier'错误？

Question

我想在Delphi XE2中使用随机范围函数，但由于某些原因，它在尝试运行时会一直给我一个未声明的标识符错误，这里是我的代码。

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;