Lazarus

Other Languages => Portuguese => Topic started by: lourenco on July 13, 2022, 06:43:47 pm

Title: Xmailer - erro ao atribuir valor a uma variávle
Post by: lourenco on July 13, 2022, 06:43:47 pm

Olá a todos!
Instalei o Xmailer e estou usando o Lazarus 2.2.0 para envio de e-mail mas quando faço a atribuição de valor em uma função do Xmailer ocorre um erro. Segue o trecho da procedure:

procedure TForm_Principal.Button2Click(Sender: TObject);
var
  mail : TSendMail;
begin
     try
        mail.Sender:= 'gerente adjunto <testando_email@teste.com.br>';
        mail.Subject:= 'assunto do email';
        mail.Receivers.Add('fulano@teste.com.br');        //  <---- AQUI OCORRE O ERRO QUANDO  É FEITA A ATRIBUIÇÃO :-\
... segue a procedure

A menassagem do erro é a seguinte:

Error
Project GP raised exception class 'External: SIGSEGV'.
 In file 'unit_principal.pas' at line 132:
mail.Receivers.Add('teste');

Agradeço a quem se interessar em me ajudar.

Title: Re: Xmailer - erro ao atribuir valor a uma variávle
Post by: pu2pts on February 08, 2023, 03:42:43 pm

Este erro esta informando que vc atribuiu um valor TESTE e não um email, verifique se vc em alguma outra linha do projeto não utilizou o mail.Receivers.Add('teste');

Error
Project GP raised exception class 'External: SIGSEGV'.
 In file 'unit_principal.pas' at line 132:
mail.Receivers.Add('teste');