FileAge

Return the timestamp of a file.

Declaration

Source position: filutilh.inc line 83

function FileAge(

const FileName: String

):LongInt;

Description

FileAge returns the last modification time of file FileName. The FileDate format can be transformed to TDateTime format with the FileDateToDateTime function.

Errors

In case of errors, -1 is returned.

Example

Program Example36;

{ This program demonstrates the FileAge function }

Uses sysutils;

Var S : TDateTime;
    fa : Longint;
Begin
  fa:=FileAge('ex36.pp');
  If Fa<>-1 then
    begin
    S:=FileDateTodateTime(fa);
    Writeln ('I''m from ',DateTimeToStr(S))
    end;
End.

Notes

 No notes exist for this page yet.