Post

[Aleksandr69]

Подскажите как из программы добавлять clHttpRequest1.AddFormField('имя поля','значение'); что бы можно было формировать запрос из проги

procedure TForm1.Button1Click(Sender: TObject);
 var
 stranicha:     Tstrings;
 Str,strok,S,zapros:     string;
 P:             integer;
begin
 clHttpRequest1.Clear;
 stranicha:=TstringList.Create();
 clHttp1.Request:=clHttpRequest1;
 zapros:=jvedit1.text;
 clHttp1.Get(zapros,stranicha);
 clHttpRequest1.AddFormField('имя поля','значение'); //формируем post запрос
 stranicha.Clear;
 clHttp1.Post(zapros,stranicha);
end;