[delphizip] Re: ZipFileName, Bug or feature

  • From: "Russell Peters" <russellpeters@xxxxxxxxxxx>
  • To: <delphizip@xxxxxxxxxxxxx>
  • Date: Sun, 1 Dec 2002 07:05:43 +1100

But assigning a non-existing filename is a valid operation so should either
set ErrCode to 0 or perhaps set it to a warning (file does not exist?).
This test is in the list procedure
...
    if not FileExists(FZipFileName) then
    begin
        { let user's program know there's no entries }
        if Assigned(FOnDirUpdate) then
            FOnDirUpdate(Self);
        Exit;                           { don't complain - this may
intentionally be a new zip file }
    end;
...
I think it needs the line "ErrCode := 0;" before "if Assigned(F ..."
Russell Peters
http://www.users.bigpond.com/russellpeters/delphizip.html

----- Original Message -----
From: "Roger Aelbrecht" <Roger.Aelbrecht@xxxxxxxxxx>
To: <delphizip@xxxxxxxxxxxxx>
Sent: Sunday, December 01, 2002 12:48 AM
Subject: [delphizip] Re: ZipFileName, Bug or feature


>
> ----- Original Message -----
> From: "Ricardo Muñoz V." <rmunoz@xxxxxx>
> To: <delphizip@xxxxxxxxxxxxx>
> Sent: Friday, November 29, 2002 4:58 PM
> Subject: [delphizip] ZipFileName, Bug or feature
>
>
> >
> > I don't know if this is a bug or a feature.
> >
> > When a invalid Zip file is assigned to ZipFileName, ErrCode is assigned
> with
> > an error (11036) but when ZipFileName is assigned whith a valid zip
file,
> > ErrCode not change from his previos value (I think that ErrCode should
> > change to no error 0).
> >
> > Ricardo.
> >
> >
> >
> >
>
> IIRC ErrCode is not changed untill an new error is found,
> When a valid filename is assigned we do not change ErrCode
>
> As th Help says :
> "Holds a copy of the last error code sent to your program ..."
>
> It holds the code of the last error detected.
>
> Roger Aelbrecht
> http://web.wanadoo.be/driehoeksw
>
>
>
>



Other related posts: