Skip to content

    FileDateToDateTime

    Convert a FileDate value to a TDateTime value.

    Declaration

    Source position: datih.inc line 170

    function FileDateToDateTime(Filedate: Int64) : TDateTime;

    Description

    FileDateToDateTime converts the date/time encoded in filedate to a TDateTime encoded form. It can be used to convert date/time values returned by the FileAge or FindFirst/FindNext functions to TDateTime form.

    Errors

    None.

    See also

    Name Description
    DateTimeToFileDate Convert a TDateTime value to a file age (integer).

    Example

    Program Example13;

{ This program demonstrates the FileDateToDateTime function }

Uses sysutils;

Var
  ThisAge : Longint;

Begin
 Write ('ex13.pp created on :');
 ThisAge:=FileAge('ex13.pp');
 Writeln (DateTimeToStr(FileDateToDateTime(ThisAge)));
End.