aboutsummaryrefslogtreecommitdiffstats
path: root/Game/Code/Screens
diff options
context:
space:
mode:
authorjaybinks <jaybinks@b956fd51-792f-4845-bead-9b4dfca2ff2c>2007-09-20 10:35:02 +0000
committerjaybinks <jaybinks@b956fd51-792f-4845-bead-9b4dfca2ff2c>2007-09-20 10:35:02 +0000
commita1c2876fb12cfc860044f00210f69a9bdc2cf687 (patch)
tree17e99ea9a199279fd28d57b0be189765a6c9ad55 /Game/Code/Screens
parent3c41f973b397b718135a7713c7501607812b0192 (diff)
downloadusdx-a1c2876fb12cfc860044f00210f69a9bdc2cf687.tar.gz
usdx-a1c2876fb12cfc860044f00210f69a9bdc2cf687.tar.xz
usdx-a1c2876fb12cfc860044f00210f69a9bdc2cf687.zip
minor fixes for lazarus build..
forgot file... oops.. :) git-svn-id: svn://svn.code.sf.net/p/ultrastardx/svn/trunk@416 b956fd51-792f-4845-bead-9b4dfca2ff2c
Diffstat (limited to 'Game/Code/Screens')
-rw-r--r--Game/Code/Screens/UScreenLoading.pas21
1 files changed, 16 insertions, 5 deletions
diff --git a/Game/Code/Screens/UScreenLoading.pas b/Game/Code/Screens/UScreenLoading.pas
index 438b606e..2ccc5c79 100644
--- a/Game/Code/Screens/UScreenLoading.pas
+++ b/Game/Code/Screens/UScreenLoading.pas
@@ -2,22 +2,33 @@ unit UScreenLoading;
interface
+{$I switches.inc}
+
+{$IFDEF FPC}
+ {$MODE DELPHI}
+{$ENDIF}
+
uses
- UMenu, SDL, SysUtils, UThemes, OpenGL12;
+ UMenu,
+ SDL,
+ SysUtils,
+ UThemes,
+ OpenGL12;
type
TScreenLoading = class(TMenu)
public
Fadeout: boolean;
constructor Create; override;
- function ParseInput(PressedKey: Cardinal; ScanCode: byte; PressedDown: Boolean): Boolean; override;
- function GetBGTexNum: GLUInt;
- procedure onShow; override;
+ procedure onShow; override;
+ function ParseInput(PressedKey: Cardinal; ScanCode: byte; PressedDown: Boolean): Boolean; override;
+ function GetBGTexNum: GLUInt;
end;
implementation
-uses UGraphic, UTime;
+uses UGraphic,
+ UTime;
function TScreenLoading.ParseInput(PressedKey: Cardinal; ScanCode: byte; PressedDown: Boolean): Boolean;
begin