Niemożność zalogowania się na serwer SMTP poczty interia oraz WP za pomocą Indy10

zmienili coś w sposobie autentykacji dostaje błąd: UGFzc3dvcmQ6. Thunderbird łączy się poprawnie, a tu takie cuda

Z indy jest dużo problemów ja ostatnio przerzuciłem się na synapse i śmiga bez problemu
Jak odczytać ilość nowych maili z IMAP?

Z indy nie ma praktycznie żadnych problemów (przynajmniej większynych niż z innymi konkurencyjnymi np. Synapse które też nie jest doskonałe) pod warunkiem że się umie korzystać z tych komponentów! Indy to wieloplatformowe (Windows 32 i 64bit, iOS, OSX, Android) bardzo dobre komponenty. Jeżeli już są problemy to główny problem stanowią użytkownicy i jak czegoś nie umieją zrobić to "na pewno wina Indy" i tym podobne bzdury powtarzają na forach dlatego Indy ma taką opinię.
@Adam86 pokaż kod bo mi się szklana kula popsuła.

kod nie pisałem ja, ale działał do zeszłego tygodnia, w wersji SSL, przestał działać SSL ale działał na authtype=satDefault a teraz i w tym trybie przestał funkcjonować. Błąd dostaje przy FSmtp.Authenticate()

   Result := True;
  FIdUserPassProvider.Username := AUser;
  FIdUserPassProvider.Password := APass;

  FSmtp.Host := AHost;
  FSmtp.Port := APort;
  FSmtp.Username:=AUser;
  FSmtp.Password:=APass;

  if AVerifyUser = False then
    FSmtp.AuthType := satDefault
  else
    FSmtp.AuthType := satSasl;
  FSmtp.SASLMechanisms.Add.SASL := FIdSASLLogin;

  if ASSL = True then // IF  ssl/////////////////////////////////////////////
  begin
    FSmtp.IOHandler := nil;
    FSmtp.ManagedIOHandler := True;
    // try to use SSL
    try
      TIdSSLContext.Create.Free;
      FSmtp.IOHandler := TIdSSLIOHandlerSocketOpenSSL.Create(FSmtp);
      if (FSmtp.Port = 465) then
        FSmtp.UseTLS := utUseImplicitTLS
      else
        FSmtp.UseTLS := utUseExplicitTLS;
    except
      FSmtp.IOHandler.Free;
      FSmtp.IOHandler := nil;
      Result := False;
    end;

    if (FSmtp.IOHandler = nil) then
    begin
      FSmtp.IOHandler := TIdIOHandler.MakeDefaultIOHandler(FSmtp);
      FSmtp.UseTLS := utNoTLSSupport;
    end;
  end; // SSL end /////////////////////////////////////////////////////////

Ty w ogóle wiesz co piszesz przecież tu nawet nie ma fragmentu kodu powodującego błąd.