ThumbnailsRemote and ThumbnailsLocal usage counters

Source commit: 37f58c3563741100c51c9f0f07622e2121ff263b

source/forms/CustomScpExplorer.cpp

@@ -12283,3 +12283,23 @@ void __fastcall TCustomScpExplorerForm::RemoteDirViewStartReading(TObject *)
   Terminal->DisableThumbnails();
 }
 //---------------------------------------------------------------------------
+void TCustomScpExplorerForm::ChangeDirViewStyle(TOperationSide Side, TDirViewStyle DirViewStyle)
+{
+  TCustomDirView * ADirView = DirView(Side);
+  if (ADirView->DirViewStyle != DirViewStyle)
+  {
+    if (DirViewStyle == dvsThumbnail)
+    {
+      if (dynamic_cast<TUnixDirView *>(ADirView) != NULL)
+      {
+        Configuration->Usage->Inc(L"ThumbnailsRemote");
+      }
+      else
+      {
+        Configuration->Usage->Inc(L"ThumbnailsLocal");
+      }
+    }
+    ADirView->DirViewStyle = DirViewStyle;
+    UpdateControls();
+  }
+}

source/forms/CustomScpExplorer.h

@@ -935,6 +935,7 @@ public:
   TThumbnailDownloadQueueItem * AddThumbnailDownloadQueueItem(TManagedTerminal * ATerminal);
   void PostThumbnailVisibleQueueQuery(int Index, const UnicodeString & FileName);
   void PostThumbnailDrawRequest(int Index);
+  void ChangeDirViewStyle(TOperationSide Side, TDirViewStyle DirViewStyle);
 
   __property bool ComponentVisible[Byte Component] = { read = GetComponentVisible, write = SetComponentVisible };
   __property bool EnableFocusedOperation[TOperationSide Side] = { read = GetEnableFocusedOperation, index = 0 };

source/forms/NonVisual.cpp

@@ -646,7 +646,7 @@ void __fastcall TNonVisualDataModule::ExplorerActionsExecute(
       ScpExplorer->UpdateControls();
     )
     #define STYLEACTION(SIDE, STYLE) EXE(SIDE ## STYLE ## Action, \
-      DirView(os ## SIDE)->DirViewStyle = dvs ## STYLE; ScpExplorer->UpdateControls())
+      ScpExplorer->ChangeDirViewStyle(os ## SIDE, dvs ## STYLE))
     STYLEACTION(Remote, Icon)
     STYLEACTION(Remote, SmallIcon)
     STYLEACTION(Remote, List)