function deflateInit2_(
    var strm: TZStreamRec; 
    level: Integer; 
    method: Integer; 
    windowBits: Integer; 
    memLevel: Integer; 
    strategy: Integer; 
    version: PChar; 
    recsize: Integer
): Integer; cdecl;