Top.Mail.Ru
Мастера DELPHI, Delphi programming community Титульная страница Поиск, карта сайта Написать письмо 
| Новости | Поиск | FAQ | Статьи | Книги | Новости VCL |
| Форумы ЧАТ | Орешник | KOL и MCK |
Форумы -» Основная («Начинающим»)/ Базы / WinAPI / Компоненты / Сети / Media / Игры / Corba и COM / KOL / FreePascal / .Net / Прочее / RSDN.ORG

« предыдущая ветвь | форум | следующая ветвь »

TidHttp в цикле после неудачного запроса больше не конектится [D6, Win2k]


Страницы:   1 2

Grin ©   (2003-01-14 15:59:00) 

Цикл
...
1 try
2 AssignFile(B, "htm.txt");
3 Rewrite(B);
4 WriteLn(B,HTTP.Get(url);
5 CloseFile(B);
6 except
7 Memo1.Text := "No conection";
8 LbNCCount.Caption:= IntToStr(c);
9 end;
...

После неудачи в 4-й строке до конца цикла каждый раз вылетает в эксершн стр6.
Вопрос:
Как правильно обойти неудачу в 4-й строке?

Зарание благодарен.


Reindeer Moss Eater   (2003-01-14 17:06:00) [21]

И еще подумай, будет ли закрыт открытый файл в случае возникновения исключения?


Reindeer Moss Eater   (2003-01-14 16:55:00) [22]

WriteLn(B,HTTP. Get(url);
Так надеюсь понятно наконец?


Grin   (2003-01-14 16:52:00) [23]


> У тебя в одной строке кода два вызова, которые потенциально
> могут вызвать исключение. С чего ты решил, что результата
> не достигаешь из-за якобы странного поведения idHTTP в цикле?????

Ну так первые три строчки полюбому выполняются
1 try
2 AssignFile(B, "htm.txt");
3 Rewrite(B);


А HTTP.Get(url)после обращения к неверному урлу на следуйщем круге (и до конца цикла) не достает сайты ....?



Reindeer Moss Eater   (2003-01-14 16:39:00) [24]

Еще раз:
Для TidHttp абсолютно фиолетово сколько раз ты вызываешь метод GET. Абсолютно. В цикле или вне цикла.

У тебя в однойстроке кода двавызова, которые потенциально могут вызвать исключение. С чего ты решил, что результата не достигаешь из-за якобы странного поведения idHTTP в цикле?????


Grin   (2003-01-14 16:32:00) [25]


> TidHttp никакого понятия о твоем цикле не имеет.

TidHttp поочереди запрашивает урлы из списка. После того как натыкается на неверный урл, всеостальные (по моему даже не проверяет)


> Обрати внимание на освобождение ресурсов.

После HTTP.Free; вылетает ужасня ошибка и все плохо. Что делать??


Reindeer Moss Eater   (2003-01-14 16:26:00) [26]

Chubais ©
Не путай человека.


Chubais   (2003-01-14 16:22:00) [27]

ну дык на эксепшне поставь дисконект


Reindeer Moss Eater   (2003-01-14 16:05:00) [28]

А вообюще лучще сначала делать Get, и только в случае успеха открывать файл.


Reindeer Moss Eater   (2003-01-14 16:02:00) [29]

Подсказка:
TidHttp никакого понятия о твоем цикле не имеет. И конечно же ошибка связана не с ним. Обрати внимание на освобождение ресурсов.


Страницы:   1 2

Наверх

Титульная страница Поиск, карта сайта Написать письмо