Суть проблемы такова код

procedure TForm1.XiButton1Click(Sender: TObject);
var
s:String;
c:String;
begin
s := InputBox(Введите,'Введите адрес','http://');
RichEdit1.Text := IdHTTP1.Get(s);
end;

Но выдаёт ошибку вида

"Socket Error #11001
Host not found"
и выделяетса строка
"RichEdit1.Text := IdHTTP1.Get(s);"

В чём может быть проблема наверно надо настроить както idhttp.
За рание благодарен.

Здравствуйте, Victor_qqqwww, Вы писали:

V_>Суть проблемы такова код

V_>

V_>procedure TForm1.XiButton1Click(Sender: TObject);
V_>var
V_>s:String;
V_>c:String;
V_>begin
V_>s := InputBox(Введите,'Введите адрес','http://');
V_>RichEdit1.Text := IdHTTP1.Get(s);
V_>end;
V_>

V_>Но выдаёт ошибку вида

V_>"Socket Error #11001
V_>Host not found"
V_>и выделяетса строка
V_>"RichEdit1.Text := IdHTTP1.Get(s);"

V_>В чём может быть проблема наверно надо настроить както idhttp.
V_>За рание благодарен.

если этот компонент имеет хоть какое то сходство и NMHTTP из 5 Делфы то адрес должен быть без "http://"

Здравствуйте, Victor_qqqwww, Вы писали:

V_>Но выдаёт ошибку вида

V_>"Socket Error #11001
V_>Host not found"
V_>и выделяетса строка
V_>"RichEdit1.Text := IdHTTP1.Get(s);"

V_>В чём может быть проблема наверно надо настроить както idhttp.
V_>За рание благодарен.

Глупый вопрос, но: хост-то существует на самом деле? )

А у вас какая версия инди? Если та, что по умолчанию с 6 делфи, то там перед строкой запроса надо добавить строку idhttp1.host:='имя хоста без http://';
Субя по ошибке — это оно.