1. Random

function Random [ ( Range: Integer) ];：產生一個0<=X<Range的隨機數。例如：

Random(10);  //隨機產生一個大於等於0小於10的數

使用Random之前，要先用Randomize過程或RandSeed函式來初始化隨機數產生器。

2. RandomFrom

function RandomFrom(const AValues: array of Double): Double; overload;
function RandomFrom(const AValues: array of Integer): Integer; overload;
function RandomFrom(const AValues: array of Int64): Int64; overload;
function RandomFrom(const AValues: array of string): string; overload;

從AValues陣列中隨機返回一個數。使用RandomForm之前，要先用Randomize過程或RandSeed函式來初始化隨機數產生器。

3. Randomize

procedure Randomize;：初始化內建的隨機數生成器。

procedure TForm1.Timer1Timer(Sender: TObject);
begin
    Randomize;
    Edit1.Text := inttostr(Random(90));
end;

4. RandomRange

function RandomRange(const AFrom, ATo: Integer): Integer;：在整數範圍內隨機產生一個整數。其中，AForm、ATo代表整數範圍。使用RandomRange之前，要先用Randomize過程或RandSeed函式來初始化隨機數產生器。

5. RandomSpeed

var RandSeed: LongInt = 0;：通過為變數賦予指定值儲存內建隨機數發生器的種子，可以利用Random函式分別產生指定的隨機數序列。例如：

RandSeed := GetRand(1,255);  //返回1到255的一個隨機數