Hola
Si no tubieran nombres serializados, lo que puedes hacer es cargar el nombre de todas las imagenes en un TStringList mediante FindFirst y FindNext y utilizar la misma idea que te ha comentado el amigo Andrés pero con el índice (apuntador) del TStringList
|