2
私はDelphi XE2でrandomrange関数を使用しようとしていますが、何らかの理由でそれを実行しようとすると宣言されていない識別子エラーを与え続けます。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'
任意の助けいただければ幸い..ありがとう。