Verificar Se O E-Mail Foi Enviado

[Werner_Marques]

Olá, boa tarde!

 

Estou usando a função ACBrNFe.NotasFiscais.Items[0].EnviarEmail(), e gostaria de exibir uma mensagem de confirmação ou de erro para o usuário saber ser o e-mail foi enviado ou não.

 

Como faço para verificar se o e-mail foi realmente enviado?

[Italo Giurizzato Junior]

Bom dia Wener,

 

Até onde sei, é tratando a execução do mesmo.

 

Se não levantar nenhuma exceção é porque foi enviado.

[Werner_Marques]

Olá, boa tarde!

 

Obrigado por responder.

 

Tentei fazer dessa maneira, mas não deu certo:

 

try

  ACBrNFe.NotasFiscais.Items[0].EnviarEmail(...);

  confirma := true;

except

  confirma :=false;

end;

 

if (confirma = true) then

       CaixaDialogo('E-mail Enviado com Sucesso!','I')

else

       CaixaDialogo('Falha ao enviar E-mail!','E');

 

Você teria mais alguma dica?