Wie man Erstellungs-/Letzte-Änderungsdaten einer Datei in Delphi erhält?

Question

Ich möchte die Attribute dieser Datei als Ganzzahlenwerte erhalten.

Answer 1

Dies sollte funktionieren und es handelt sich um nativen Delphi-Code.

function GetFileModDate(filename : string) : integer;
var
  F : TSearchRec;
begin
  FindFirst(filename,faAnyFile,F);
  Result := F.Time;
  //if you wanted a TDateTime, change the return type and use this line:
  //Result := FileDateToDatetime(F.Time);
  FindClose(F);
end;

Answer 2

Sie könnten die GetFileInformationByHandle WinAPI-Funktion aufrufen. Offensichtlich gibt es auch eine GetFileLastWrite-Funktion in JCL, die Sie verwenden könnten.