diff --git a/packages/fcl-web/examples/httpserver/threadedhttpserver.pas b/packages/fcl-web/examples/httpserver/threadedhttpserver.pas
index c8f7cc453a..c27adec1f2 100644
--- a/packages/fcl-web/examples/httpserver/threadedhttpserver.pas
+++ b/packages/fcl-web/examples/httpserver/threadedhttpserver.pas
@@ -13,6 +13,8 @@ Type
   THTTPServer = class(TTestHTTPServer)
   protected
     function CreateConnection(Data: TSocketStream): TFPHTTPConnection; override;
+  public
+    Property ConnectionCount;
   end;
 
   TServerThread = class(TThread)
@@ -53,7 +55,7 @@ begin
   FServ.Threaded:=True;
   FServ.Port:=8080;
   FServ.WriteInfo := @WriteInfo;
-  FServ.AcceptIdleTimeout := 500;
+  FServ.AcceptIdleTimeout := 1000;
   FServ.OnAcceptIdle := @ServOnIdle;
 end;