anchor.diff:      FRequestAcceptEncoding: String;
       FRawCookie:String;
   
  +
       FResponseResultCode:Integer;
   
       FRequestBody: TMemoryStream;
  
positive.code:     FRawSocket.CreateTcpSocket;
      FRawSocket.DoInitialize();
  
      if SameText(FURL.Protocol, 'https') then
      begin
        {$IFDEF DIOCP_SSL}
  
negative.code: function TDiocpHttpClient.DoRecvBuff(var data; const len: Cardinal): Integer;
  begin
    {$IFDEF DIOCP_SSL}
    if (FSsl <> nil) and (Self.FSslFlag = 1) then
    begin
      result := utils_openssl.SSL_read(FSsl, @data, len);
    end else
  