anchor.diff:    FNodeServersAddresses := TOrderedServerAddressListTS.Create(Self);
     FLastRequestId := 0;
     FNetConnections := TPCThreadList.Create('TNetData_NetConnections');
  -  FIsGettingNewBlockChainFromClient := false;
  +  FLockGettingNewBlockChainFromClient := TPCCriticalSection.Create('LockGettingNewBlockChainFromClient');
     FNewBlockChainFromClientStatus := '';
     FNodePrivateKey := TECPrivateKey.Create;
     FNodePrivateKey.GenerateRandomPrivateKey(CT_Default_EC_OpenSSL_NID);
  
positive.code:                     end else TLog.NewLog(ltdebug,Classname,'Received old response of: '+TNetData.HeaderDataToText(HeaderData));
                    End;
                    CT_NetOp_AddOperations : Begin
                      if TNetData.NetData.IpInfos.ReachesLimits(Client.RemoteHost,CT_NetTransferType[HeaderData.header_type],TNetData.OperationToText(HeaderData.operation),HeaderData.buffer_data_length,
                        TArray<TLimitLifetime>.Create(TLimitLifetime.Create(20,20,0))) then DisconnectInvalidClient(False,Format('Reached limit %s',[TNetData.OperationToText(HeaderData.operation)]))
                      else DoProcess_AddOperations(HeaderData,ReceiveDataBuffer);
                    End;
                    CT_NetOp_GetSafeBox : Begin
                      if HeaderData.header_type=ntp_request then begin
                        if TNetData.NetData.IpInfos.ReachesLimits(Client.RemoteHost,CT_NetTransferType[HeaderData.header_type],TNetData.OperationToText(HeaderData.operation),HeaderData.buffer_data_length,
                          TArray<TLimitLifetime>.Create(TLimitLifetime.Create(3600,100,0))) then DisconnectInvalidClient(False,Format('Reached limit %s',[TNetData.OperationToText(HeaderData.operation)]))
                        else DoProcess_GetSafeBox_Request(HeaderData,ReceiveDataBuffer)
                      end else DisconnectInvalidClient(false,'Received '+TNetData.HeaderDataToText(HeaderData));
                    end;
  
negative.code:   FreeAndNil(FRegisteredRequests);
    FreeAndNil(FNetworkAdjustedTime);
    FreeAndNil(FIpInfos);
    FreeAndNil(FLockGettingNewBlockChainFromClient);
    inherited;
    if (_NetData=Self) then _NetData := Nil;
    TLog.NewLog(ltInfo,ClassName,'TNetData.Destroy END');
  