random siempre me da el mismo valor

[sabueso1010]

hola foro quiero tener un numero aleatorio para cambiar aleatoriamente el fondo de pantalla de mi proyecto, las imagenes de fondo tienen nombre numerico es decir 1.jpg, 2.jpg, 3.jpg, etc, el problema es que nunca cambia
siempre me da como resultado aleatorio el numero 1, alguien tiene idea de que este pasando ?

este es mi codigo

Código Delphi [-]
var
  _fondo: string;
  r: integer;
begin
  r:=RandomRange(1,5);
  _fondo:=inttostr(r)+'.jpg';
  showmessage(_fondo);
  fondo.Image.Picture.LoadFromFile(_fondo);

saludos