исправление имен модулей

This commit is contained in:
PC1\PTyTb
2025-09-11 08:37:27 +03:00
parent 1c35ea61f0
commit 951b4fa2eb
31 changed files with 41 additions and 38 deletions
+1 -1
View File
@@ -3,7 +3,7 @@ unit uAPIDA;
interface
uses
Classes, SysUtils, System.JSON, IdHTTP, IdSSLOpenSSL, flog;
system.Classes, system.SysUtils, System.JSON, IdHTTP, IdSSLOpenSSL, flog;
type
TAPIClient = class(TObject)
+1 -1
View File
@@ -3,7 +3,7 @@ unit uChatAPI;
interface
uses
Classes, SysUtils, IdHTTP, System.JSON, IdSSLOpenSSL, IdGlobal;
system.Classes, system.SysUtils, IdHTTP, System.JSON, IdSSLOpenSSL, IdGlobal;
type
TMessage = procedure(s: string) of object;
+1 -1
View File
@@ -3,7 +3,7 @@ unit uCustomEmoties;
interface
uses
Classes, System.Generics.Collections, System.JSON, uRecords, IdHTTP, IdSSLOpenSSL,
System.Classes, System.Generics.Collections, System.JSON, uRecords, IdHTTP, IdSSLOpenSSL,
System.Net.HttpClient, System.SysUtils;
type
+1 -1
View File
@@ -3,7 +3,7 @@ unit uGigaChat;
interface
uses
uChatAPI, SysUtils, IdHTTP, System.JSON, IdSSLOpenSSL, IdGlobal, classes;
uChatAPI, system.SysUtils, IdHTTP, System.JSON, IdSSLOpenSSL, IdGlobal, system.classes;
type
TGigaChat = class(TChatAPI)
+1 -1
View File
@@ -4,7 +4,7 @@ interface
uses
System.SysUtils, System.Classes, System.JSON, System.Net.HttpClient,
System.Net.URLClient, System.NetConsts, StrUtils, System.Net.Mime,
System.Net.URLClient, System.NetConsts, system.StrUtils, System.Net.Mime,
System.NetEncoding, System.Threading;
type
+1 -1
View File
@@ -4,7 +4,7 @@ interface
uses
System.Classes, System.SysUtils, IdHTTP, IdSSLOpenSSL, System.JSON, FMX.Forms,
IdMultipartFormData, DateUtils, uDataBase, System.Generics.Collections,
IdMultipartFormData, System.DateUtils, uDataBase, System.Generics.Collections,
uRecords;
type
+1 -1
View File
@@ -4,7 +4,7 @@ interface
uses
System.SysUtils, System.JSON, System.Types, System.UITypes, System.Classes,
WinInet, ComObj, IdException,
Winapi.WinInet, System.Win.ComObj, IdException,
ipwcore, ipwtypes, ipwwsclient, ipwping, idhttp, IdSSLOpenSSL, uRecords,
fmx.Types, System.Net.HttpClient, System.Net.HttpClientComponent;
+1 -1
View File
@@ -4,7 +4,7 @@ interface
uses
System.SysUtils, System.Classes, IdContext, IdCustomHTTPServer, IdHTTPServer,
IdComponent, ShellAPI, System.Threading, Windows;
IdComponent, winapi.ShellAPI, System.Threading, winapi.Windows;
type
TmyEvent = procedure(txt: string) of object;
+1 -1
View File
@@ -3,7 +3,7 @@ unit uWSDA;
interface
uses
Classes, SysUtils, System.JSON, ipwwsclient, StrUtils, uAPIDA;
system.Classes, system.SysUtils, System.JSON, ipwwsclient, system.StrUtils, uAPIDA;
type
TOnDonateEvent = procedure(aNick, aMessage, aSum: string) of object;
+1 -1
View File
@@ -2,7 +2,7 @@ program TTW_Bot_app;
uses
System.StartUpCopy,
SysUtils,
System.SysUtils,
FMX.Forms,
Web.WebReq,
IdHTTPWebBrokerBridge,
+3
View File
@@ -0,0 +1,3 @@
@echo off
dcc32 -B -Q -U"C:\Program Files (x86)\Embarcadero\Studio\23.0\lib\win32\release" -U"C:\Users\PTyTb\Documents\lib\IPWorks 2024 Delphi Edition\pas" -U"C:\Users\PTyTb\Documents\lib\BassSimple\BassSimple" -E"C:\Users\PTyTb\Desktop\www\ttw_fmx_v10\Win32\Release" -N"C:\Users\PTyTb\Desktop\www\ttw_fmx_v10\Win32\Release" TTW_Bot_app.dpr
pause
+1 -1
View File
@@ -7,7 +7,7 @@ uses
System.Variants, FMX.ListBox, FMX.Colors, FMX.SpinBox,
FMX.Types, FMX.Controls, FMX.Forms, FMX.Graphics, FMX.Dialogs,
fColorSettings, fFontSettings, FMX.Controls.Presentation, FMX.StdCtrls,
FMX.Edit, FMX.EditBox, StrUtils, uRecords;
FMX.Edit, FMX.EditBox, System.StrUtils, uRecords;
type
TfCreateChat = class(TForm)
+1 -1
View File
@@ -8,7 +8,7 @@ uses
FMX.Types, FMX.Controls, FMX.Forms, FMX.Graphics, FMX.Dialogs, FMX.Edit,
FMX.EditBox, FMX.SpinBox, FMX.ListBox, FMX.StdCtrls,
FMX.Controls.Presentation,
System.Generics.Collections, IOUtils;
System.Generics.Collections, System.IOUtils;
type
TfCreateGame = class(TForm)
+1 -1
View File
@@ -4,7 +4,7 @@ interface
uses
System.SysUtils, System.Types, System.UITypes, System.Classes,
System.Variants, fOBS, System.RegularExpressions, Math,
System.Variants, fOBS, System.RegularExpressions, System.Math,
FMX.Types, FMX.Controls, FMX.Forms, FMX.Graphics, FMX.Dialogs, fFontSettings,
fColorSettings, FMX.StdCtrls, FMX.Edit, FMX.Controls.Presentation,
FMX.ListBox, FMX.EditBox, FMX.SpinBox, FMX.Colors, uRecords;
+4 -4
View File
@@ -17,17 +17,17 @@ unit uGeneral;
interface
uses
System.SysUtils, System.Types, System.UITypes, System.Classes, DateUtils,
System.SysUtils, System.Types, System.UITypes, System.Classes, System.DateUtils,
System.Variants, uTTWIRC, uTTWEventSub, uTTWAPI, uSoundManager, uKeyEvent,
FMX.Types, FMX.Controls, FMX.Forms, FMX.Graphics, FMX.Dialogs, FMX.TabControl,
FMX.Controls.Presentation, FMX.StdCtrls, System.ImageList, FMX.ImgList,
FMX.Styles, ShellAPI, StrUtils, IdComponent, uRegExpr, uCustomEmoties,
FMX.Styles, winapi.ShellAPI, system.StrUtils, IdComponent, uRegExpr, uCustomEmoties,
fSettings, fAI, fNotify, fAutoActions, FMX.ListBox, fLog, fEvents,
System.Generics.Collections, utts, uGigaChat, uChatAPI, uMyTimer, uRecords,
System.IOUtils, fCommands, uDataBase, FMX.Edit, FMX.Colors, FMX.SpinBox,
windows, System.Skia, FMX.Skia, uCreateChat, uCreateNotify, fOBS, fTTS,
winapi.windows, System.Skia, FMX.Skia, uCreateChat, uCreateNotify, fOBS, fTTS,
fPlayerWeb, uWebServerKandinsky, FMX.Memo.Types, FMX.ScrollBox, FMX.Memo,
fRevards, json;
fRevards, system.json;
type
TTTW_Bot = class(TForm)
+1 -1
View File
@@ -6,7 +6,7 @@ uses
System.SysUtils, System.Types, System.UITypes, System.Classes,
System.Variants, uRegExpr,
FMX.Types, FMX.Graphics, FMX.Controls, FMX.Forms, FMX.Dialogs, FMX.StdCtrls,
System.Rtti, FMX.Grid.Style, FMX.Grid, FMX.ScrollBox, FMX.Edit, StrUtils,
System.Rtti, FMX.Grid.Style, FMX.Grid, FMX.ScrollBox, FMX.Edit, System.StrUtils,
FMX.Controls.Presentation, uMyTimer, uRecords, System.Generics.Collections;
type
+1 -1
View File
@@ -4,7 +4,7 @@ interface
uses
System.SysUtils, System.Types, System.UITypes, System.Classes,
System.Variants, StrUtils,
System.Variants, System.StrUtils,
FMX.Types, FMX.Graphics, FMX.Controls, FMX.Forms, FMX.Dialogs, FMX.StdCtrls,
System.Rtti, FMX.Grid.Style, FMX.Memo.Types, FMX.Grid, FMX.Layouts, uRecords,
FMX.ListBox, FMX.Memo, FMX.Edit, FMX.Controls.Presentation, FMX.ScrollBox,
+1 -1
View File
@@ -6,7 +6,7 @@ uses
System.SysUtils, System.Types, System.UITypes, System.Classes, System.Variants,
FMX.Types, FMX.Graphics, FMX.Controls, FMX.Forms, FMX.Dialogs, FMX.StdCtrls,
FMX.Memo.Types, FMX.ListBox, FMX.ScrollBox, FMX.Memo, FMX.Edit,
FMX.Controls.Presentation, StrUtils;
FMX.Controls.Presentation, System.StrUtils;
type
TfrContruct = class(TFrame)
+1 -1
View File
@@ -4,7 +4,7 @@ interface
uses
System.SysUtils, System.Types, System.UITypes, System.Classes,
System.Variants, System.Generics.Collections, ShellAPI, uSoundManager,
System.Variants, System.Generics.Collections, winapi.ShellAPI, uSoundManager,
FMX.Types, FMX.Graphics, FMX.Controls, FMX.Forms, FMX.Dialogs, FMX.StdCtrls,
FMX.Edit, FMX.ListBox, FMX.Controls.Presentation, System.Rtti, FMX.Grid.Style,
FMX.ScrollBox, FMX.Grid, uRecords, uDataBase, FMX.Menus, uKeyEvent,
+1 -1
View File
@@ -6,7 +6,7 @@ uses
System.SysUtils, System.Types, System.UITypes, System.Classes,
System.Variants,
FMX.Types, FMX.Graphics, FMX.Controls, FMX.Forms, FMX.Dialogs, FMX.StdCtrls,
StrUtils,
System.StrUtils,
System.Rtti, FMX.Grid.Style, FMX.Grid, FMX.ScrollBox, uRecords,
System.Generics.Collections,
FMX.Controls.Presentation, FMX.EditBox, FMX.NumberBox, FMX.Edit,
+2 -2
View File
@@ -6,9 +6,9 @@ uses
System.SysUtils, System.Types, System.UITypes, System.Classes,
System.Variants, uQ,
FMX.Types, FMX.Graphics, FMX.Controls, FMX.Forms, FMX.Dialogs, FMX.StdCtrls,
ShellAPI, System.IOUtils, uDataBase,
winapi.ShellAPI, System.IOUtils, uDataBase,
FMX.Controls.Presentation, FMX.Edit, uTWAuth, uRecords, uAPIDA, uShowText,
json, uWSDA, fLog;
System.json, uWSDA, fLog;
type
TfrSettings = class(TFrame)
+1 -1
View File
@@ -4,7 +4,7 @@ interface
uses
System.SysUtils, System.Types, System.UITypes, System.Classes,
System.Variants, shellapi,
System.Variants, winapi.shellapi,
FMX.Types, FMX.Graphics, FMX.Controls, FMX.Forms, FMX.Dialogs, FMX.StdCtrls,
FMX.Edit, FMX.ListBox, FMX.Controls.Presentation, uTTS, bass_simple;
+1 -1
View File
@@ -3,7 +3,7 @@ unit uKeyEvent;
interface
uses
System.SysUtils, System.Types, Windows, System.Classes, System.UITypes,
System.SysUtils, System.Types, winapi.Windows, System.Classes, System.UITypes,
FMX.Types, FMX.Edit, FMX.Controls, FMX.Forms, FMX.Platform, FMX.ListBox;
type
+2 -2
View File
@@ -3,8 +3,8 @@ unit uPlayerThread;
interface
uses
Classes, SysUtils, SyncObjs, Generics.Collections, bass_simple,
System.IOUtils, Types;
System.Classes, System.SysUtils, System.SyncObjs, System.Generics.Collections, bass_simple,
System.IOUtils, System.Types;
type
TOnError = procedure(const Msg, FileName: string) of object;
+3 -3
View File
@@ -104,8 +104,8 @@ interface
{$IFDEF FPC} {$DEFINE OverMeth} {$ENDIF}
uses
Classes, // TStrings in Split method
SysUtils; // Exception
system.Classes, // TStrings in Split method
system.SysUtils; // Exception
type
{$IFDEF UniCode}
@@ -639,7 +639,7 @@ function RegExprSubExpressions (const ARegExpr : string;
implementation
uses
Windows; // CharUpper/Lower
winapi.Windows; // CharUpper/Lower
const
TRegExprVersionMajor : integer = 0;
+1 -1
View File
@@ -2,7 +2,7 @@ unit uSoundManager;
interface
uses classes, ShellAPI, bass_simple, windows, System.SysUtils;
uses System.classes, winapi.ShellAPI, bass_simple, winapi.windows, System.SysUtils;
type
TSongMachine = class(TObject)
+1 -1
View File
@@ -3,7 +3,7 @@ unit uTTS;
interface
uses
Windows, SysUtils, Classes, MMSystem;
winapi.Windows, System.SysUtils, System.Classes, winapi.MMSystem;
type
TPlayFinishedEvent = procedure(Sender: TObject) of object;
+1 -1
View File
@@ -2,7 +2,7 @@ unit uWebServerChat;
interface
uses classes, StrUtils, DateUtils, System.JSON, System.Generics.Collections,
uses System.classes, System.StrUtils, System.DateUtils, System.JSON, System.Generics.Collections,
IdBaseComponent, IdComponent, IdCustomTCPServer, IdContext,
IdCustomHTTPServer, uRecords, System.IOUtils, IdGlobalProtocols,
IdHTTPServer, System.SysUtils;
+2 -2
View File
@@ -3,10 +3,10 @@ unit uWebServerEvents;
interface
uses
Classes, StrUtils, DateUtils, System.JSON, System.Generics.Collections,
System.Classes, System.StrUtils, System.DateUtils, System.JSON, System.Generics.Collections,
IdBaseComponent, IdComponent, IdCustomTCPServer, IdContext,
IdCustomHTTPServer, uRecords, System.IOUtils, IdGlobalProtocols,
IdHTTPServer, System.SysUtils, SyncObjs;
IdHTTPServer, System.SysUtils, System.SyncObjs;
type
TTTW_Events = class(TObject)
+1 -1
View File
@@ -4,7 +4,7 @@ interface
uses
System.SysUtils, System.Classes, System.JSON, System.Generics.Collections,
IdHTTPServer, IdCustomHTTPServer, IdContext, IdComponent, NetEncoding, IOUtils;
IdHTTPServer, IdCustomHTTPServer, IdContext, IdComponent, System.NetEncoding, System.IOUtils;
type
TGameWebServer = class
+1 -1
View File
@@ -6,7 +6,7 @@ uses
System.SysUtils, System.Types, System.UITypes, System.Classes,
System.Variants, System.NetEncoding,IdContext, IdCustomHTTPServer, IdHTTPServer, IdGlobal,
FMX.Types, FMX.Controls, FMX.Forms, FMX.Graphics, FMX.Dialogs, FMX.Edit,
FMX.Controls.Presentation, FMX.StdCtrls, uKandinskyAPI, FMX.Memo.Types, json,
FMX.Controls.Presentation, FMX.StdCtrls, uKandinskyAPI, FMX.Memo.Types, System.json,
FMX.ScrollBox, FMX.Memo, System.IOUtils, System.SyncObjs,System.DateUtils;
type