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