Código Delphi [-] var Fondo: string; begin Randomize; Fondo:= IntToStr(Random(5)+1)+'.JPG'; // +1 si no deseas obtener el valor 0 ShowMessage(Fondo); ... end;
var Fondo: string; begin Randomize; Fondo:= IntToStr(Random(5)+1)+'.JPG'; // +1 si no deseas obtener el valor 0 ShowMessage(Fondo); ... end;