Skip to content

FileDateToDateTime

Convert a FileDate value to a TDateTime value.

Declaration

Source position: datih.inc line 163

  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.