diff --git a/.gitattributes b/.gitattributes
index 818045d1bb..96b83a58f1 100644
--- a/.gitattributes
+++ b/.gitattributes
@@ -2372,6 +2372,10 @@ packages/fcl-web/examples/combined/wmusers.lrs svneol=native#text/plain
packages/fcl-web/examples/combined/wmusers.pp svneol=native#text/plain
packages/fcl-web/examples/httpclient/httpget.lpi svneol=native#text/plain
packages/fcl-web/examples/httpclient/httpget.pas svneol=native#text/plain
+packages/fcl-web/examples/httpclient/httppost.lpi svneol=native#text/plain
+packages/fcl-web/examples/httpclient/httppost.pp svneol=native#text/plain
+packages/fcl-web/examples/httpclient/httppostfile.lpi svneol=native#text/plain
+packages/fcl-web/examples/httpclient/httppostfile.pp svneol=native#text/plain
packages/fcl-web/examples/httpserver/simplehttpserver.lpi svneol=native#text/plain
packages/fcl-web/examples/httpserver/simplehttpserver.pas svneol=native#text/plain
packages/fcl-web/examples/jsonrpc/demo1/README.txt svneol=native#text/plain
diff --git a/packages/fcl-web/examples/httpclient/httpget.lpi b/packages/fcl-web/examples/httpclient/httpget.lpi
index eb5cb1917d..b31a8fec7e 100644
--- a/packages/fcl-web/examples/httpclient/httpget.lpi
+++ b/packages/fcl-web/examples/httpclient/httpget.lpi
@@ -13,7 +13,6 @@
-
@@ -35,17 +34,12 @@
-
+
-
-
-
-
-
diff --git a/packages/fcl-web/examples/httpclient/httppost.lpi b/packages/fcl-web/examples/httpclient/httppost.lpi
new file mode 100644
index 0000000000..14bbde1b58
--- /dev/null
+++ b/packages/fcl-web/examples/httpclient/httppost.lpi
@@ -0,0 +1,76 @@
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
diff --git a/packages/fcl-web/examples/httpclient/httppost.pp b/packages/fcl-web/examples/httpclient/httppost.pp
new file mode 100644
index 0000000000..9ecc3b1c08
--- /dev/null
+++ b/packages/fcl-web/examples/httpclient/httppost.pp
@@ -0,0 +1,30 @@
+program httppost;
+
+{$mode objfpc}{$H+}
+
+uses
+ SysUtils, Classes, fphttpclient;
+
+Var
+ F : TFileStream;
+ Vars : TStrings;
+ i : integer;
+begin
+ With TFPHTTPClient.Create(Nil) do
+ begin
+ F:=TFileStream.Create('response.html',fmCreate);
+ try
+ Vars:=TstringList.Create;
+ try
+ For i:=1 to 10 do
+ Vars.Add(Format('Var%d=Value %d',[i,i]));
+ FormPost(ParamStr(1),vars,f);
+ finally
+ Vars.Free;
+ end;
+ finally
+ F.Free;
+ end;
+ end;
+end.
+
diff --git a/packages/fcl-web/examples/httpclient/httppostfile.lpi b/packages/fcl-web/examples/httpclient/httppostfile.lpi
new file mode 100644
index 0000000000..ff10fe92eb
--- /dev/null
+++ b/packages/fcl-web/examples/httpclient/httppostfile.lpi
@@ -0,0 +1,77 @@
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
diff --git a/packages/fcl-web/examples/httpclient/httppostfile.pp b/packages/fcl-web/examples/httpclient/httppostfile.pp
new file mode 100644
index 0000000000..4d3202a64f
--- /dev/null
+++ b/packages/fcl-web/examples/httpclient/httppostfile.pp
@@ -0,0 +1,28 @@
+program httppostfile;
+
+{$mode objfpc}{$H+}
+
+uses
+ SysUtils, Classes, fphttpclient;
+
+Var
+ F : TFileStream;
+ Vars : TStrings;
+ i : integer;
+begin
+ With TFPHTTPClient.Create(Nil) do
+ begin
+ F:=TFileStream.Create('response.html',fmCreate);
+ try
+ Vars:=TstringList.Create;
+ try
+ FileFormPost(ParamStr(1),'myfile',paramstr(2),f);
+ finally
+ Vars.Free;
+ end;
+ finally
+ F.Free;
+ end;
+ end;
+end.
+