Obtener los archivos de un directorio

[roman]

Empezado por DarkByte

Claro está, esto también me da los archivos de los subdirectorios y todo, cosa que no quiero. Me gustaría implantar la solución de Román a mi procedure, ya que el function de quimeras me da error en la primera línea como que no he definido el tipo de resultado (Uso Delphi Enterprise).

¿Y cuál es la duda?

De hecho lo "difícil" es hacerlo recursivo pero si no lo necesitas entonces la respuesta está desde el mensaje de delphi.com.ar al principio del hilo.

// Saludos