[delphizip] Reproducible bug in ZipMstr.pas 1.73
- From: "Peter Aschbacher" <peter.aschbacher@xxxxxx>
- To: <delphizip@xxxxxxxxxxxxx>
- Date: Tue, 24 Aug 2004 00:20:06 +0200
When trying to create a normal standard zip archive on a removable disk:
When executing the following line ZipMaster raises an exception:
ZipMaster1.ZipComment :=3D 'My comment';
This exception occurs only when creating a zip archive on a removable =
disk,
it does not occur on fixed disk (harddisk).
These are the the lines in ZipMstr.pas where the exception is raised:
//*************************** Line # 865
else // if we have an MV archive copied to a =
removable
disk
begin
// accept any MV filename on disk
sName :=3D NameOfPart(Fname, false);
if sName =3D '' then
sName :=3D NameOfPart(Fname, true);
if sName =3D '' then // none
raise EZipMaster.CreateResDisp(DS_FileOpen, true);
//***************************
Please note: The zip archive is NOT a MV (MultiVolume) archive! =
(SpanOptions
are []).
The version in the ZipMstr.pas file is indicated as:
v1.73 by Russell Peters October 3, 2003
When debugging the program and hovering the mouse over <ZipComment> in =
the
line of my program:
ZipMaster1.ZipComment :=3D 'My comment';
the yellow hint tells that the linker has removed the function:
TZipMaster.GetZipComment
!!!!!
Regards,
Peter
-----------
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:
