Delphi Nochmal FileAge - Delphi-PRAXiS

Thema durchsuchen

Ansicht

Themen-Optionen

Nochmal FileAge

Ein Thema von Willie1 · begonnen am 5. Nov 2020 · letzter Beitrag vom 9. Nov 2020

Vorheriger Beitrag

Nächster Beitrag

Willie1

Registriert seit: 28. Mai 2008
698 Beiträge

Delphi 10.1 Berlin Starter

AW: Nochmal FileAge

6. Nov 2020, 16: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.