Foros Club Delphi

Foros Club Delphi (https://www.clubdelphi.com/foros/index.php)
-   Varios (https://www.clubdelphi.com/foros/forumdisplay.php?f=11)
-   -   como borrar una carpeta con todos los archivos que contiene. (https://www.clubdelphi.com/foros/showthread.php?t=79977)

danyfebrero 25-08-2012 17:53:31

como borrar una carpeta con todos los archivos que contiene.
 
Hola a todos:
Necesito borrar una carpeta que contiene archivos y al tratar de borrarlas me da un error? Existe alguna manera de borrar la carpeta aunque contega archivos? Cual sería? Sino como podria vaciar la carpeta para luego borrarla.
Saludos y gracias de antemano
Dany

Casimiro Notevi 25-08-2012 18:26:12

Abajo de esta página, al final del todo, tienes algunos enlaces que pueden servirte.

¡¡¡Recuerda que puedes hacer búsquedas en los foros!!! ;)

danyfebrero 25-08-2012 20:18:22

gracias casimiro
de todas formas encontré este codigo por roman
Código Delphi [-]
    if DirectoryExists(directorio) then
      begin
        extension:='*.*';
        archivosaborrar:=directorio+extension;
        FileInfo.Wnd := Handle;
        FileInfo.wFunc := FO_DELETE;
        FileInfo.pFrom :=  PChar(archivosaborrar);
        FileInfo.pTo := nil;
        FileInfo.fFlags := FOF_NOCONFIRMATION;

        ShFileOperation(FileInfo);

        RmDir(directorio);
      end;

me funcionó perfecto gracias nuevamente.


La franja horaria es GMT +2. Ahora son las 21:22:37.

Powered by vBulletin® Version 3.6.8
Copyright ©2000 - 2024, Jelsoft Enterprises Ltd.
Traducción al castellano por el equipo de moderadores del Club Delphi