библиотека отправки писем из RSL по smtp

Описание

Текст примера

 import
 aenetobj;

ob=aeTSMTP;

ob.Host="mail.ru";
ob.Port=25;
ob.Connect();
ob.CharSet="windows-1251";
ob.fromaddress=toANSI("abc@mail.kz");
ob.toaddress=toANSI("123@mail.kz");
ob.FromName="Sender NAME";
ob.text=toANSI("Письмо отправлено с помощью delphi из RSL");
ob.SendMail();
if (ob.Connected)
  ob.disconnect;
end;