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