Google mal nach "Randomize".

Geht z.B. so:
Code:
Var 
  Int: Integer;
Begin

Randomize;
Int := Random(101);
Er gibt dann eine Zufallszahl zwischen 0 und 100 aus.