post запрос

[Editor]

как отправить post запрос:
Host: localhost
User-Agent: socket
жилательно с модулями IdHTTP, IdMultipartFormData, ....
извеняю что тем создал многа но мне даже не кто не отвечал

[Editor]

procedure TForm1.Button1Click(Sender: TObject);
var
HTTP: TIdHTTP;
MPS: TIdMultiPartFormDataStream;
S: TStringStream;
begin
HTTP := TIdHTTP.Create(nil);
MPS := TIdMultiPartFormDataStream.Create;
S := TStringStream.Create('');
try
MPS.AddFormField('domain', Edit1.Text);
HTTP.Post('http://'+ Edit1.Text +'.localhost/cht.cgi', MPS, S);
Memo1.Text := S.DataString;
finally
MPS.Free;
HTTP.Free;
S.Free;
end;
end;




как сюда вставить заголовки? типа User-Agent Host и так далие ...
вот что мне нужно если быть точным

[Квэнди]

Опять полную ерунду написали. ну почитайте же вы вконце концов RFC.
Post -это тип запроса
User-agent и т.д. это состовляющая часть HTTP- заголовка, в post никакого отношения не имеет, это общее понятие для HTTP
в компоненте IdHTTP спецально есть соответствующее свойство Request
неужели так сложно просто посомтреть свойства компонента который используете ?

[Editor]

Мне надо заголовки сюда влить или HTTP ЗАПРОС ЗДЕЛАТЬ А Я НЕ ВРУБАЮСЬ КАК ЗДЕЛАТЬ НА НЁМ HTTP ЗАПРОС

[Квэнди]

см пост выше, в нем ответ есть. тема закрыта.