оптимизон от нейронки, доделал автоматические действия, добавил глобальный лог, сделал реконекты к ДА

uGeneral.fmx

@@ -1,7 +1,7 @@
 object TTW_Bot: TTTW_Bot
   Left = 480
   Top = 0
-  Caption = 'Form1'
+  Caption = 'TTW_Bot'
   ClientHeight = 886
   ClientWidth = 970
   Position = Designed
@@ -9,6 +9,7 @@ object TTW_Bot: TTTW_Bot
   FormFactor.Height = 480
   FormFactor.Devices = [Desktop]
   OnCreate = FormCreate
+  OnDestroy = FormDestroy
   Left = 480
   DesignerMasterStyle = 0
   object V: TTabControl
@@ -117,12 +118,12 @@ object TTW_Bot: TTTW_Bot
           inherited btnDAStart: TButton
             Images = ImageList1
             ImageIndex = 18
-            TabOrder = 43
+            TabOrder = 42
             OnClick = frSettings1btnDAStartClick
           end
           inherited btnGetDADef: TButton
             Images = ImageList1
-            TabOrder = 45
+            TabOrder = 44
           end
         end
         inherited btnOpenRomaning: TButton
@@ -660,23 +661,31 @@ object TTW_Bot: TTTW_Bot
           end
         end
         inherited GroupBox17: TGroupBox
+          inherited edtCounterName: TEdit
+            TabOrder = 41
+          end
+          inherited edtCounterTrigger: TEdit
+            TabOrder = 39
+          end
           inherited edtCounterCount: TEdit
-            TabOrder = 37
+            TabOrder = 38
           end
           inherited btnCounterAdd: TButton
             Images = ImageList1
             ImageIndex = 0
+            TabOrder = 40
           end
           inherited btnCounterDelete: TButton
             Images = ImageList1
             ImageIndex = 4
-            TabOrder = 38
+            TabOrder = 37
           end
           inherited btnCounterP: TButton
             Images = ImageList1
             ImageIndex = 0
             Position.X = 416.000000000000000000
             Size.Width = 22.000000000000000000
+            TabOrder = 43
             Text = ''
           end
           inherited btnCounterM: TButton
@@ -684,13 +693,16 @@ object TTW_Bot: TTTW_Bot
             ImageIndex = 12
             Position.X = 449.000000000000000000
             Size.Width = 22.000000000000000000
+            TabOrder = 44
             Text = ''
           end
           inherited btnCounterEdit: TButton
             Images = ImageList1
             ImageIndex = 3
+            TabOrder = 45
           end
           inherited sgCounter: TStringGrid
+            TabOrder = 46
             Viewport.Width = 463.000000000000000000
             Viewport.Height = 121.000000000000000000
             inherited scCounterTrigger: TStringColumn