[delphizip] Re: Fwd: Small bug in WriteSpan of Zipmaster v1.72

  • From: "R. Peters" <russellpeters@xxxxxxxxxxx>
  • To: <delphizip@xxxxxxxxxxxxx>
  • Date: Fri, 9 May 2003 16:08:54 +1000

Will check
- Russell Peters
----- Original Message ----- 
From: "Eric Engler" <englere@xxxxxxxxxxx>
To: <delphizip@xxxxxxxxxxxxx>
Sent: Friday, May 09, 2003 11:49 AM
Subject: [delphizip] Fwd: Small bug in WriteSpan of Zipmaster v1.72


>
> I received this email today:
>
> >From: Mark Kuin <mjk@xxxxxxxxxx>
> >
> >Hello Mr Engler,
> >
> >I noticed a small bug in the WriteSpan method. It occurs when you write a
> >WriteSpan to Floppy, not to harddisk:
> >
> >When writing to floppy, the last file is called x.zip )instead of x.z01
or
> >x.z02) , but later on, that file is renamed to x.zip.tmpxxx. After that,
it
> >is tried to rename x.zip to x.zip, which does not work of course.
> >
> >Solution:
> >// in CreateMVFileName
> >If (spCompatName In FSpanOptions) Then
> >     Begin
> >       ext := '.z' + copy(IntToStr(101 + FDiskNr), 2, 2)
> >       FileName := ChangeFileExt(FileName, ext);
> >     END
> >
> >Or, change the renaming code after:
> >If (FDriveFixed Or (spNoVolumeName In SpanOptions)) And (spCompatName In
> >SpanOptions) Then
> >
> >
> >
> >When writing to harddisk, this error does not occur, because FtotalDisks
> >keeps the value of -1.
> >
> >Greetings, Mark Kuin
> >
> >ZIPMASTERVERSION: String = '1.72';
> >ZIPMASTERBUILD: String = '1.72.1.2';
> >ZIPMASTERVER: integer = 172;            // 1.72.0.4
>
> -----------
> 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: