[delphizip] Re: TestZIP

  • From: Alistair George <bigal@xxxxxxxxxx>
  • To: delphizip@xxxxxxxxxxxxx
  • Date: Sun, 10 Nov 2002 07:00:11 +1300

Hello All,
Found that my problem was SuccessCnt includes directory count as well.
The following is syntax for testing files _only_ in an archive:

    if Count = SuccessCnt-dironlycount then
ShowMessage('All ' + IntToStr(Count) + ' files tested OK')
else.............

Cheers,
Al+


Other related posts: