Send post data and show response

post-data.pas

uses
  ..., fphttpclient;

procedure TForm1.Button1Click(Sender: TObject);
begin
  With TFPHttpClient.Create(Nil) do
    try
      // Sends post request and puts the response in a TMemo.
      // Data is passed as fieldname=fieldvalue format.
      Memo1.Text := FormPost('http://localhost/test/post.php','test1=test2');
    finally
      Free;
    end;
end;