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

uRecords.pas

@@ -2,21 +2,67 @@ unit uRecords;
 
 interface
 
+type
+  TOBSKandinsky = record
+    port: integer;
+  end;
+
+type
+  TOBSNotify = record
+    Picture: string;
+    Sound: string;
+
+    ColorBlock: string;
+    SolidBorder: integer;
+    Paddings: integer;
+    ColorBorder: integer;
+    ColorBackground: integer;
+
+    HeaderText: string;
+    HeaderColorFont: integer;
+    HeaderSizeFont: integer;
+    HeaderStyleFont: integer;
+
+    MessText: string;
+    MessColorFont: integer;
+    MessSizeFont: integer;
+    MessStyleFont: integer;
+
+    TimeMess: integer;
+    TypeEvent: integer;
+    TypeEdit: string;
+    port: integer;
+
+  end;
+
+type
+  TOBSChat = record
+    ColorBlock: string;
+    ColorBorder: integer;
+    ColorBackground: integer;
+    ColorFont: integer;
+    SolidBorder: integer;
+    Paddings: integer;
+    SizeFont: integer;
+    MaxCountMess: integer;
+    TimeMess: integer;
+    port: integer;
+    StyleFont: integer;
+  end;
 
 type
   TRandomCounters = record
     rndName: string;
-    Ot: Integer;
-    ToValue: Integer;
+    Ot: integer;
+    ToValue: integer;
   end;
 
-  type
+type
   TListCommands = record
     R1: string;
     R2: string;
   end;
 
-
 type
   TConst = record
     GeneralPath: string;
@@ -398,9 +444,6 @@ type
     DA_URL: string;
   end;
 
-
-
 implementation
 
-
 end.