Как програмно передать параметры на сервер

[Sniper]

Есть некий сервер, на котором лежит скрипт CGI. Как мне програмно передать на этот скрипт параметры. Например как мне предать два параметра user=root и pass=YouPass?

[Pitbull]

Сообщение от Sniper

Есть некий сервер, на котором лежит скрипт CGI. Как мне програмно передать на этот скрипт параметры. Например как мне предать два параметра user=root и pass=YouPass?

для приема - передачи используйте Get и Post.
var PostD:TStringList;
Respons:TStringStream;
begin
response:=TStringStream.Create('');
PostD:=TStringList.create;
postD.add('user=root');
postD.add('pass=YouPass');
try
idHTTP1.post(aдрес_куда, PostD,Response);
Memo1.Lines.text:=response.DataStri ng;//ответ сервера
finally
response.free;
postD.free;
idHTTP1.disconnect;
end;
end;

[Pitbull]

вот тебе еще пример, как віполнить скрипт на сервере....
uses IdMultipartFormData;
procedure TForm1.Button1Click(Sender: TObject);
var data: TIdMultiPartFormDataStream;
begin
data := TIdMultiPartFormDataStream.Create;
try
{ параметрі для скрипта}
data.AddFormField('param1', 'value1');
data.AddFormField('param2', 'value2');
{ результаті } Memo1.Lines.Text := IdHTTP1.Post('http://localhost/script.php', data);
finally
data.Free;
end;
end;