From 44956e119562be2defd82eba8b10e7069ead5b76 Mon Sep 17 00:00:00 2001 From: whiteshark0 Date: Tue, 10 Apr 2007 15:12:07 +0000 Subject: Edited Mogs Text: Now hes a Graphics Guy ^^ git-svn-id: svn://svn.code.sf.net/p/ultrastardx/svn/trunk@77 b956fd51-792f-4845-bead-9b4dfca2ff2c --- Game/Code/Screens/UScreenLoading.pas | 8 +++++++- 1 file changed, 7 insertions(+), 1 deletion(-) (limited to 'Game/Code/Screens/UScreenLoading.pas') diff --git a/Game/Code/Screens/UScreenLoading.pas b/Game/Code/Screens/UScreenLoading.pas index 05b308ac..5cc938bb 100644 --- a/Game/Code/Screens/UScreenLoading.pas +++ b/Game/Code/Screens/UScreenLoading.pas @@ -3,7 +3,7 @@ unit UScreenLoading; interface uses - UMenu, SDL, SysUtils, UThemes; + UMenu, SDL, SysUtils, UThemes, OpenGL12; type TScreenLoading = class(TMenu) @@ -11,6 +11,7 @@ type Fadeout: boolean; constructor Create(Back: String); override; function ParseInput(PressedKey: Cardinal; ScanCode: byte; PressedDown: Boolean): Boolean; override; + function GetBGTexNum: GLUInt; procedure onShow; override; end; @@ -45,4 +46,9 @@ begin // nothing end; +function TScreenLoading.GetBGTexNum: GLUInt; +begin + Result := Self.BackImg.TexNum; +end; + end. -- cgit v1.2.3