Ir para conteúdo
  • Cadastre-se

dev botao

Controle De Thread Com Acbrmail


Otavio Benini
  • Este tópico foi criado há 3497 dias atrás.
  • Talvez seja melhor você criar um NOVO TÓPICO do que postar uma resposta aqui.

Recommended Posts

Se ocorrer um erro no envio, a thread é interrompida. Para saber se ocorreu um erro, impedindo o envio, ou se o envio foi bem sucedido, use o seguinte código no evento OnMailProcess:

case aStatus of
  pmsStartProcess:
    Memo1.Lines.Add( 'Iniciando processo de envio.');
  pmsConfigHeaders:
    Memo1.Lines.Add( 'Configurando o cabeçalho do e-mail.');
  pmsLoginSMTP:
    Memo1.Lines.Add( 'Logando no servidor de e-mail.');
  pmsStartSends:
    Memo1.Lines.Add( 'Iniciando os envios.');
  pmsSendTo:
    Memo1.Lines.Add( 'Processando lista de destinatários.');
  pmsSendData:
    Memo1.Lines.Add( 'Enviando dados.');
  pmsLogoutSMTP:
    Memo1.Lines.Add( 'Fazendo Logout no servidor de e-mail.');
  pmsDone, pmsError:
  begin
    if aStatus = pmsError then
       Memo1.Lines.Add(ACBrMail1.GetLastSmtpError) // Exibe o erro
    else
       Memo1.Lines.Add( 'E-mail enviado com sucesso.');
  end;
end;
Consultor SAC ACBr Jean Patrick Figueiredo dos Santos
Ajude o Projeto ACBr crescer - Assine o SAC

Projeto ACBr

                    DJPDV - Um frente de caixa SIMPLES e COMPLETO

Link para o comentário
Compartilhar em outros sites

  • Este tópico foi criado há 3497 dias atrás.
  • Talvez seja melhor você criar um NOVO TÓPICO do que postar uma resposta aqui.

Crie uma conta ou entre para comentar

Você precisar ser um membro para fazer um comentário

Criar uma conta

Crie uma nova conta em nossa comunidade. É fácil!

Crie uma nova conta

Entrar

Já tem uma conta? Faça o login.

Entrar Agora
×
×
  • Criar Novo...

Informação Importante

Colocamos cookies em seu dispositivo para ajudar a tornar este site melhor. Você pode ajustar suas configurações de cookies, caso contrário, assumiremos que você está bem para continuar.