Source position: unzip51g.pp line 142
function UnzipSize(
SourceZipFile: pChar;
var Compressed: LongInt
):LongInt;