Обработка ошибок в TidHTTP

← →
Kostya (2005-10-24 21:05) [0]

Добрый день.
Возник вопрос как обработать ошибку если прокси сервер не отвечает(выскакивает окно с ошибкой) в следующем коде? И как правильно завершить соединение?:

procedure TForm1.Button1Click(Sender: TObject);
Var St : TMemoryStream;
begin
St := TMemoryStream.Create;
IdHTTP1.Request.UserAgent:="Mozzila 3.0/";
IdHTTP1.Request.Referer:="";
IdHTTP1.ProxyParams.ProxyServer:="221.11.124.35";
IdHTTP1.ProxyParams.ProxyPort:=8080;
IdHTTP1.Get("http://www.yandex.ru",St);
St.Position:=0;
ListBox1.Items.LoadFromStream(St);
St.Free;
end;
Заранее спасибо.

← →
AlexAndroID (2005-10-27 12:31) [1]

По-мойму, IdHTTP1.Get("http... надо одеть в "броник":
try
IdHTTP1.Get("http...
exception
... {здесь обрабатывать исключение, номера конкретного не помню, увы - поройся в RFC}
end;

Обработка ошибок в TidHTTP Найти похожие ветки