VPF::Как исключить ошибку в цикле - Форум программистов

vclapanv

Дата 24.6.2007, 11:04 (ссылка)

(нет голосов)

Загрузка ...

Новичок

Профиль
Группа: Участник
Сообщений: 3
Регистрация: 22.4.2007

Репутация: нет
Всего: нет

Здравсвуйте,делал программу для расслки инфы своим клиентам. Суть такова, база мейлов берется из текстового файла.Но при отправке иногда появляются ошибки,то мейл неправильно написан то еще что-то,так вот вопрос как обойти эту ошибку,чтобы если наткнулись на ошибку то цикл продолжал идти дальше. (я думаю надо юзать try..finally,но потыкал везде так ничего и не добился)

Вот сам код

Код


assignfile(f, edit1.text+'.txt');
reset(f);
  while not eof(f) do
    begin
      readln(f, tmp);
    memo1.lines.add(tmp);
  ///тут идут данные о заполнении полей
 idMessage1.From.Name:=edit6.text;
 idMessage1.Subject:=edit5.text;
 idMessage1.From.Address:=edit7.text; 
 idMessage1.Recipients.EMailAddresses:=tmp; 
 idMessage1.Body.Text:=Memo3.Text; 
  IdMessage1.ContentType:='text/plain; charset=windows-1251; charset="WINDOWS-1251"'; ///тут борюсь с кодировкой
   
               idsmtp1.Send(idmessage1); ///вот тут при отправке иногда и выскакивает ошибка

      end;
     closefile(f);

Пожалуйста помогите расставить исключения smile

M
Alexeis

Модератор: используйте подсветку кода http://forum.vingrad.ru/index.php?show_typ...howtopic=126445

Это сообщение отредактировал(а) Alexeis - 24.6.2007, 11:31

Yanis

Дата 24.6.2007, 11:14 (ссылка)

(нет голосов)

Загрузка ...

Эксперт

Профиль
Группа: Участник Клуба
Сообщений: 2937
Регистрация: 9.2.2004
Где: Москва

Репутация: 72
Всего: 111

Цитата(vclapanv @ 24.6.2007, 12:04

)

(я думаю надо юзать try..finally,но потыкал везде так ничего и не добился)

Ну как это не добился? Проверял?
Прогу запускал без отладки (Shift+Ctrl+F9)?

--------------------

*щёлк*

vclapanv

Дата 24.6.2007, 11:32 (ссылка)

(нет голосов)

Загрузка ...

Новичок

Профиль
Группа: Участник
Сообщений: 3
Регистрация: 22.4.2007

Репутация: нет
Всего: нет

я наверно просто не туда вставлял их, а ошибка всегда только при отправке

Alexeis

Дата 24.6.2007, 11:33 (ссылка)

(нет голосов)

Загрузка ...

Амеба

Профиль
Группа: Админ
Сообщений: 11743
Регистрация: 12.10.2005
Где: Зеленоград

Репутация: 109
Всего: 459

Цитата(Yanis @ 24.6.2007, 11:14

)

Прогу запускал без отладки (Shift+Ctrl+F9)?

Под отладкой исключения все равно генерируются...

--------------------

Vit вечная память.

Обсуждение действий администрации форума производятся только в этом форуме

гениальность идеи состоит в том, что ее невозможно придумать

Yanis

Дата 24.6.2007, 11:43 (ссылка)

(нет голосов)

Загрузка ...

Эксперт

Профиль
Группа: Участник Клуба
Сообщений: 2937
Регистрация: 9.2.2004
Где: Москва

Репутация: 72
Всего: 111

Цитата(Alexeis @ 24.6.2007, 12:33

)

Под отладкой

Цитата(Yanis @ 24.6.2007, 12:14

)

без отладки

--------------------

*щёлк*

Snowy

Дата 25.6.2007, 10:50 (ссылка)

(нет голосов)

Загрузка ...

Эксперт

Профиль
Группа: Модератор
Сообщений: 11363
Регистрация: 13.10.2004
Где: Питер

Репутация: 192
Всего: 484

При работе с Indy и файловой системой всегда защищай код блоками try..except..finally
Посмотри примеры отправки на форуме - в большинстве работа с Indy даётся с применением защиты.
Посмотри, как это делается правильно и сделай аналогично.

0 Пользователей читают эту тему (0 Гостей и 0 Скрытых Пользователей)
0 Пользователей:
« Предыдущая тема \| Delphi: Общие вопросы \| Следующая тема »