Random()

[SMTZ]

Hola, supongo que lo que buscas es algo parecido a esto:

procedure TWinForm.Button1_Click(sender: System.Object; e: System.EventArgs);
Var
   m_random : System.Random;

begin

   m_random.Next;

end;