Zlib - Invalid Stream Operation

[Sanprof]

вобщем-то при таком коде

try
   AllSource := TFileStream.Create(C:\Temp\123.dat, fmOpenRead);//сжатый файл помещаем в поток
      Source := TMemoryStream.Create;//поток куда будет помещен расжатый AllSource
         try
            DecStream := TDecompressionStream.Create(AllSource);//поток декомпресии
            Source.CopyFrom(DecStream, 0);<-здесь ошибка
          finally
            DecStream.Free;
          end;
finally
  Source.Free;
  AllSource.Free;
end;

ZLib выдает ошибку в Delphi 7, а в Delphi 2009 нет, но мне надо делать в 7, 2009 не подходит.

[Sanprof]

что никто не сжимал/расжимал память ZLib-ом под Delphi 7???

[Sanprof]

короче, сам решил проблему путем обновления Zlib до версии 1.2.3