доделал автоматические действия

uGeneral.fmx

@@ -283,10 +283,10 @@ object TTW_Bot: TTTW_Bot
               Viewport.Height = 116.000000000000000000
             end
             inherited btnRandomAdd: TButton
-              TabOrder = 33
+              TabOrder = 32
             end
-            inherited btnRandomDel: TButton
-              TabOrder = 34
+            inherited btnRmGroup: TButton
+              TabOrder = 33
             end
             inherited Label4: TLabel
               TabOrder = 35
@@ -450,8 +450,8 @@ object TTW_Bot: TTTW_Bot
         inherited sgWebChats: TStringGrid
           Size.Width = 970.000000000000000000
           Size.Height = 282.000000000000000000
-          Viewport.Width = 966.000000000000000000
-          Viewport.Height = 257.000000000000000000
+          Viewport.Width = 970.000000000000000000
+          Viewport.Height = 282.000000000000000000
           inherited StringColumn2: TStringColumn
             Size.Width = 200.000000000000000000
           end
@@ -472,7 +472,7 @@ object TTW_Bot: TTTW_Bot
           OnClick = frOBS1btnDeleteeChatClick
         end
         inherited Label1: TLabel
-          TabOrder = 9
+          TabOrder = 10
         end
         inherited btnCreateOBSNotify: TButton
           Images = ImageList1
@@ -601,36 +601,25 @@ object TTW_Bot: TTTW_Bot
         Size.Height = 718.000000000000000000
         Size.PlatformDefault = False
         inherited GroupBox20: TGroupBox
-          inherited edtMessage: TEdit
-            TabOrder = 38
-          end
-          inherited edtInterval: TEdit
-            TabOrder = 39
-          end
           inherited btnAddMessage: TButton
             Images = ImageList1
             ImageIndex = 0
-            TabOrder = 40
           end
           inherited btnRmMessage: TButton
             Images = ImageList1
             ImageIndex = 4
-            TabOrder = 41
           end
           inherited btnEditMessage: TButton
             Images = ImageList1
             ImageIndex = 3
-            TabOrder = 42
           end
           inherited btnNotifyTest: TButton
             Images = ImageList1
             ImageIndex = 25
-            TabOrder = 43
           end
           inherited sgTimers: TStringGrid
-            TabOrder = 44
-            Viewport.Width = 459.000000000000000000
-            Viewport.Height = 200.000000000000000000
+            Viewport.Width = 463.000000000000000000
+            Viewport.Height = 225.000000000000000000
             inherited scTimerMessage: TStringColumn
               Size.Width = 301.000000000000000000
             end
@@ -640,28 +629,21 @@ object TTW_Bot: TTTW_Bot
           end
         end
         inherited GroupBox23: TGroupBox
-          inherited edtBanWords: TEdit
-            TabOrder = 38
-          end
           inherited btnBanWordsAdd: TButton
             Images = ImageList1
             ImageIndex = 0
-            TabOrder = 39
           end
           inherited btnBanWordsEdt: TButton
             Images = ImageList1
             ImageIndex = 3
-            TabOrder = 40
           end
           inherited btnBanWordsDel: TButton
             Images = ImageList1
             ImageIndex = 4
-            TabOrder = 41
           end
           inherited sgBanWords: TStringGrid
-            TabOrder = 42
-            Viewport.Width = 293.000000000000000000
-            Viewport.Height = 200.000000000000000000
+            Viewport.Width = 297.000000000000000000
+            Viewport.Height = 225.000000000000000000
             inherited scRegEx: TStringColumn
               Size.Width = 265.000000000000000000
             end
@@ -672,47 +654,29 @@ object TTW_Bot: TTTW_Bot
             Position.X = 217.000000000000000000
             Size.Width = 88.000000000000000000
             Size.PlatformDefault = False
-            TabOrder = 43
-          end
-          inherited Label6: TLabel
-            TabOrder = 44
           end
           inherited edtBanWordsCheck: TEdit
-            TabOrder = 45
             Size.Width = 201.000000000000000000
           end
-          inherited Label7: TLabel
-            TabOrder = 46
-          end
-          inherited lBanWordsCheck: TLabel
-            TabOrder = 47
-          end
         end
         inherited GroupBox17: TGroupBox
-          inherited edtCounterName: TEdit
-            TabOrder = 42
-          end
-          inherited edtCounterTrigger: TEdit
-            TabOrder = 39
-          end
           inherited edtCounterCount: TEdit
-            TabOrder = 38
+            TabOrder = 37
           end
           inherited btnCounterAdd: TButton
             Images = ImageList1
             ImageIndex = 0
-            TabOrder = 40
           end
           inherited btnCounterDelete: TButton
             Images = ImageList1
             ImageIndex = 4
+            TabOrder = 38
           end
           inherited btnCounterP: TButton
             Images = ImageList1
             ImageIndex = 0
             Position.X = 416.000000000000000000
             Size.Width = 22.000000000000000000
-            TabOrder = 43
             Text = ''
           end
           inherited btnCounterM: TButton
@@ -720,18 +684,15 @@ 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 = 459.000000000000000000
-            Viewport.Height = 96.000000000000000000
+            Viewport.Width = 463.000000000000000000
+            Viewport.Height = 121.000000000000000000
             inherited scCounterTrigger: TStringColumn
               Size.Width = 236.000000000000000000
             end