Envio de E-mail via Delphi

Bom dia!
Alguém teria uma solução para envio e mail com SMTP STARTTLS e metodo OAuth2/Modern Auth
A conta é outlook 365.
Da erro de autenticação.