zipOpenNewFileInZip

function zipOpenNewFileInZip(

  afile: zipFile;

  filename: PChar;

  const zipfi: zip_fileinfo_ptr;

  const extrafield_local: pointer;

  size_extrafield_local: Integer;

  const extrafield_global: pointer;

  size_extrafield_global: Integer;

  const comment: PChar;

  method: LongInt;

  level: LongInt

):LongInt;