请问大家delphi中产生随机数的函数是什么?

解决方案 »

  1.   

    Random [ ( Range: Integer) ];返回的随机数范围在 0 <= X < Range I: Integer;
     begin
       Randomize;
       for I := 1 to 50 do begin
         { Write to window at random locations }
         Canvas.TextOut(Random(Width), Random(Height), 'Boo!');
       end;
     end;
      

  2.   

    Random [ ( Range: Integer) ]
      

  3.   

    function Random [ ( Range: Integer) ];
    如果没有指定range,返回一个实形的数
      

  4.   

    Random [ ( Range: Integer) ]
      

  5.   

    一定要用Randomize,不然产生随机数有规律。
      

  6.   

    ramdomize.
    ramdom()
    一起结合起来用。
      

  7.   

    嘿嘿,大富翁有一个随机数的例子。自己的随机数函数和random得比较。很有意思,可以看看。