Пытался написать программу, которая отправит e-mail на определенный адрес:
Код:
IDMessage1.Body.Text:='что-нибудь';
IdMessage1.From.Address:=LabeledEdit1.Text; //адрес отправителя
IdMessage1.Recipients.EMailAddresses:='...@mail.ru';
IDMessage1.Subject:=;тема';
idSMTP1.AuthenticationType:=atLogin;
idSMTP1.Ustrname:='username';
idSMTP1.password:='password';
idSMTP.host:='smtp.mail.ru';
idSMTP.port:=25;
idSMTP1.Connect;
idSMTP1.Send(IDMessage1);
idSMTP1.Disconnect;
однако после нажатия на кнопку, ничего не происходит, программа висит какое-то время и потом выводит сообщение "Connection closed gracefully"
письмо естественно не доходит...
Подскажите пожалуйста, что я не так сделал?