исправление имен модулей
This commit is contained in:
+1
-1
@@ -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)
|
||||
|
||||
@@ -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;
|
||||
|
||||
@@ -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
|
||||
|
||||
@@ -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)
|
||||
|
||||
@@ -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
|
||||
|
||||
@@ -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
|
||||
|
||||
@@ -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;
|
||||
|
||||
|
||||
@@ -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
@@ -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
@@ -2,7 +2,7 @@ program TTW_Bot_app;
|
||||
|
||||
uses
|
||||
System.StartUpCopy,
|
||||
SysUtils,
|
||||
System.SysUtils,
|
||||
FMX.Forms,
|
||||
Web.WebReq,
|
||||
IdHTTPWebBrokerBridge,
|
||||
|
||||
@@ -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
|
||||
@@ -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)
|
||||
|
||||
@@ -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)
|
||||
|
||||
@@ -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
@@ -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)
|
||||
|
||||
@@ -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
|
||||
|
||||
@@ -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,
|
||||
|
||||
@@ -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
@@ -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
@@ -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,
|
||||
|
||||
@@ -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
@@ -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
@@ -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
|
||||
|
||||
@@ -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
@@ -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;
|
||||
|
||||
@@ -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
@@ -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;
|
||||
|
||||
@@ -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;
|
||||
|
||||
@@ -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)
|
||||
|
||||
@@ -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
|
||||
|
||||
@@ -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
|
||||
|
||||
Reference in New Issue
Block a user