Problemas em anexar XML no e-mail

[Weslei Ferreira da Silva]

Boa tarde desde que atualizei minha versão do Delphi para o Delphi tokyo estou tendo problemas com o encoding dos arquivos XML de NF-e anexados por e-email utilizando o componente ACBR. Já entrei em contato com a Embarcadeiro e a mesma informou que o problema não esta na nova versão. Fiz um teste, implementei o envio de e-mail utilizando os componentes nativos do Delphi e enviou corretamente. Já atualizei meu ACBR. Alguém saberia me dizer como corrigir o problema ? Estou enviando um XML de uma NF-e em anexo pra que quem puder ajudar possa testar corretamente. Assim que enviarem o XML por e-mail, tentem abrir ele no Navegador, será apresentado um erro de encoding, desta forma meus clientes não conseguem importar o XML gerado por meu sistema. 

 

 

NFE.xml

Editado 8 Novembro, 2017 por Weslei Ferreira da Silva

[Juliomar Marchetti]

boa tarde

use o demo e faça testes.

acredito que esteja com erro no seu projeto.

[Weslei Ferreira da Silva]

3 minutos atrás, Juliomar Marchetti disse:

boa tarde

use o demo e faça testes.

acredito que esteja com erro no seu projeto.

Já utilizei e esta ocorrendo o mesmo problema. 

[Daniel Simoes]

2 horas atrás, Weslei Ferreira da Silva disse:

Já utilizei e esta ocorrendo o mesmo problema. 

Como reproduzir o problema, usando o Demo do ACBr ?

[Weslei Ferreira da Silva]

12 horas atrás, Daniel Simoes disse:

Como reproduzir o problema, usando o Demo do ACBr ?

No demo do ACBR Exemplos\ACBrTCP\ACBrMail\Delphi\MailTeste existe um arquivo XML. Substitua ele pelo mesmo arquivo XML que encaminhei no anexo deixando ele com o mesmo nome. Abra o programa exemplo configure seu e-mail e envie um e-mail teste deixando marcado a opção "Incluir XML por Stream"

[Daniel Simoes]

Consegui reproduzir o problema... analisando...

[Weslei Ferreira da Silva]

1 hora atrás, Daniel Simoes disse:

Consegui reproduzir o problema... analisando...

Fico no aguardo. Muito obrigado pela atenção.

[Daniel Simoes]

Enviei as seguintes modificações para o SVN

Citar

-- ACBrMail --
[+] Melhoria no controle de anexos, modificando o tipo de lista de Array of Record
    para um TObjectList.
    Introduzido os tipos: TMailAttachments e TMailAttachment.
    Agora os anexos são carregados para TMemoryStream, no momento em que os
    mesmos são anexados, e não apenas no momento do envio do e-mail.
[-] Modificada a forma de construção do MimeMess, para que todos os anexos sejam
    do tipo MP_BINARY. Evitando que XMLs sejam alterados ou convertidos para o
    Encoding nativo.

 

[Weslei Ferreira da Silva]

Show de bola. Atualizei os fontes ACBR e agora esta funcionando corretamente. Muito Obrigado pela atenção.