TFileInfoRec

type TFileInfoRec = record

public

  FileNameRec: TFileNameRec;

  Exists: Boolean;

  IsDirectory: Boolean;

  Size: Int64;

  CreationTime: TDateTime;

  LastWriteTime: TDateTime;

  LastAccessTime: TDateTime;

  ReadOnly: Boolean;

  function ReadFileInfo();

  procedure Clear;

  function AsString;

end;