Отправить письмо idSMTP, idMessage. Ошибка.

[Vova777]

Ошибка:
"Project Project1.exe raised exception class EAccessViolation with message 'Access violation at address 004047E4 in module 'Project1.exe'. Write of address 000000D8'. Process stopped. Use Step or Run to continue."

Не пойму что за ошибка, с чем связана. Все адреса проверены, пароль соответствует. При трассировке (Shift+F7) программы ошибка появляется после строчки:

procedure TForm1.Button6Click(Sender: TObject);
begin
  idSmtp1.Host:= 'smtp.mail.ru';
  idSmtp1.Port:= 25;
  idSmtp1.Name:= '111'; //имя (логин) отправителя
  idSmtp1.Password:= '222'; //пароль     -> ПОСЛЕ ЭТОЙ СТРОЧКИ ОШИБКА

  idMessage1.Body.Text:= Memo9.Text;
  idMessage1.From.Text:= '111@mail.ru'; //от кого
  idMessage1.Recipients.EMailAddresses:= '333@bk.ru'; //кому
  idMessage1.Subject:= 'Сообщение';

  idSmtp1.Connect();
  if idSmtp1.Connected = true then 
    idSmtp1.Send(idMessage1)
  else
    ShowMessage('Отправить запрос невозможно!');
  idSmtp1.Disconnect;
end;

Может с кодировкой в TMemo проблема? Или с паролем? Это пример для Yandexa, мной переделан под Mail.ru (хост изменен), может я что-то еще не указал? Порт № 25 по-умолчанию.

P.S. Адреса, пароли и адрес получателя сознательно изменены в целях оградить себя от гор спама, ненужной рекламы и потери почтового ящика.