Скачать: CL | DM;

Обработка ошибок в 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;

---

Страницы: 1 вся ветка

Скачать: CL | DM;



Память: 0.45 MB
Время: 0.028 c