Thema: Delphi Ordner löschen?

Einzelnen Beitrag anzeigen

Benutzerbild von scrat1979
scrat1979

Registriert seit: 12. Jan 2007
Ort: Sulzbach a.d. Murr
1.028 Beiträge
 
Delphi 10.4 Sydney
 
#8

Re: Ordner löschen?

  Alt 5. Jul 2007, 21:47
Zitat von Luke_83:
Ergänzende Frage : Gibt es auch eine Möglichkeit Ordner zu löschen in denen sich Dateien und Unterordner befinden.

RemoveDir(Path) funktioniert ja nur bei leeren Ordnern.
Wie schon angedeutet wurde, würde ich mir alle Dateien (inkl. in den Unterordnern) auflisten (Stichwort Rekursive Suche, Suchfunktion liefert massenweise Ergebnisse ).
Speichere alle Verzeichnisse (kannst diese aus den Dateinamen aus der rekursiven Funktion bekommen...) in eine StringList und lösche dann die Dateien (zB. schon in der Funktion).
Danach die StringListe durchgehen und RmDir(Liste[Index]) von 0 bis (Liste.Count-1) durchlaufen. Voila!

Ohne Exception-Handling ganz einfach zu machen. Beachte aber auch, daß evtl. Dateien geöffnet sein könnten und somit nicht zum löschen freigegeben sind....

SCRaT

//EDIT: Könnte sein, daß es mit SHFileOperation auch einfacher funktioniert...
Michael Kübler
  Mit Zitat antworten Zitat