瀏覽代碼

MaskSelections and Filters counters

(cherry picked from commit 3a1011aa5496fc918180a1bde9112c0dc7261d03)

Source commit: f7632786ed54d8153420106725061b1098a45635
Martin Prikryl 9 年之前
父節點
當前提交
b744041bf7
共有 1 個文件被更改,包括 9 次插入1 次删除
  1. 9 1
      source/forms/CustomScpExplorer.cpp

+ 9 - 1
source/forms/CustomScpExplorer.cpp

@@ -3885,7 +3885,14 @@ void __fastcall TCustomScpExplorerForm::RemoteDirViewGetSelectFilter(
       TCustomDirView *Sender, bool Select, TFileFilter &Filter)
       TCustomDirView *Sender, bool Select, TFileFilter &Filter)
 {
 {
   DebugAssert(Sender);
   DebugAssert(Sender);
-  if (!DoSelectMaskDialog(Sender, Select, &Filter, Configuration)) Abort();
+  if (DoSelectMaskDialog(Sender, Select, &Filter, Configuration))
+  {
+    Configuration->Usage->Inc(L"MaskSelections");
+  }
+  else
+  {
+    Abort();
+  }
 }
 }
 //---------------------------------------------------------------------------
 //---------------------------------------------------------------------------
 void __fastcall TCustomScpExplorerForm::CalculateSize(
 void __fastcall TCustomScpExplorerForm::CalculateSize(
@@ -6975,6 +6982,7 @@ void __fastcall TCustomScpExplorerForm::Filter(TOperationSide Side)
   if (DoFilterMaskDialog(DirView, &Filter))
   if (DoFilterMaskDialog(DirView, &Filter))
   {
   {
     DirView->Mask = TFileMasks::NormalizeMask(Filter.Masks);
     DirView->Mask = TFileMasks::NormalizeMask(Filter.Masks);
+    Configuration->Usage->Inc(L"Filters");
   }
   }
 }
 }
 //---------------------------------------------------------------------------
 //---------------------------------------------------------------------------