Да вы что можно проще..
Цитата:
procedure TForm1.Button1Click(Sender: TObject);
begin
IdSMTP1.Host:='win.mail.ru';
IdSMTP1.Username:='sanek-ntsk';
IdSMTP1.Connect;
if IdSMTP1.Connected=true then
label4.Caption:='Соединено';
end;
|
так как сервер требует авторизации укажи еще и пароль к пользователю. И еще тело сообщения и тема тоже нужны)