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

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.