Recent

Author Topic: Xmailer - erro ao atribuir valor a uma variávle  (Read 219 times)

lourenco

  • Newbie
  • Posts: 1
Xmailer - erro ao atribuir valor a uma variávle
« 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.

 

TinyPortal © 2005-2018