aboutsummaryrefslogtreecommitdiffstats
path: root/Game/Code/UltraStar.dpr
diff options
context:
space:
mode:
Diffstat (limited to 'Game/Code/UltraStar.dpr')
-rw-r--r--Game/Code/UltraStar.dpr15
1 files changed, 6 insertions, 9 deletions
diff --git a/Game/Code/UltraStar.dpr b/Game/Code/UltraStar.dpr
index b9fa0530..b154c653 100644
--- a/Game/Code/UltraStar.dpr
+++ b/Game/Code/UltraStar.dpr
@@ -1,8 +1,5 @@
program UltraStar;
-{$DEFINE TRANSLATE}
-{$DEFINE DEBUG} //Remove b4 release
-
{$R 'UltraStar.res' 'UltraStar.rc'}
{$I switches.inc}
@@ -99,11 +96,11 @@ uses
USingNotes in 'Classes\USingNotes.pas',
//New Plugin and Core Management
- {ULists in 'Classes\ULists.pas', //maybe drop this
- UHooks in 'Classes\UHooks.pas', //80 % - Whiteshark is about to work on this
- UServices in 'Classes\UServices.pas', //20 % - Whiteshark is about to work on this
- UCore in 'Classes\UCore.pas',
- UCoreModule in 'Classes\UCoreModule.pas', }
+ UModules in 'Classes\UModules.pas', //This Unit contains a const with the Modules to Load
+ UHooks in 'Classes\UHooks.pas', //Class for Hook Management //Write Freeing Methods for Both
+ UServices in 'Classes\UServices.pas', //95% - One Hack to remove ;)
+ UCore in 'Classes\UCore.pas', //30 % - Many Classes needs Rewriting or Manipulation
+ UCoreModule in 'Classes\UCoreModule.pas',
UPluginInterface in 'Classes\UPluginInterface.pas', //Some changes to work with unwriten classes, need to be done
//------------------------------
@@ -191,7 +188,7 @@ begin
Inc(I);
hWnd := FindWindow(nil, PChar(WndTitle + ' Instance ' + InttoStr(I)));
until (hWnd = 0);
-
+ MessageBox(
WndTitle := WndTitle + ' Instance ' + InttoStr(I);
end
else