Отправка электронных писем через элемент Indy

[sdaurum]

Люди помогите!
Дано:
Более одного адреса емаил, допустим 100

Задача:
Отправить сообщения на все 100 писем

Проблема:
Если один из адресов неверен или ошибочный, типа "пккнкеукнук", то процесс отправки завершается ошибкой, что адрес задан неверно.

Вопрос:
Как сделать так, чтобы процесс отправки писем продолжался???

Код проги:
for n:=0 to 100 do begin

idsmtp1.Host:='SMTP.xxx.ru';
idsmtp1.port:=25;
idsmtp1.Username:='xxx';
idsmtp1.password:='xxx';


idmessage1.body.Text:=memo2.text;
idmessage1.from.Text:=edit2.text;
idmessage1.recipients.EMailAddresse s:=edit1.text;
idmessage1.subject:=edit3.text;

idmessage1.IsEncoded:=true;

attach:=TIdAttachment.Create(idmess age1.MessageParts, listbox2.Items[n]);

idsmtp1.connect();
if idsmtp1.connected=true then begin
idsmtp1.send(idmessage1);
IdMessage1.Clear;
idsmtp1.disconnect;
end;
end;

Прекратите истерические множества восклицаний !
Далее.
Первое.
Вы разделы различаете ? Или со зрением плохо ? При чем тут общие вопросы Дельфи ? Эта тема явно для раздела "Работа с сетью в Delphi".
Второе.
У нас принято оформлять код специальным тэгом - при помощи кнопочки "#".
Только...
И не значком #.
И не РНР-кодом.
И не значком цитаты.
И не собственными "ручками".
Рекомендую. Помимо общих правил форума есть и дополнения к ним в каждом разделе...
Модератор

[Пепел Феникса]

учите работу с исключениями и будет вам счастье.

[dmitriegorovih]

юзайте try и except

[Пепел Феникса]

ну а я что сказал?