Delphi-PRAXiS - Delphi Ordner bis auf die letzten X Dateien löschen

Delphi-PRAXiS (https://www.delphipraxis.net/forum.php)

- Object-Pascal / Delphi-Language (https://www.delphipraxis.net/32-object-pascal-delphi-language/)

- - Delphi Ordner bis auf die letzten X Dateien löschen (https://www.delphipraxis.net/15521-ordner-bis-auf-die-letzten-x-dateien-loeschen.html)

lkz633

30. Jan 2004 09:59

Ordner bis auf die letzten X Dateien löschen

Hallo,

wie der betreff schon sagt, ich würde gerne in einem Ordner alle Dateien löschen bis auf die 10 letzten(abhänig von der Zeit)

Ich weiss dass ich mit TSearchRec die Zeit einer Datei zurückbekomme, ich kann doch jetzt aber nicht alle Dateien durchgehen und mir die Zeiten merken, diese speichern, sortieren, und dann die anderen Dateien löschen.

Hat dazu jemand eine Idee bzw gibt es eine einfache Lösung?

Gruss lkz633

Alle Zeitangaben in WEZ +1. Es ist jetzt 06:00 Uhr.