PTyTb/ttw_fmx_v10
1
0
Fork 0
Code Issues Pull Requests Packages Projects Releases Wiki Activity

добавил групповые ответы

Browse Source
This commit is contained in:
PC1\PTyTb
2025-08-07 19:04:26 +03:00
parent b62450b6ec
commit a4cbf1c709
8 changed files with 273 additions and 161 deletions
Download Patch File Download Diff File Expand all files Collapse all files
uGeneral.fmx
+35 -50
View File
@@ -204,8 +204,8 @@ object TTW_Bot: TTTW_Bot
Size.Height = 718.000000000000000000
Size.PlatformDefault = False
inherited sgCommands: TStringGrid
Viewport.Width = 536.000000000000000000
Viewport.Height = 168.000000000000000000
Viewport.Width = 540.000000000000000000
Viewport.Height = 193.000000000000000000
inherited scCommand: TStringColumn
Size.Width = 134.000000000000000000
end
@@ -217,53 +217,42 @@ object TTW_Bot: TTTW_Bot
inherited frContruct1: TfrContruct
inherited mResponse: TMemo
Size.Width = 384.000000000000000000
Viewport.Width = 380.000000000000000000
Viewport.Height = 157.000000000000000000
Viewport.Width = 384.000000000000000000
Viewport.Height = 161.000000000000000000
end
inherited GroupBox7: TGroupBox
inherited btnAddUserName: TButton
Images = ImageList1
ImageIndex = 11
TabOrder = 38
end
inherited btnGetDateFollow: TButton
Images = ImageList1
ImageIndex = 15
TabOrder = 39
end
inherited btnGetAgeAccaunt: TButton
Images = ImageList1
ImageIndex = 15
TabOrder = 40
end
inherited btnCounterAddtoText: TButton
Images = ImageList1
ImageIndex = 23
TabOrder = 41
end
inherited cbCounterName: TComboBox
TabOrder = 42
end
inherited btnGPT: TButton
Images = ImageList1
ImageIndex = 19
TabOrder = 43
end
inherited btnRandomUserName: TButton
Images = ImageList1
ImageIndex = 11
TabOrder = 44
end
inherited btnGetChannelStat: TButton
Images = ImageList1
ImageIndex = 22
Size.Width = 136.000000000000000000
TabOrder = 45
end
inherited btnAIPic: TButton
Images = ImageList1
ImageIndex = 5
TabOrder = 46
end
end
inherited btnAddCommand: TButton
@@ -281,29 +270,21 @@ object TTW_Bot: TTTW_Bot
end
end
inherited GroupBox9: TGroupBox
inherited lbRandomGroup: TListBox
Viewport.Width = 117.000000000000000000
Viewport.Height = 116.000000000000000000
end
inherited lbRandomRespons: TListBox
Viewport.Width = 214.000000000000000000
Viewport.Height = 116.000000000000000000
end
inherited btnRandomAdd: TButton
Images = ImageList1
ImageIndex = 0
TabOrder = 36
end
inherited btnRandomDel: TButton
Images = ImageList1
ImageIndex = 12
end
inherited btnRmGroup: TButton
Images = ImageList1
ImageIndex = 4
end
inherited Label5: TLabel
TabOrder = 42
inherited frGroupsRequest1: TfrGroupsRequest
inherited lbRandomGroup: TListBox
Viewport.Width = 117.000000000000000000
Viewport.Height = 116.000000000000000000
end
inherited lbRandomRespons: TListBox
Viewport.Width = 207.000000000000000000
Viewport.Height = 116.000000000000000000
end
inherited Label4: TLabel
TabOrder = 40
end
inherited Label5: TLabel
TabOrder = 43
end
end
end
inherited GroupBox8: TGroupBox
@@ -318,8 +299,8 @@ object TTW_Bot: TTTW_Bot
end
inherited sgRandomInt: TStringGrid
TabOrder = 35
Viewport.Width = 153.000000000000000000
Viewport.Height = 119.000000000000000000
Viewport.Width = 157.000000000000000000
Viewport.Height = 144.000000000000000000
inherited scRIntName: TStringColumn
Size.Width = 70.000000000000000000
end
@@ -335,8 +316,8 @@ object TTW_Bot: TTTW_Bot
Margins.Top = 200.000000000000000000
inherited frsgSounds: TfrSimpleGrid
inherited sg: TStringGrid
Viewport.Width = 289.000000000000000000
Viewport.Height = 124.000000000000000000
Viewport.Width = 293.000000000000000000
Viewport.Height = 149.000000000000000000
inherited sgR2: TStringColumn
Size.Width = 170.000000000000000000
end
@@ -364,8 +345,8 @@ object TTW_Bot: TTTW_Bot
inherited GroupBox24: TGroupBox
inherited frsgFiles: TfrSimpleGrid
inherited sg: TStringGrid
Viewport.Width = 289.000000000000000000
Viewport.Height = 124.000000000000000000
Viewport.Width = 293.000000000000000000
Viewport.Height = 149.000000000000000000
inherited sgR2: TStringColumn
Size.Width = 170.000000000000000000
end
@@ -398,8 +379,8 @@ object TTW_Bot: TTTW_Bot
TabOrder = 7
inherited frsgNeiro: TfrSimpleGrid
inherited sg: TStringGrid
Viewport.Width = 289.000000000000000000
Viewport.Height = 124.000000000000000000
Viewport.Width = 293.000000000000000000
Viewport.Height = 149.000000000000000000
inherited sgR2: TStringColumn
Size.Width = 170.000000000000000000
end
@@ -880,7 +861,8 @@ object TTW_Bot: TTTW_Bot
TabOrder = 11
end
object Label1: TLabel
Position.X = 760.000000000000000000
Anchors = [akTop, akRight]
Position.X = 821.000000000000000000
Position.Y = 8.000000000000000000
Text = #1054#1090#1076#1077#1083#1100#1085#1086#1077' '#1089#1087#1072#1089#1080#1073#1086':'
TabOrder = 12
@@ -914,9 +896,10 @@ object TTW_Bot: TTTW_Bot
TabOrder = 0
end
object SpeedButton1: TSpeedButton
Anchors = [akTop, akRight]
Images = ImageList1
ImageIndex = 11
Position.X = 760.000000000000000000
Position.X = 821.000000000000000000
Position.Y = 33.000000000000000000
Size.Width = 141.000000000000000000
Size.Height = 22.000000000000000000
@@ -926,9 +909,10 @@ object TTW_Bot: TTTW_Bot
OnClick = SpeedButton1Click
end
object SpeedButton2: TSpeedButton
Anchors = [akTop, akRight]
Images = ImageList1
ImageIndex = 11
Position.X = 760.000000000000000000
Position.X = 821.000000000000000000
Position.Y = 63.000000000000000000
Size.Width = 141.000000000000000000
Size.Height = 22.000000000000000000
@@ -938,9 +922,10 @@ object TTW_Bot: TTTW_Bot
OnClick = SpeedButton2Click
end
object SpeedButton3: TSpeedButton
Anchors = [akTop, akRight]
Images = ImageList1
ImageIndex = 11
Position.X = 760.000000000000000000
Position.X = 821.000000000000000000
Position.Y = 93.000000000000000000
Size.Width = 141.000000000000000000
Size.Height = 22.000000000000000000