Dateien in Verzeichnis finden und Timestamps erhalten? (in einem Rutsch)

[a.def]

Aktuell verwende ich FindFirst, FindNext, um Dateien in einem Verzeichnis zusammenzutreiben und in eine StringListe zu schreiben.
Ich hole mir aber auch noch die Timestamps.

FindFirst und FindNext bietet wohl keine Möglichkeit direkt an die Timestamps zu kommen, daher raubt mir das zusätzliche Holen der Timestamps unglaublich Zeit.
Denn ich hole mit die Zeiten zusätzlich dann mit TFile.GetCreationTime() usw.
Mein Grundgerüst ist in etwa so: http://www.delphipraxis.net/2235-ver...rchsuchen.html

Gibt es eine Möglichkeit dennoch direkt die Timestamps in einem Rutsch zu bekommen ohne mehrfach auf die Datei zugreifen zu müssen :idea:

[mkinzler]

Werte TSearchRec.FinData aus.

[himitsu]

Zitat:

Zitat von a.def (Beitrag 1357644)

FindFirst und FindNext bietet wohl keine Möglichkeit direkt an die Timestamps zu kommen,

A) Welche Timestamps? (du redest ja nur von "Timestamp" :zwinker:)
B) Ich glaub da hast du falsch geguckt.

PS: FindFirst kapselt FindFirstFile und gibt die inneren Werte auch direkt raus.

[a.def]

Zitat:

Zitat von himitsu (Beitrag 1357648)

Zitat:

Zitat von a.def (Beitrag 1357644)

FindFirst und FindNext bietet wohl keine Möglichkeit direkt an die Timestamps zu kommen,

A) Welche Timestamps? (du redest ja nur von "Timestamp" :zwinker:)
B) Ich glaub da hast du falsch geguckt.

PS: FindFirst kapselt FindFirstFile und gibt die inneren Werte auch direkt raus.

Mit Timestamp meine ich Erstellungszeit, letzte Modifikationszeit und letzte Zugriffszeit :P

Zitat:

Zitat von mkinzler (Beitrag 1357647)

Werte TSearchRec.FinData aus.

Delphi-Quellcode:

TDirectory.GetLastWriteTime(Root + SR.Name)

ist nun

Delphi-Quellcode:

SR.FindData.ftLastWriteTime;

Ich glaube so blind war ich noch nie zuvor :pale:
Jetzt muss ich nur noch gucken was der mit Low und High will :thumb:

Memo an mich selbst: nächstes mal besser hingucken.

[himitsu]

Im MSDN steht, wie man die Timestamps auszuwerten hat.
WIN32_FIND_DATA

Oder du guckst ab.
TSearchRec.Time bzw. TSearchRec.TimeStamp