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