Buscar archivos con FindFirst

[eulogi_SCG]

Hola!

Estoy programando un procedimiento para borrar archivos de un directorio y de de todos sus directorios hijos. Lo que me queda por hacer es que borre solo los archivos con una extension determinada. Estoy utilizando FindFirst de la forma siguiente:

Codigo:

path: Es la ruta del directorio que quiero buscar y eliminar los archivos.
Ficheros: Es el nombre de los ficheros que quiero buscar. P.e. *.txt.
Es aquí donde quiero saber si se pueden pasar mas de un nombre de fichero a la vez.

FindFirst(Path+ficheros, faAnyFile, srInfo);

fin código.

Cuando acabe el programilla lo pegaré.

Un saludo y gracias por adelantado.

[delphi.com.ar]

Si te sirve, aquí tienes varias funciones para borrar directorios completos: http://www.clubdelphi.com/foros/showthread.php?t=3663

Simplemente tendrías que cambiar el filtro *.* por el filtro que quieras, y quitar el llamado a RemoveDir para que no borre los directorios.

Saludos!

[Neftali [Germán.Estévez]]

Estoy programando un procedimiento para borrar archivos de un directorio y de de todos sus directorios hijos. Lo que me queda por hacer es que borre solo los archivos con una extension determinada. Entre los trucos del ClubDelphi hay uno que implementa una función/procedimiento para eliminar todos los ficheros de un directorio y de sus subdirectorios de forma recursiva.
Borra un directorio completo (http://www.clubdelphi.com/vertruco.php?id=310).

Fácilmente es adaptable a lo que tú necesitas cambiando la referencia a *.* que hay en el código por un nuevo parámetro de tipo String que admita y trabaje con cualquier máscara (*.txt, *.log, *.*,...).