[delphizip] Re: spCompatName in SpanOptions doesn't work

  • From: "R. Peters" <russellpeters@xxxxxxxxxxx>
  • To: <delphizip@xxxxxxxxxxxxx>
  • Date: Fri, 20 Feb 2004 15:51:22 +1100

The following works for me - what version are you using?
zip.DLLDirectory :=  '..\Dll\';
 if JvFilenameEdit1.FileName = '' then
   JvFilenameEdit1.FileName := 'SpanTest.zip';
 zip.ZipFileName := JvFilenameEdit1.FileName;
 zip.ZipComment := 'just testing';
 zip.FSpecArgs.Add('c:\DelphiZip\*.*');
 zip.FSpecArgsExcl.Add('*.zip');
 zip.AddOptions := [AddDirNames, AddRecurseDirs, AddDiskSpan];
 zip.SpanOptions := [spCompatName];
 zip.MaxVolumeSize := 1200 * 1024;
 i := zip.Add;
 Memo1.Lines.Add('files = ' + IntToStr(zip.SuccessCnt) + ' ' + IntToStr(i));
 Memo1.Lines.Add('ErrCode = ' + IntToStr(zip.ErrCode));
 Memo1.Lines.Add('Message = ' + zip.Message);
- Russell Peters
----- Original Message ----- 
From: <booger@xxxxxxx>
To: <delphizip@xxxxxxxxxxxxx>
Sent: Friday, February 20, 2004 1:55 AM
Subject: [delphizip] spCompatName in SpanOptions doesn't work


Hello,

 According to TZipMaster help:

property SpanOptions: SpanOpts;
spCompatName    If True then uses names of the form name.zip + name.z01 ...

 That's just what I need, but it simply doesn't work as expected. When
 I  set  spCompatName  and try to compress something to the diskette I
 still  have the name.zip written on every one of it. I tried it in my
 own  project  and  also  tried  to  modify  the  Demo6 example - same
 results. spNoVolumeName works fine.

 I  think  that's  a bug, maybe somebody encountered such a behaviour?
 Thanks in advance for your help, it's very important to me.

Arek

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