anchor.diff:            FNetData.FNetStatistics.ServersConnections := newstats.ServersConnections;
             FNetData.FNetStatistics.ServersConnectionsWithResponse := newstats.ServersConnectionsWithResponse;
             // Must stop clients?
  -          if (nserverclients>CT_MaxServersConnected) And // This is to ensure there are more serverclients than clients
  +          if (nserverclients>FNetData.MaxServersConnected) And // This is to ensure there are more serverclients than clients
                ((nserverclients + nactive + ndeleted)>=FNetData.FMaxConnections) And (Assigned(netserverclientstop)) then begin
               TLog.NewLog(ltinfo,Classname,Format('Sending FinalizeConnection to NodeConnection %s created on %s (working time %s) - NetServerClients:%d Servers_active:%d Servers_deleted:%d',
                 [netserverclientstop.Client.ClientRemoteAddr,FormatDateTime('hh:nn:ss',netserverclientstop.CreatedTime),
  
positive.code:   Index := L;
  end;
  
  procedure TOrderedServerAddressListTS.SetNodeServerAddress(Const nodeServerAddress: TNodeServerAddress);
  Var i : Integer;
    P : PNodeServerAddress;
  begin
  
negative.code:   if (AValue<CT_MIN_NODESERVERS_BUFFER) then FMaxNodeServersAddressesBuffer:=CT_MIN_NODESERVERS_BUFFER
    else if (AValue>CT_MAX_NODESERVERS_BUFFER) then FMaxNodeServersAddressesBuffer:=CT_MAX_NODESERVERS_BUFFER
    else FMaxNodeServersAddressesBuffer:=AValue;
  end;
  
  procedure TNetData.SetMaxServersConnected(AValue: Integer);
  begin
    if FMaxServersConnected=AValue then Exit;
    if AValue<1 then FMaxServersConnected:=1
    else FMaxServersConnected:=AValue;
    if FMaxServersConnected<FMinServersConnected then FMinServersConnected:=FMaxServersConnected;
  end;
  
  procedure TNetData.SetMinServersConnected(AValue: Integer);
  begin
    if FMinServersConnected=AValue then Exit;
    if AValue<1 then FMinServersConnected:=1
    else FMinServersConnected:=AValue;
    if FMaxServersConnected<FMinServersConnected then FMaxServersConnected:=FMinServersConnected;
  end;
  
  class function TNetData.NetData: TNetData;
  