добавил навыки и привязал к ним донаты и баллы канала

This commit is contained in:
PC1\PTyTb
2025-08-15 15:13:19 +03:00
parent 2335bf1656
commit 7a6934c825
15 changed files with 1120 additions and 78 deletions
+80 -55
View File
@@ -18,7 +18,7 @@ object TTW_Bot: TTTW_Bot
Size.Width = 970.000000000000000000
Size.Height = 744.000000000000000000
Size.PlatformDefault = False
TabIndex = 0
TabIndex = 5
TabOrder = 0
TabPosition = PlatformDefault
Sizes = (
@@ -45,7 +45,7 @@ object TTW_Bot: TTTW_Bot
item
end>
TextSettings.Trimming = None
IsSelected = True
IsSelected = False
ImageIndex = 21
Size.Width = 96.000000000000000000
Size.Height = 26.000000000000000000
@@ -76,6 +76,7 @@ object TTW_Bot: TTTW_Bot
inherited btnGetTokenStreamer: TButton
Images = ImageList1
ImageIndex = 10
TabOrder = 30
end
inherited edtBotTokenStreamer: TEdit
TabOrder = 33
@@ -88,34 +89,38 @@ object TTW_Bot: TTTW_Bot
inherited btnDAGetCode: TButton
Images = ImageList1
ImageIndex = 10
TabOrder = 38
TabOrder = 34
end
inherited Label63: TLabel
TabOrder = 30
end
inherited edtDAClientID: TEdit
TabOrder = 33
TabOrder = 32
end
inherited Label64: TLabel
TabOrder = 31
end
inherited edtDAClientSecret: TEdit
TabOrder = 34
end
inherited Label65: TLabel
TabOrder = 35
TabOrder = 33
end
inherited edtDARedirectURL: TEdit
TabOrder = 43
TabOrder = 40
end
inherited edtDACode: TEdit
TabOrder = 36
end
inherited Label66: TLabel
TabOrder = 37
end
inherited btnDAStart: TButton
Images = ImageList1
ImageIndex = 18
TabOrder = 39
OnClick = frSettings1btnDAStartClick
end
inherited btnGetDADef: TButton
Images = ImageList1
TabOrder = 44
TabOrder = 43
end
end
inherited btnOpenRomaning: TButton
@@ -276,10 +281,18 @@ object TTW_Bot: TTTW_Bot
Viewport.Width = 207.000000000000000000
Viewport.Height = 116.000000000000000000
end
inherited btnRandomAdd: TButton
Images = ImageList1
ImageIndex = 0
end
inherited btnRandomDel: TButton
Images = ImageList1
ImageIndex = 12
TabOrder = 31
end
inherited btnRmGroup: TButton
Images = ImageList1
ImageIndex = 4
TabOrder = 33
end
inherited Label4: TLabel
@@ -437,11 +450,65 @@ object TTW_Bot: TTTW_Bot
Size.Width = 308.000000000000000000
Size.Height = 203.000000000000000000
Size.PlatformDefault = False
inherited btnUpdateVoices: TButton
Images = ImageList1
ImageIndex = 10
end
inherited btnSend: TButton
Images = ImageList1
ImageIndex = 6
OnClick = frTTS1btnSendClick
end
end
end
object GroupBox2: TGroupBox
Padding.Left = 10.000000000000000000
Padding.Top = 20.000000000000000000
Padding.Right = 10.000000000000000000
Padding.Bottom = 10.000000000000000000
Position.Y = 249.000000000000000000
Size.Width = 841.000000000000000000
Size.Height = 368.000000000000000000
Size.PlatformDefault = False
Text = #1057#1086#1073#1099#1090#1080#1103
TabOrder = 1
inline frEvents1: TfrEvents
Align = Client
Size.Width = 821.000000000000000000
Size.Height = 338.000000000000000000
Size.PlatformDefault = False
inherited sgEvents: TStringGrid
Size.Width = 721.000000000000000000
Viewport.Width = 721.000000000000000000
Viewport.Height = 211.000000000000000000
inherited StringColumn1: TStringColumn
Size.Width = 150.000000000000000000
end
inherited StringColumn2: TStringColumn
Size.Width = 150.000000000000000000
end
inherited StringColumn3: TStringColumn
Size.Width = 150.000000000000000000
end
inherited StringColumn4: TStringColumn
Size.Width = 150.000000000000000000
end
end
inherited btnAdd: TButton
Images = ImageList1
ImageIndex = 0
Position.X = 737.000000000000000000
end
inherited btnDelete: TButton
Images = ImageList1
ImageIndex = 12
Position.X = 737.000000000000000000
end
inherited pVKGenerate: TPanel
Visible = True
end
end
end
end
object TabItem4: TTabItem
CustomIcon = <
@@ -464,84 +531,42 @@ object TTW_Bot: TTTW_Bot
Size.Height = 345.000000000000000000
Size.PlatformDefault = False
inherited sgWebChats: TStringGrid
Align = Bottom
CanFocus = True
ClipChildren = True
Position.Y = 63.000000000000000000
Size.Width = 970.000000000000000000
Size.Height = 282.000000000000000000
Size.PlatformDefault = False
TabOrder = 0
RowCount = 0
Options = [ColumnResize, ColumnMove, ColLines, RowLines, Tabs, Header, HeaderClick, AutoDisplacement]
Viewport.Width = 970.000000000000000000
Viewport.Height = 282.000000000000000000
inherited IntegerColumn1: TIntegerColumn
Header = #1055#1086#1088#1090
HeaderSettings.TextSettings.WordWrap = False
end
inherited StringColumn1: TStringColumn
Header = #1058#1080#1087
HeaderSettings.TextSettings.WordWrap = False
end
inherited StringColumn2: TStringColumn
Header = #1057#1089#1099#1083#1082#1072' '#1076#1083#1103' OBS'
HeaderSettings.TextSettings.WordWrap = False
Size.Width = 200.000000000000000000
end
end
inherited btnCreateOBSChat: TButton
Images = ImageList1
ImageIndex = 13
Position.X = 8.000000000000000000
Position.Y = 8.000000000000000000
Size.Width = 94.000000000000000000
Size.Height = 22.000000000000000000
Size.PlatformDefault = False
TabOrder = 2
Text = #1057#1086#1079#1076#1072#1090#1100' '#1095#1072#1090
TextSettings.Trimming = None
end
inherited btnDeleteeChat: TButton
Anchors = [akTop, akRight]
Images = ImageList1
ImageIndex = 4
Position.X = 882.000000000000000000
Position.Y = 8.000000000000000000
TabOrder = 3
Text = #1059#1076#1072#1083#1080#1090#1100
TextSettings.Trimming = None
OnClick = frOBS1btnDeleteeChatClick
end
inherited Label1: TLabel
Position.X = 8.000000000000000000
Position.Y = 38.000000000000000000
Text = #1057#1086#1079#1076#1072#1085#1085#1099#1077' '#1095#1072#1090#1099':'
TabOrder = 13
TabOrder = 12
end
inherited btnCreateOBSNotify: TButton
Images = ImageList1
ImageIndex = 24
Position.X = 110.000000000000000000
Position.Y = 8.000000000000000000
Size.Width = 146.000000000000000000
Size.Height = 22.000000000000000000
Size.PlatformDefault = False
TabOrder = 4
Text = #1057#1086#1079#1076#1072#1090#1100' '#1086#1087#1086#1074#1077#1097#1077#1085#1080#1077
TextSettings.Trimming = None
end
inherited btnCreateOBSKandinsky: TButton
Images = ImageList1
ImageIndex = 5
Position.X = 264.000000000000000000
Position.Y = 8.000000000000000000
Size.Width = 147.000000000000000000
Size.Height = 22.000000000000000000
Size.PlatformDefault = False
TabOrder = 5
Text = #1057#1086#1079#1076#1072#1090#1100' '#1050#1072#1085#1076#1080#1085#1089#1082#1080#1081
TextSettings.Trimming = None
TabOrder = 8
end
object btnCreateChat: TButton
Images = ImageList1
@@ -578,7 +603,7 @@ object TTW_Bot: TTTW_Bot
item
end>
TextSettings.Trimming = None
IsSelected = False
IsSelected = True
ImageIndex = 24
Size.Width = 110.000000000000000000
Size.Height = 26.000000000000000000