Thema: Delphi Nochmal FileAge

Einzelnen Beitrag anzeigen

Willie1

Registriert seit: 28. Mai 2008
668 Beiträge
 
Delphi 10.1 Berlin Starter
 
#3

AW: Nochmal FileAge

  Alt 6. Nov 2020, 17:59
Hallo Himitsu,
ich will die vielen Warnungen ernst nehmen und werde mir ein neue function FileAge bauen mit Rückgabewert TDateTime. Da kann ich den Quelltext einfacher anpassen.
Noch 'ne Frage: was kann denn beim Auslesen des File-Datum schief gehen, klar die Datei muss vorhanden sein, aber was denn sonst?
Ich habe es ausprobiert, bei falschem Dateinamen gibt das neue FileAge false und FileDateTime = 0 zurück, das finde ich in Ordnung.
Kann ich das so machen?
function FileAge(const fn: TFilename): TDateTime; overload;
begin
if not FileAge(fn, Result) then Result := 0;
end;

Willie.
Gut hören kann ich schlecht, schlecht sehen kann ich gut - Ersteres stimmt nicht, das zweite schon.

Geändert von Willie1 ( 6. Nov 2020 um 18:17 Uhr) Grund: Quelltext
  Mit Zitat antworten Zitat