Ответ: Что опять не так?
Вот эту либой замени свою, тогда вот этот пример будет работать
Program SMTP2test;
Uses smtp2;
Var i: integer;
from, rcpt, subj, text : string;
Begin
smtp2.account('логин от маил', 'пароль');
smtp2.auth_mode(1);
i:=smtp2.send('smtp.mail.ru', 2525, 'свой логин@mail.ru', 'адрес получателя', 'Test', 'Hi there! Привет!');
End.
|