uses
  Winapi.Windows, Winapi.Messages, System.SysUtils, System.Variants, System.Classes, Vcl.Graphics,
  Vcl.Controls, Vcl.Forms, Vcl.Dialogs,curlobj,curl_h, Vcl.StdCtrls;

type
  TForm1 = class(TForm)
    Button1: TButton;
    procedure Button1Click(Sender: TObject);
  private
    { Private declarations }
  public
    { Public declarations }
  end;

var
  Form1: TForm1;

implementation

{$R *.dfm}

procedure TForm1.Button1Click(Sender: TObject);
var
  Curl: TCurl;
begin
  Curl := TCurl.Create(nil);
  Curl.URL := 'http://parsing-and-i.blogspot.com/';
  Curl.OutputFile := 'curl.html';
  if not Curl.Perform then
    ShowMessage(Curl.ErrorString);
  Curl.Free;
end;

end.

var
sl:tstringlist;
begin
sl:=tstringlist.create;
sl.add('var=значение');
idhttp.post('http://dupko.net',sl);
end;

var
sl:tstringlist;
begin
sl:=tstringlist.create;
sl.add('<?xml version="1.0" encoding="UTF-8"?> ');
sl.add('<ns:Documents Version="1.0"');
sl.add('xmlns:xsi="http://www.w3.org/2001/XMLSchema-instance"');
sl.add('xmlns:ns="http://fsrar.ru/WEGAIS/WB_DOC_SINGLE_01"');
sl.add('xmlns:oref="http://fsrar.ru/WEGAIS/ClientRef"');
sl.add('xmlns:qp="http://fsrar.ru/WEGAIS/QueryParameters"> ');
sl.add('<ns:Owner>');
sl.add('<ns:FSRAR_ID>020000442214</ns:FSRAR_ID>');
sl.add('</ns:Owner>');
sl.add('<ns:Document>');
sl.add('<ns:QueryClients>');
sl.add('<qp:Parameters>');
sl.add('<qp:Parameter>');
sl.add('<qp:Name>ИНН</qp:Name>');
sl.add('<qp:Value>7524187493</qp:Value>');
sl.add('</qp:Parameter>');
sl.add('</qp:Parameters>');
sl.add('</ns:QueryClients>');
sl.add('</ns:Document>');
sl.add('</ns:Documents>');
idhttp1.post('http://10.10.1.233:8080/opt/in/QueryPartner',sl);
end;