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

  • From: Edwin Yip <edwin.yip@xxxxxxxxxxxxxxxxxx>
  • To: delphizip@xxxxxxxxxxxxx
  • Date: Thu, 26 Feb 2009 00:02:50 +0800

Roger, I found the solution myself, assign 'nosuchfil.nosuchfileext' to
fFileSpec and all Add, this will do that trick! thank you.
Best Regards,
Edwin Yip
Mind Mapping is as Effortless as Typing
http://www.InnovationGear.com


On Wed, Feb 25, 2009 at 10:37 PM, Edwin Yip <edwin.yip@xxxxxxxxxxxxxxxxxx>wrote:

> Thank you Roger, that seems to be true with the current version. Is there
> another way to trigger that event for all files without calling the Add
> method? Thank you.
> Best Regards,
> Edwin Yip
>
> Mind Mapping is as Effortless as Typing
> http://www.InnovationGear.com
>
>
> On Wed, Feb 25, 2009 at 10:31 PM, Roger Aelbrecht <
> Roger.Aelbrecht@xxxxxxxxx> wrote:
>
>> Edwin Yip wrote:
>> > Hi Roger,
>> > I'm wrong that the Find method is not public, I make that guess upon
>> reading
>> > the help.
>> > Anyway I looked its source and it returns a entry of of the DirEntry
>> list,
>> > and I tried setting the DirEntry[0].Filecomment value but it seems that
>> the
>> > comment is not saved back to the ZIP archive. any tips? thank you.
>> >
>> > Best Regards,
>> > Edwin Yip
>> >
>> > Mind Mapping is as Effortless as Typing
>> > http://www.InnovationGear.com
>> >
>> >
>> > On Wed, Feb 25, 2009 at 7:20 PM, Edwin Yip <
>> edwin.yip@xxxxxxxxxxxxxxxxxx>wrote:
>> >
>> >> Hi Roger,
>> >> It seems that the Find method is not published in TZipMaster, of course
>> >> this is a tiny problem that can be solved by changing the source code,
>> never
>> >> mind.
>> >>
>> >> My question is, can I set ZipDirEntry.FileComment to something and save
>> it
>> >> back to the zip archive? Thank you.
>> >>
>> >>
>> >>
>> >> Best Regards,
>> >> Edwin Yip
>> >>
>> >> Mind Mapping is as Effortless as Typing
>> >> http://www.InnovationGear.com
>> >>
>> >>
>> >> On Tue, Feb 24, 2009 at 10:35 PM, Roger Aelbrecht <
>> >> Roger.Aelbrecht@xxxxxxxxx> wrote:
>> >>
>> >>> 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.
>> >>>
>> >>
>> >
>> >
>> > -----------
>> > To unsubscribe from this list, send an empty e-mail
>> > message to:
>> >   delphizip-request@xxxxxxxxxxxxx
>> > and put the word unsubscribe in the subject.
>> >
>> >
>> I am afraid the ZipDirEntry is read only.
>>
>> In this version of ZipMaster the only way to change the file comment is
>> using the OnFileComment event
>>
>> If you specify the file you want to change in the FSpecArgs and execute
>> Add() the event will be triggered for that file only and you can change
>> the comment in the event handler.
>>
>>
>> --
>> 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.
>>
>
>


-----------
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: