[delphizip] Re: new property ??
- From: "Russell Peters" <russellpeters@xxxxxxxxxxx>
- To: <delphizip@xxxxxxxxxxxxx>
- Date: Fri, 6 Dec 2002 08:09:15 +1100
There was a property name Encrypted (or similar) but it was not implemented
probably because encryption is now done on a file by file basis.
It could be redone as HasEncrypted - List could set the field if it finds an
encrypted files or could count them.
Russell Peters
http://www.users.bigpond.com/russellpeters/delphizip.html
----- Original Message -----
From: "Matthias Lueck" <M.Lueck@xxxxxxxxxx>
To: <delphizip@xxxxxxxxxxxxx>
Sent: Thursday, December 05, 2002 8:31 PM
Subject: [delphizip] new property ??
>
> 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
>
>
>
Other related posts:
