diff --git a/packages/fcl-web/src/base/fphttpserver.pp b/packages/fcl-web/src/base/fphttpserver.pp
index 363986a1cb..90157840e5 100644
--- a/packages/fcl-web/src/base/fphttpserver.pp
+++ b/packages/fcl-web/src/base/fphttpserver.pp
@@ -539,8 +539,7 @@ end;
 
 destructor TFPHTTPServerConnectionListHandler.Destroy;
 begin
-  FList.Free;
-
+  FreeAndNil(FList);
   inherited Destroy;
 end;