anchor.diff:  begin
     if pvBuilder.Length = 0 then exit;
   {$IFDEF POSIX}
  -  SetLength(lvBytes, l);
  -  pvInStream.Position := 0;
  -  pvInStream.Read(lvBytes[0], pvInStream.Size);
  -  ZLib.ZDecompress(lvBytes, lvOutBytes);  //POSIX£ָֻ֧÷ʽ
  -  pvOutStream.Size := Length(lvOutBytes);
  -  pvOutStream.Position := 0;
  -  pvOutStream.Write(lvOutBytes[0], Length(lvOutBytes));
  +  ZLib.ZDecompress(pvBuilder.ToBytes, lvOutBytes);
  +  pvBuilder.Clear;
  +  pvBuilder.AppendBuffer(@lvOutBytes[0], length(lvOutBytes));
   {$ELSE}
     {$if defined(NEWZLib)}
     ZLib.ZDecompress(pvBuilder.Memory, pvBuilder.Length, OutBuf, OutBytes);
  
positive.code: procedure THttpRequest.DecodeContentAsFormUrlencoded({$IFDEF UNICODE}
      pvEncoding:TEncoding {$ELSE}pvUseUtf8Decode:Boolean{$ENDIF});
  var
    lvRawData : AnsiString;
    lvRawParams, s, lvName, lvValue:String;
    i:Integer;
    lvStrings:TStrings;
  
negative.code: procedure ZCompressBufferBuilder(pvBuilder:TDBufferBuilder);
  {$IFDEF POSIX}
  var
    lvOutBuf: TBytes;
  {$ELSE}
  var
    lvInBuf: TBytes;
    lvOutBuf: Pointer;
    lvOutBytes: Integer;
  var
    l: Integer;
  {$ENDIF}
  
  begin
  {$IFDEF POSIX}
    ZLib.ZCompress(pvBuilder.ToBytes, lvOutBuf);
    pvBuilder.Clear;
    pvBuilder.AppendBuffer(@lvOutBuf[0], length(lvOutBuf));
  {$ELSE}
    try
      {$if defined(NEWZLib)}
  