[delphizip] Re: ZipMAster install error

  • From: "Pieter" <bruspot@xxxxxxxxx>
  • To: <delphizip@xxxxxxxxxxxxx>
  • Date: Wed, 11 Dec 2002 20:08:50 +0100

Hi Pietro,
In my case I have solved it with parameter MB_OK:
           application.MessageBox(pchar(IntToStr(r)), 'Abort',MB_OK);

I got another compile error as well:

[Error] ZipMstr.pas(5008): Undeclared identifier: 'IMAGE_DOS_HEADER'
             DOSHead: ^IMAGE_DOS_HEADER;
[Error] ZipMstr.pas(5026): 'THEN' expected but identifier 'e_magic' found
             if DOSHead.e_magic <> IMAGE_DOS_SIGNATURE then

These two faults are related. It seems that in the file ZipStructs.pas the
definition of the type is within an {$IFDEF VERD2D3}
block. Since D4 (my case) and D5 (your case) are outside, it skips this
part, so in the ZipMstr.pas the faults occur. Commenting out this $IFDEF and
its ENDIF
will allow compilation to complete.

I assume this is the correct way to fix it, but I am not too familiar with
the exact coding. If anyone else wants to comment....

Pieter.




----- Original Message -----
From: "Pietro Moro" <pmoro@xxxxxxxxxxxxx>
To: <delphizip@xxxxxxxxxxxxx>
Sent: Saturday, December 07, 2002 10:52 AM
Subject: [delphizip] ZipMAster install error


> When installing ZipMAster  v1.70 by Russell Peters August 2, 2002I get the
> following error message (Delphi Pro 5)
>
> [Error] ZipMstr.pas(3066): Not enough actual parameters
> [Fatal Error] ZipMaster.dpk(34): Could not compile used unit
> '..\..\Source\Optec\ZipMstr.pas'
>
> r:=0;
>      if ZipBusy and (ZipDllHandle <> 0) then
>          ZipDllExec(nil);
>          if UnzBusy and (UnzDllHandle <> 0) then
>                  r:=UnzDllExec(nil);
>          if r<> 0 then
>                  application.MessageBox(pchar(IntToStr(r)),'Abort');
>
> Thank you.
> Pietro
>
>
>


Other related posts: