Source position: ziptypes.pp line 78
type TReportRec = packed record
FileName: TDirtype;
Time: LongInt;
Size: LongInt;
CompressSize: LongInt;
Attr: Integer;
PackMethod: Word;
Ratio: Byte;
Status: LongInt;
IsaDir: Boolean;
end;