Idsmtp1.Host:=Edit5.text;
idsmtp1.Port:=25;
idsmtp1.Username:=edit6.text;
idsmtp1.Password:=edit7.text;
IdMessage1.From.Address := edit2.text;
IdMessage1.Recipients.Add.Address := edit4.text;
IdMessage1.Subject := edit3.text;
idmessage1.Body.Text:=memo3.Text;
idsmtp1.Connect;
idsmtp1.Send(idmessage1);

У меня вот такой код,одно сообщение отпровляется добовляю два емайла вылазиет ошибка.
Подскожите что нужно исправить или дописать