Source position: unzip51g.pp line 141
function SetUnZipQuestionProc(
aProc: UnzipQuestionProc
):Pointer;