18.04.2010, 16:02
|
|
Участник форума
Регистрация: 30.03.2007
Сообщений: 121
С нами:
10060964
Репутация:
52
|
|
Сообщение от EndLeSSDre@M
Подскажите, где трабла? проблема в том что если прокся не рабочая, то выдает ошибку сокета 10060 типа превышено время ожидания.... пробовал по всякому как видите, от этой ошибки не избавился.... надо чтобы если прокся не рабочая, он удалял ее из списка и переходил дальше проверять!
....
ну че блин... никто помочь не может чтоль(((( всем помогаю, а мне никто(((
Вот, ошибка не вылетает, если программу запускать отдельно, тоесть не под средой разработки, проверял на этом коде.
PHP код:
procedure TForm1.Button1Click(Sender: TObject);
begin
IdHTTP1.ProxyParams.ProxyServer:='114.127.246.36';
IdHTTP1.ProxyParams.ProxyPort:=8080;
try
IdHTTP1.Get('http://ya.ru');
showmessage('Рабочий');
except
showmessage('Не рабочий');
// удаляем из списка
end;
end;
Меня смутили эти строки, при ошибке сохранить и освободить список? если тебе надо только удалить ненужный эл. списка, и продолжить цикл.
PHP код:
ProxyList.SavetoFile('Proxy.txt');
ProxyList.free;
Последний раз редактировалось JnK; 18.04.2010 в 16:12..
|
|
|