
06.06.2007, 17:51
|
|
Участник форума
Регистрация: 19.05.2007
Сообщений: 228
С нами:
9989667
Репутация:
240
|
|
Нужен компонент IdHTTP с вкладки Indy Clients например следующий код
Код:
procedure TForm1.Button1Click(Sender: TObject);
var sl : TStringList;
begin
sl := TStringList.Create;
sl.Add('id=111');
sl.Add('pass=***');
Memo1.Lines.Text:=IdHTTP1.Post('http://www.ya.ru',sl);
end;
выведет в мемо html код страницы, полученной пост запросом.
Если нужно сделать get запрос, используй метод IdHTTP1.Get
|
|
|