Source position: unzip51g.pp line 179
function UnzipFile(
in_name: pchar;
out_name: pchar;
offset: LongInt;
hFileAction: Word;
cm_index: Integer
):Integer;