добавил часть модулей, нужно переделать БД на records

This commit is contained in:
PC1\PTyTb
2025-08-06 14:54:32 +03:00
parent d68064187d
commit dacd2e6050
23 changed files with 2610 additions and 201 deletions
+11 -3
View File
@@ -3,7 +3,7 @@ program TTW_Bot_app;
uses
System.StartUpCopy,
FMX.Forms,
uGeneral in 'uGeneral.pas' {Form1},
uGeneral in 'uGeneral.pas' {TTW_Bot},
fSettings in 'fSettings.pas' {frSettings: TFrame},
fAI in 'fAI.pas' {frAI: TFrame},
fNotify in 'fNotify.pas' {frNotify: TFrame},
@@ -16,14 +16,22 @@ uses
fColorSettings in 'fColorSettings.pas' {frColorSettings: TFrame},
uCreateChat in 'uCreateChat.pas' {fCreateChat},
fFontSettings in 'fFontSettings.pas' {frFontSettings: TFrame},
uCreateNotify in 'uCreateNotify.pas' {fCreateNotify};
uCreateNotify in 'uCreateNotify.pas' {fCreateNotify},
uTWAuth in 'uTWAuth.pas',
uTTWAPI in 'uTTWAPI.pas',
uAPIDA in 'uAPIDA.pas',
uShowText in 'uShowText.pas' {fShowText},
uWSDA in 'uWSDA.pas',
uQ in 'uQ.pas' {frmQ};
{$R *.res}
begin
Application.Initialize;
Application.CreateForm(TForm1, Form1);
Application.CreateForm(TTTW_Bot, TTW_Bot);
Application.CreateForm(TfCreateChat, fCreateChat);
Application.CreateForm(TfCreateNotify, fCreateNotify);
Application.CreateForm(TfShowText, fShowText);
Application.CreateForm(TfrmQ, frmQ);
Application.Run;
end.