VPF::HTTP.GET - продолжение работы - Форум программистов

Rodman

Дата 10.6.2008, 13:00 (ссылка)

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

Загрузка ...

CIO

Профиль
Группа: Участник
Сообщений: 6144
Регистрация: 7.5.2006
Где: Ukraine ⇛ Kyiv ci ty

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

Дароф

Ситуация такая что я пишу

Код


      http:=TIdHTTP.Create(nil);
      try
        for j:=1 to 15 do
        begin  
              sLine.Text:=http.Get(Links[j, 1]);
              ...//обрабатываю
        end; 
      except
        begin
          ShowMessage('Трабла. ахтунг');
          http.free;
        end;
      end;

но бывает такое что страницу низя открыть, по разным причинам и вылетает трабла

Код


---------------------------
Debugger Exception Notification
---------------------------
Project AutoParser.exe raised exception class EIdHTTPProtocolException with message 'HTTP/1.0 404 Not Found'. Process stopped. Use Step or Run to continue.
---------------------------
OK   Help   
---------------------------

как сделать так чтобы трабла в лог писалась, а потом продолжала следующие странички открывать и обрабатывать?

Сенкс

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

CRM с функцией АвтоОбзвона

Лотереи мира

z-END

Дата 10.6.2008, 13:08 (ссылка)

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

Загрузка ...

прафесар™

Профиль
Группа: Комодератор
Сообщений: 3014
Регистрация: 13.3.2003
Где: Венья, Пиетари

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

использовать try except приблизительно так как у тебя и показано. при запуске из под IDE нужно отключить остановку при эксепшенах или просто запускать как отдельнй файл (через проводник и т.п.)

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

Каждый чилавек пасвоему праф...а памоему НЕТ!

Rodman

Дата 10.6.2008, 13:23 (ссылка)

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

Загрузка ...

CIO

Профиль
Группа: Участник
Сообщений: 6144
Регистрация: 7.5.2006
Где: Ukraine ⇛ Kyiv ci ty

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

не понял...

Цитата(z-END @ 10.6.2008, 13:08

)

при запуске из под IDE нужно отключить остановку при эксепшенах

как?

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

CRM с функцией АвтоОбзвона

Лотереи мира

Snowy

Дата 10.6.2008, 14:13 (ссылка)

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

Загрузка ...

Эксперт

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

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

При эксепшене в диалоге есть галочка - не стопориться на данном виде эксепшена.
Ставишь её, и всё. Больше среда не будет тебя на нём беспокоить.

Rodman

Дата 10.6.2008, 14:15 (ссылка)

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

Загрузка ...

CIO

Профиль
Группа: Участник
Сообщений: 6144
Регистрация: 7.5.2006
Где: Ukraine ⇛ Kyiv ci ty

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

а все что в эксепшине написано в моем коде - убрать?:

Добавлено через 11 минут и 49 секунд

Цитата(Snowy @ 10.6.2008, 14:13

)

Ставишь её, и всё. Больше среда не будет тебя на нём беспокоить.

там жешь просто "View CPU window" и все...

не думаю что это то, что надо

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

CRM с функцией АвтоОбзвона

Лотереи мира

Snowy

Дата 10.6.2008, 14:31 (ссылка)

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

Загрузка ...

Эксперт

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

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

Вместо мессаги сделай добавление в лог текста ошибки.
Уничтожение объекта нужно поместить в finally, а не эксепшн!

sai_NT

Дата 14.6.2008, 11:02 (ссылка)

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

Загрузка ...

Шустрый

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

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

примерно так:

Код


http:=TIdHTTP.Create(nil);
for j:=1 to 15 do begin
      try
              sLine.Text:=http.Get(Links[j, 1]);
              ...//обрабатываю
      except
              on E: Exception do LogMemo.Lines.Add(E.HelpContext+': '+E.Message);
      end;    
end;
http.free;

кинь на форму мемку и назови LogMemo.

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