／⌒＼　　
　　　　γ彡・ω)ﾐ　　　　　　／￣￣￣￣￣￣￣￣￣￣￣￣￣
　　　　 |ミ,, ﾟДﾟ彡 　　　　＜　D6のHELPです
　　　　 |　つ＿||￣￣￣ |　＼＿＿＿＿＿＿＿＿＿＿＿＿＿
　　　〜ﾐ,,, ,,|＼||Letsﾉ-ﾄ| 　
　　　　　　　'＼||.======.| 　ちゃんとＨＥＬＰにあるよ
　　　　　　　　　 ￣￣￣　
> ユニットSystem
> function Random [ ( Range: Integer) ];
> 説明
> Random 関数は，0 <= X < Range の範囲にある乱数を返します。
> Range を指定しないと，結果は 0 <= X < 1 の範囲にある実数型の乱数になります。

こんなのもあるよ。

> ユニットMath
> function RandomRange(const AFrom, ATo: Integer): Integer;
> 説明RandomRange 関数は，AFrom から ATo までの範囲で無作為に整数を返します。
> RandomRange は，負の範囲（AFrom が ATo より大きい）を処理できます。