anchor.diff:          Try
             Repeat
               Sleep(100);
  -          Until Terminated;
  +          Until (Terminated) or (Application.Terminated);
           finally
             FreeAndNil(FMinerServer);
           end;
  
positive.code:     FIniFile : TIniFile;
      FMaxBlockToRead: Int64;
      FLastNodesCacheUpdatedTS : TTickCount;
      procedure OnNetDataReceivedHelloMessage(Sender : TObject);
      procedure OnInitSafeboxProgressNotify(sender : TObject; const message : String; curPos, totalCount : Int64);
    protected
  
negative.code:       Try
          // Check Database
          FNode.Bank.StorageClass := TFileStorage;
          TFileStorage(FNode.Bank.Storage).DatabaseFolder := GetDataFolder+PathDelim+'Data';
          TFileStorage(FNode.Bank.Storage).LowMemoryUsage := FIniFile.ReadBool(CT_INI_SECTION_GLOBAL,CT_INI_IDENT_LOWMEMORY,False);
          // By default daemon will not download checkpoint except if specified on INI file
          TNetData.NetData.MinFutureBlocksToDownloadNewSafebox := FIniFile.ReadInteger(CT_INI_SECTION_GLOBAL,CT_INI_IDENT_MINPENDINGBLOCKSTODOWNLOADCHECKPOINT,0);
  