[delphizip] Re: How to set/change comment for a single file?

  • From: Roger Aelbrecht <Roger.Aelbrecht@xxxxxxxxx>
  • To: delphizip@xxxxxxxxxxxxx
  • Date: Tue, 24 Feb 2009 15:35:32 +0100

Edwin Yip wrote:
> thank you very much Roger.
> Implementing that in the event will cause the program logic to be
> unreadable...
> 
> Best Regards,
> Edwin Yip
> 
> Mind Mapping is as Effortless as Typing
> http://www.InnovationGear.com
> 
> 

I overlooked one other access possibility

If you know the filename use the Find method that will return a 
ZipDirEntry pointer.
Use idx := -1 for first search, idx will contain the index of the 
filename on return.

function TCustomZipMaster.Find(const fspec: String;
   var idx: Integer): pZipDirEntry;

The ZipDirEntry points to a packed record that has a member
FileComment: String;

-- 
Roger Aelbrecht


-----------
To unsubscribe from this list, send an empty e-mail 
message to:
  delphizip-request@xxxxxxxxxxxxx 
and put the word unsubscribe in the subject.

Other related posts: