Problem mit Var-Parameter und ZDecompress

Hallo
Habe wiedermal ein Problem
und zwar bekomme ich immer diesen Fehler:
E2033 Die Typen der tatsächlichen und formalen Var-Parameter müssen übereinstimmen

aber ich sehe nicht den Fehler?
kann mir einer sagen bitte was ich ändern muss wo das Problem ligt? :confused:

Code:

---

procedure DecompressStream(inpStream, outStream: TStream);
var
  InpBuf, OutBuf: Pointer;
  OutBytes, sz: LongInt;
begin
  InpBuf := nil;
  OutBuf := nil;
  sz    := inpStream.Size - inpStream.Position;
  if sz > 0 then
    try
      GetMem(InpBuf, sz);
      inpStream.Read(InpBuf^, sz);
      ZDecompress(InpBuf, sz, 0, OutBuf, OutBytes);
      outStream.Write(OutBuf^, OutBytes);
    finally
      if InpBuf <> nil then FreeMem(InpBuf);
      if OutBuf <> nil then FreeMem(OutBuf);
    end;
  outStream.Position := 0;
end;

---

Der dritte Parameter von ZDecompress wird per Call-By-Reference übergeben und liefert dir einen Zeiger zurück. D.h. du kannst dort keinen konstanten Wert, in deinem Fall 0, übergeben. Ich glaube es sollte eher so aussehen? (Der letzte Parameter ist optional.)

Code:

---

ZDecompress(InpBuf, sz, OutBuf, OutBytes);

---