Configuração do ACBrMail com OAuth2 - Permissão para Atualizar

[daniel_mirassol]

Bom dia , 

Usuários do componente ACBrMail que tentam configurar o envio de e-mails via Microsoft 365 com autenticação OAuth2, podem se deparar com a inexistência dessas configurações na versão mais recente do componente.A análise do código-fonte e as discussões em fóruns oficiais do projeto ACBr indicam que, no momento, a configuração do OAuth2 para o ACBrMail não é realizada através de propriedades diretas no componente TACBrMail. Em discussões recentes nos fóruns do Projeto ACBr, foi mencionado que a criação de uma tarefa interna (#TK-6042) para análise e implementação de um suporte mais integrado ao OAuth2 no ACBrMail está em andamento. Gostaria de saber se está em andamento ou se eu posso implementar no código , para isso preciso de orientações de como proceder , mas estou disposto a ajudar e já tenho toda a documentação necessária para a implementação. Aguardo um parecer dos amigos mantenedor teste fonte .

 

[Juliomar Marchetti]

Olha  só uma sugestão. eu comecei mas não finalizei.
fiz uma especie de adapter para o ACBrMail. assim eu não modifiquei em nada ele. 

e só uso uma unit para trabalhar com ele e OAuth2 isso para todas os servidores de e-mail e não só esse. mas parei no meio e ainda não voltei terminar

[Márcio Baroni]

Boa tarde @daniel_mirassol

Como o juliomar mencionou, tbem criei uma camada de OAuth2 sem mexer no componente do acbr...

Vou anexar os fontes que us o aqui, ai vc dar uma olhada se atende suas necessidades...blz

OAuth2.Outlook.pas OAuth2.pas OAuth2.Gmail.pas

[daniel_mirassol]

Obrigado a todos , vou dar uma olhada , não vou encerrar como solucionado , por enquanto . 

[daniel_mirassol]

Marcio, boa tarde !
Baixei seus fontes , como você faz para passar os parâmetros para o AcbrMail ? 

Atráves do uses ou outro forma ....

[Dfox]

Isso seria ótimo já está funcionando?

[Márcio Baroni]

Em 01/09/2025 at 13:47, daniel_mirassol disse:

Marcio, boa tarde !
Baixei seus fontes , como você faz para passar os parâmetros para o AcbrMail ? 

Atráves do uses ou outro forma ....

Bom dia @daniel_mirassol perdão pela demora...

Vc pode fazer em duas etapas:

1ª: Primeiro vc autentica no OAuth para gerar o acess token

procedure xxxxx.OnTokenGerado(const pAcessToken, pRefreshToken: string; const pDataExpiracao: TDateTime);
begin
	// aqui vc consegue pegar os tokens gerados apos fazer login na conta do gmail
    // vc deve salvar esses tokens para serem usados depois
end;


var
   config: TConfigOAuth;
   fOAuth2: TOAuth2;
begin
  config.ClientID := '< seu client id >';
  config.ClientSecret := '< seu client secret >';
  config.OnGenerateToken := OnTokenGerado;

  fOAuth2 := TGMailOAuth.Create(pConfig);
  fOAuth2.Authenticate; // aqui vai pedir pra fazer login na conta do gmail
end;

 

2ª: Com o token gerado agora vc alimenta o componente do ACBrMail

function RefreshTokenOAuth: string;
var
  config: TConfigOAuth;
  fOAuth2: TOAuth2;
begin
  config.ClientID := '< seu client id >'
  config.ClientSecret := '< seu client secret >';
  config.AccessToken := '< access token gerado anteriormente >';
  config.RefreshToken := '< refresh token gerado anteriormente >';

  fOAuth2 := TGMailOAuth.Create(pConfig);
  fOAuth2.RefreshNewToken;
  Result := fOAuth2.getAccessToken;
end;


var
  fACBrEmail: TACBrMail;
begin
  fACBrEmail := TACBrMail.Create(nil);
  ...
  ...
  fACBrEmail.Username := 'xxxx';
  fACBrEmail.Password := RefreshTokenOAuth;

 

[nislei me]

Em 29/08/2025 at 14:29, Juliomar Marchetti disse:

Olha  só uma sugestão. eu comecei mas não finalizei.
fiz uma especie de adapter para o ACBrMail. assim eu não modifiquei em nada ele. 

e só uso uma unit para trabalhar com ele e OAuth2 isso para todas os servidores de e-mail e não só esse. mas parei no meio e ainda não voltei terminar

aproveitei essa dica e implementei no acbrmail no teste a funcionalidade ficou perfeito, autentica, pega o refleshtoken valida e envia sem nem uma mudança no componente. 

 

Editado 11 Setembro, 2025 por nislei me

[Wendel Nogueira]

o Exemplo utilizando o OAuth2 estará disponível qdo?

[Juliomar Marchetti]

4 minutos atrás, Wendel Nogueira disse:

o Exemplo utilizando o OAuth2 estará disponível qdo?

Que exemplo? tu diz o colega postar aqui o que ele fez?

[Wendel Nogueira]

a Nislei postou que teria incorporado ao ACBR Masil.. ai no post tem fotos do exemplo com a aba OAuth 2

[Sandro Felipe Adad]

Em 19/11/2025 at 11:57, Juliomar Marchetti disse:

Que exemplo? tu diz o colega postar aqui o que ele fez?

Bom dia Juliomar, a respeito do oAuth, recebi recentemente este comunicado da microsoft:

https://techcommunity.microsoft.com/blog/exchange/updated-exchange-online-smtp-auth-basic-authentication-deprecation-timeline/4489835

indicando que será desativada a autenticação básica logo, creio que seria importante que fosse agregado no ACBRMail o suporte para OAUTH.

Em 11/09/2025 at 10:02, nislei me disse:

aproveitei essa dica e implementei no acbrmail no teste a funcionalidade ficou perfeito, autentica, pega o refleshtoken valida e envia sem nem uma mudança no componente. 

 

 nislei me voce chegou a compartilhar a solução com a comunidade?

 

[lucimauro]

Aqui também esperamos que o projeto consiga logo implementar essa nova funcionalidade no componente/Monitor e DLL porque é de  grande importância já que se aproxima o bloqueio do envio por  senha de app!!

[neto233]

@nislei me Bom dia, está disponível em algum lugar essa solução que implementou no ACBrMail - Demo ?

[Juliomar Marchetti]

4 horas atrás, neto233 disse:

@nislei me Bom dia, está disponível em algum lugar essa solução que implementou no ACBrMail - Demo ?

na mensagem acima https://www.projetoacbr.com.br/forum/topic/85271-configuração-do-acbrmail-com-oauth2-permissão-para-atualizar/?&_rid=19#findComment-553198