Hello Eric, is it possible, to create a new property in the ZipMaster-Component ?? : private FArchivEncrypted: Boolean; // ==> Check-Flag, Archiv is encrypted public ArchivEncrypted: Boolean read FArchivEncrypted default false; : in the procedure TZipMaster.List: : pzd^.Encrypted:= (pzd^.Flag and 1) > 0; FArchivEncrypted:= pzd^.Encrypted; : Matthias Lück Globus SB-Warenhaus Holding GmbH & Co. KG D-66606 St. Wendel (GERMANY) IT-Entwicklung (Infosysteme) Tel.: +49 6851 / 909-1182 Fax : +49 6851 / 909-601 Mail: m.lueck@xxxxxxxxxx