the package for send and recive email in Lazarus
lazarus / 5-Lazarus Extra Components

----------------------------------------------------------------------
RandyCuba · 2019-10-23 01:03

I need someone to give me a page that is not restricted to my country
(Cuba), where I can download packages for Lazarus Free Pascal,
including the one that allows me to send email in Lazarus applications

----------------------------------------------------------------------
krexon · 2019-10-23 06:32

You can use i.e. xmailer, Indy, Synapse.

----------------------------------------------------------------------
madref · 2020-01-13 05:19

Or use this:
Code: Pascal  [Select][+][-]window.onload = function(){var x1 =
document.getElementById("main_content_section"); if (x1) { var x =
document.getElementsByClassName("geshi");for (var i = 0; i function
VerzendMailMetBijlage (Const MailAan, Onderwerp: String; Inhoud:
TStrings; Bijlage: String): Boolean;Var  Mime : TMimeMess;  P :
TMimePart;  B : Boolean;begin  Mime:=TMimeMess.Create;  try   
Mime.Header.ToList.Text := MailAan;    Mime.Header.ReplyTo :=
SenderName + '<' + SenderEMail + '>';    Mime.Header.Subject :=
Onderwerp;    Mime.Header.From := SenderName + '<' + SenderEMail +
'>';    P := Mime.AddPartMultipart('mixed',Nil);    Mime.AddPartHTML
(Inhoud,P);    Mime.AddPartBinaryFromFile (Bijlage,P);   
Mime.EncodeMessage;    B := SendToRaw(SenderName + '<' + SenderEMail +
'>', MailAan,              smtpHost, Mime.Lines, smtpUser,
smtpPassword);    Result := B;  finally    Mime.Free;  end;end;