anchor.diff:    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;
  
positive.code:   Index := L;
  end;
  
  procedure TOrderedServerAddressListTS.SetNodeServerAddress(Const nodeServerAddress: TNodeServerAddress);
  Var i : Integer;
    P : PNodeServerAddress;
  begin
  
negative.code:     Procedure UpdateNetConnection(netConnection : TNetConnection);
      procedure GetNodeServersToConnnect(maxNodes : Integer; useArray : Boolean; var nsa : TNodeServerAddressArray);
      Function GetValidNodeServers(OnlyWhereIConnected : Boolean; Max : Integer): TNodeServerAddressArray;
      property AllowDeleteOnClean : Boolean read FAllowDeleteOnClean write FAllowDeleteOnClean;
    End;
  
  
  