Zitat von
cruiser:
aus. Oder geht das nur mir so?
Ja, das habe ich auch erst gedacht, das wäre am Naheliegendsten.
Zu FindAllFiles, nur ein kleiner Tipp:
Angenommen, du nutzt
diese Prozedur. Binde die Funktion 'GetFileDateTime' aus deinem Link mit ein, dann kannst du ganz leicht so die gewünschten Informationen ermitteln:
TDateDynArray = array of TDateTime;
Dann noch diese Zeile
Files[FileCount - 1] := RootFolder + String(wfd.cFileName);
durch diese ersetzen:
Files[FileCount - 1] := GetFileDateTime(RootFolder + String(wfd.cFileName));
Und schon hast du das Erstelldatum (und die Uhrzeit) in deinem Array. Das lässt sich natürlich auf beliebige Funktionen anwenden. Vergleichen kannst du die Daten dann ganz einfach mit den Vergleichsoperatoren (<, >, >=, <=, ...), da die Informationen bereits vom Typ TDateTime sind.