imágenes aleatorias

[kalisto]

con todas las imagenes dentro de un directorio, puedes utilizar findfirst y findnext para añadir el path de las mismas a una stringlist y con los numeros que te da la funcion que ya tienes puedes acceder al path de estas y cargar las imagenes en timages por ejemplo.

Algo asi:

  mitimage1.picture.loadfromfile(mistringlist[Ristra.PillaNumero])