обработка счетчиков и сохранение галочек озвучки и приветствия

frames/fCommands.fmx

@@ -49,32 +49,8 @@ object frCommands: TfrCommands
         Viewport.Height = 161.000000000000000000
       end
       inherited GroupBox7: TGroupBox
-        inherited btnAddUserName: TButton
-          TabOrder = 37
-        end
-        inherited btnGetDateFollow: TButton
-          TabOrder = 38
-        end
-        inherited btnGetAgeAccaunt: TButton
-          TabOrder = 39
-        end
-        inherited btnCounterAddtoText: TButton
-          TabOrder = 40
-        end
-        inherited cbCounterName: TComboBox
-          TabOrder = 41
-        end
-        inherited btnGPT: TButton
-          TabOrder = 42
-        end
-        inherited btnRandomUserName: TButton
-          TabOrder = 43
-        end
-        inherited btnGetChannelStat: TButton
-          TabOrder = 44
-        end
         inherited btnAIPic: TButton
-          TabOrder = 45
+          TabOrder = 46
         end
       end
       inherited btnAddCommand: TButton
@@ -86,11 +62,8 @@ object frCommands: TfrCommands
       inherited btnRmCommand: TButton
         OnClick = frContruct1btnRmCommandClick
       end
-      object cbTextToSpeach: TCheckBox
-        Position.X = 272.000000000000000000
-        Position.Y = 8.000000000000000000
-        TabOrder = 47
-        Text = #1054#1079#1074#1091#1095#1082#1072' '#1087#1086#1089#1083#1077' !!!'
+      inherited cbHelloTTS: TCheckBox
+        OnClick = nil
       end
     end
   end
@@ -121,16 +94,16 @@ object frCommands: TfrCommands
         Viewport.Height = 116.000000000000000000
       end
       inherited btnRandomAdd: TButton
-        TabOrder = 33
+        TabOrder = 31
       end
       inherited btnRandomDel: TButton
-        TabOrder = 34
+        TabOrder = 32
       end
       inherited btnRmGroup: TButton
-        TabOrder = 36
+        TabOrder = 34
       end
       inherited Label4: TLabel
-        TabOrder = 38
+        TabOrder = 36
       end
     end
   end