Добавил интеграции с ОБС

fOBS.fmx

@@ -3,7 +3,6 @@ object frOBS: TfrOBS
   Size.Height = 252.000000000000000000
   Size.PlatformDefault = False
   object sgWebChats: TStringGrid
-    Anchors = [akLeft, akTop, akRight, akBottom]
     Align = Bottom
     CanFocus = True
     ClipChildren = True
@@ -14,8 +13,8 @@ object frOBS: TfrOBS
     TabOrder = 0
     RowCount = 0
     Options = [ColumnResize, ColumnMove, ColLines, RowLines, Tabs, Header, HeaderClick, AutoDisplacement]
-    Viewport.Width = 689.000000000000000000
-    Viewport.Height = 189.000000000000000000
+    Viewport.Width = 685.000000000000000000
+    Viewport.Height = 164.000000000000000000
     object IntegerColumn1: TIntegerColumn
       Header = #1055#1086#1088#1090
       HeaderSettings.TextSettings.WordWrap = False
@@ -36,6 +35,7 @@ object frOBS: TfrOBS
     TabOrder = 1
     Text = #1057#1086#1079#1076#1072#1090#1100' '#1095#1072#1090
     TextSettings.Trimming = None
+    OnClick = btnCreateOBSChatClick
   end
   object btnDeleteeChat: TButton
     Position.X = 601.000000000000000000
@@ -43,6 +43,7 @@ object frOBS: TfrOBS
     TabOrder = 2
     Text = #1059#1076#1072#1083#1080#1090#1100
     TextSettings.Trimming = None
+    OnClick = btnDeleteeChatClick
   end
   object Label1: TLabel
     Position.X = 8.000000000000000000
@@ -59,6 +60,7 @@ object frOBS: TfrOBS
     TabOrder = 4
     Text = #1057#1086#1079#1076#1072#1090#1100' '#1086#1087#1086#1074#1077#1097#1077#1085#1080#1077
     TextSettings.Trimming = None
+    OnClick = btnCreateOBSNotifyClick
   end
   object btnCreateOBSKandinsky: TButton
     Position.X = 257.000000000000000000
@@ -69,5 +71,6 @@ object frOBS: TfrOBS
     TabOrder = 5
     Text = #1057#1086#1079#1076#1072#1090#1100' '#1050#1072#1085#1076#1080#1085#1089#1082#1080#1081
     TextSettings.Trimming = None
+    OnClick = btnCreateOBSKandinskyClick
   end
 end