Hola LuisAlf.
Delphi trae la función
Random que genera números aleatorios.
Ejemplo con las dos funciones relacionadas a
Random:
Código Delphi
[-]
var
x: Double;
n: Longint;
begin
n:= 1507;
RandSeed:= n: Randomize; x:= Random; end;
Mostrar un número aleatorio entre 1 y 100:
Código Delphi
[-]
ShowMessage(IntToStr(Random(100) + 1)));
Notarás que al fijar el rango, en este caso no devuelve un número real. El '+1' es necesario pués sin él el resultado estaría comprendido entre 0 y 99
Tenés más información en la ayuda de Delphi, y también aca:
Random .
Un saludo.