(Gast)
n/a Beiträge
|
24. Jun 2003, 17:35
Hallo,
versuch es mal damit:
Delphi-Quellcode:
function GetFileDate(FileName: TFileName): TDateTime;
begin
if FileExists(FileName) then
begin
Result := FileDateToDateTime(FileAge(FileName));
end
else
begin
Result := MaxInt;
end;
end;
Grüsse, Daniel
|
|
Zitat
|