Source position: unzip51g.pp line 86
function FileUnzip(
SourceZipFile: PAnsiChar;
TargetDirectory: PAnsiChar;
FileSpecs: PAnsiChar;
Report: UnzipReportProc;
Question: UnzipQuestionProc
):Integer;