* Initialize result in CountConnections

(cherry picked from commit b4d4c30a45a2072d3ce448fd8b62cfa58b7cdc90)

packages/fcl-db/src/sqldb/sqldbpool.pp

@@ -1181,6 +1181,7 @@ Var
   Key : String;
   L : TConnectionList;
 begin
+  Result:=0;
   Key:=CreateKey(aDef);
   Lock;
   try