在一个范围内，取随机数，怎么办？谢谢了！

在一个范围内，取随机数，怎么办？
(delphi7)我用 RandomRange ，不好使src如下：
var
  i : Integer;
begin
  // Show 5 random numbers in the range 652 to 656
  for i := 1 to 5 do
    ShowMessage('Random number : '+IntToStr(RandomRange(652, 656)));
end;编译时，报错，
[Error] Unit1.pas(33): Undeclared identifier: 'RandomRange'怎么解决?或者，还有什么更好的方法？
告诉我把！
         谢谢了，我郁闷了好久了；
救救吧！！！