Здравствуйте. Я немогу отправить письмо через компонент TSMTP с закладки интеренет. Я вот такой пробовал исходник:
procedure TForm1.Button1Click(Sender: TObject);
begin
NMSMTP1.Host := 'smtp.mail.ru';
NMSMTP1.Connect;
with NMSMTP1.PostMessage do
begin
FromAddress := 'bilbo@baggins.com';
ToAddress.Add('gandolf@baggins.corn') ;
Subject := 'Test';
Body.Add('This is a test');
NMSMTP1.SendMail;
NMSMTP1.Disconnect;
end;
end;
Всё компилится без проблем, но когда нажимеш кнопу, то по итечению некоторого времени вылетает:
Project Project1.exe. raised exception class ESocketError with message 'Connection Failed'. Proces stopped. Use step or Run to continue.
А потом "Conn ection Failed."
Незнаю почему так??? Может в Host надо писать www.mail.ru Подскажите, или напишите код с помошью которого вы отправляете. Подскажите пожалуйсто!!!
-------------------------------------------------------
Заранее благодарен!