Borrando en cadena

[VolaRe]

¿Que funcion de borrado de archivos usas?
Te recomiendo que primero uses FindFirst, FindNext y FindClose y cuando hayas acabado con esas funciones uses esa funcion de borrado de directorio (RemoveDir). Puedes buscar en la ayuda de delphi que te esplica muy bien como usar esas tres funciones que te he comentado.
Suerte compañero

[roman]

Una manera de borrar toda una carpeta sin necesidad de recorrer recursivamente todas las subcarpetas es utilizando la función ShFileOperation:

Código Delphi [-]
uses
  ShellApi;

procedure DeleteFolder(Folder: String);
var
  FileOpInfo: TShFileOpStruct;

begin
  FillChar(FileOpInfo, SizeOf(FileOpInfo), 0);
  FileOpInfo.wFunc := FO_DELETE;
  FileOpInfo.pFrom := PChar(Folder);
  FileOpInfo.fFlags := FOF_NOCONFIRMATION;

  ShFileOperation(FileOpInfo);
end;

// Saludos