TZipFileEntry

type TZipFileEntry = class(TCollectionItem)

public

  constructor Create(); override;

  function IsDirectory;

  function IsLink;

  procedure Assign(); override;

  property Stream: TStream; [rw]

published

  property ArchiveFileName: string; [rw]

  property UTF8ArchiveFileName: UTF8String; [rw]

  property DiskFileName: string; [rw]

  property UTF8DiskFileName: UTF8String; [rw]

  property Size: Int64; [rw]

  property DateTime: TDateTime; [rw]

  property OS: Byte; [rw]

Indication of operating system/file system

  property Attributes: LongWord; [rw]

  property CompressionLevel: Tcompressionlevel; [rw]

end;

TZipFileEntry

TCollectionItem

TPersistent,IFPObserved

TObject