[delphizip] Re: How to set/change comment for a single file?
- From: Edwin Yip <edwin.yip@xxxxxxxxxxxxxxxxxx>
- To: delphizip@xxxxxxxxxxxxx
- Date: Wed, 25 Feb 2009 22:37:17 +0800
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:
