aboutsummaryrefslogtreecommitdiffstats
path: root/Game/Code/UltraStar.lpr
diff options
context:
space:
mode:
authortobigun <tobigun@b956fd51-792f-4845-bead-9b4dfca2ff2c>2008-04-06 11:36:03 +0000
committertobigun <tobigun@b956fd51-792f-4845-bead-9b4dfca2ff2c>2008-04-06 11:36:03 +0000
commitb2a824d8f4fcf4d9038e2a360ac586fb0279e739 (patch)
tree79c473600e6ada136c7b2e63c8725565f8c4c521 /Game/Code/UltraStar.lpr
parentda94f9cb1798038b5bbf898b1a92ab03c3a1628e (diff)
downloadusdx-b2a824d8f4fcf4d9038e2a360ac586fb0279e739.tar.gz
usdx-b2a824d8f4fcf4d9038e2a360ac586fb0279e739.tar.xz
usdx-b2a824d8f4fcf4d9038e2a360ac586fb0279e739.zip
removed lazarus dependencies
- added an implementation of AllocateHWnd/DeallocateHWnd to UCommon for the Win32 only units DirWatch and Midi... (do not use AllocateHWnd somewhere else) - added an own implementation of ShowMessage to UCommon (uses MessageBox in Windows, console-output otherwise) - linux still needs lresources for the lrs-file (will be removed soon) - the FPC windows version uses windows resources now (instead of lrs ones). compile them with windres (in FPC's "bin" dir) or delphi (a batch-file for windres will follow soon) - changed path-separator from '\' to '/' in RC-file for windres compatibility git-svn-id: svn://svn.code.sf.net/p/ultrastardx/svn/trunk@1006 b956fd51-792f-4845-bead-9b4dfca2ff2c
Diffstat (limited to '')
-rw-r--r--Game/Code/UltraStar.lpr87
1 files changed, 31 insertions, 56 deletions
diff --git a/Game/Code/UltraStar.lpr b/Game/Code/UltraStar.lpr
index 847b3d10..9a4c2676 100644
--- a/Game/Code/UltraStar.lpr
+++ b/Game/Code/UltraStar.lpr
@@ -1,56 +1,31 @@
-program UltraStar;
-
-{$MODE DELPHI}
-{$I switches.inc}
-
-uses
- {$ifdef unix} // http://wiki.lazarus.freepascal.org/Multithreaded_Application_Tutorial
- cthreads, // THIS MUST be the first used unit !!
- cwstring,
- {$endif}
- {$ifdef MSWINDOWS} // do not initialize the widgets in linux -> see below
- {$ifdef LCL}
- Interfaces, // Initialize Lazarus LCL (necessary for usage of LCLIntf, etc.)
- // WARNING: in linux (with the gtk2 interface) this will change the locale
- // settings like LC_NUMERIC (which cannot be reverted, can it? At least I have not managed to do so.).
- // As a result external libs like projectM might not be able to parse
- // floating-point values anymore (because ',' might be used as decimal-seperator in atof() or strtod()).
- // As a result, projectM does not work anymore and crashes because of access violations.
- // Not initializing Interfaces crashes USDX when widgets should be shown, as done with
- // MessageBox(). In addition LCL assigns itself as a Signal-handler for almost every
- // exception (FPE, SEGV, etc.) and wants to show a message-box with some info on
- // the exception that occured. It will crash a second time because of the missing
- // widget-set binding (error in winapi.pp).
- //
- // Removing the lazarus widget stuff seems to be the only solution but even if just
- // the LCLIntf unit is included, lazarus catches signals and tries to show the exception-info.
- // -> So we have to remove all the lazarus stuff except LResources (hope this doesn't influence the signal-handler too)
- // We can leave the windows-only LCL-stuff in DirWatch and the Midi-classes.
- {$endif}
- {$endif}
-
- {$I UltraStar.dpr}
-
- // ***************************************************************************
- //
- // Developers PLEASE NOTE !!!!!!!
- //
- // As of september 2007, I am working towards porting Ultrastar-DX to run
- // on Linux. I will be modifiying the source to make it compile in lazarus
- // on windows & linux and I will make sure that it compiles in delphi still
- // To help me in this endevour, please can you make a point of remembering
- // that linux is CASE SENSATIVE, and file / unit names must be as per
- // the filename exactly.
- //
- // EG : opengl12.pas must not be OpenGL in the uses cluase.
- //
- // thanks for your help...
- //
- // ***************************************************************************
-
- // Interesting stuff... :)
- // http://burningsmell.org/sdl_audioin/
-
-begin
- main();
-end.
+// ***************************************************************************
+//
+// Developers PLEASE NOTE !!!!!!!
+//
+// As of september 2007, I am working towards porting Ultrastar-DX to run
+// on Linux. I will be modifiying the source to make it compile in lazarus
+// on windows & linux and I will make sure that it compiles in delphi still
+// To help me in this endevour, please can you make a point of remembering
+// that linux is CASE SENSATIVE, and file / unit names must be as per
+// the filename exactly.
+//
+// EG : opengl12.pas must not be OpenGL in the uses cluase.
+//
+// thanks for your help...
+//
+// ***************************************************************************
+program UltraStar;
+
+{$MODE DELPHI}
+{$I switches.inc}
+
+{$IFDEF MSWINDOWS}
+ {$R 'UltraStar.res' 'UltraStar.rc'}
+{$ENDIF}
+
+uses
+ {$I UltraStar.dpr}
+
+begin
+ main();
+end.