From 800adc4ca34e677907d36e2a3850eac726226a11 Mon Sep 17 00:00:00 2001
From: whiteshark0 <whiteshark0@b956fd51-792f-4845-bead-9b4dfca2ff2c>
Date: Wed, 18 Jul 2007 20:18:27 +0000
Subject: Little hack in SongScreen that fixes problems with blending. Drawing
 order changed only for SongScreen: Buttons -> Statics -> Texts

git-svn-id: svn://svn.code.sf.net/p/ultrastardx/svn/branches/1.0x@301 b956fd51-792f-4845-bead-9b4dfca2ff2c
---
 Game/Code/Screens/UScreenSong.pas | 22 +++++++++++++++++++++-
 1 file changed, 21 insertions(+), 1 deletion(-)

(limited to 'Game/Code')

diff --git a/Game/Code/Screens/UScreenSong.pas b/Game/Code/Screens/UScreenSong.pas
index 87aa122e..3221f21e 100644
--- a/Game/Code/Screens/UScreenSong.pas
+++ b/Game/Code/Screens/UScreenSong.pas
@@ -1340,6 +1340,7 @@ function TScreenSong.Draw: boolean;
 var
   dx:   real;
   dt:   real;
+  I:    Integer;
 begin
   dx := SongTarget-SongCurrent;
   dt := TimeSkip*7;
@@ -1393,7 +1394,26 @@ begin
 
   end;
 
-  inherited Draw;
+  //inherited Draw;
+  //heres a little Hack, that causes the Statics
+  //are Drawn after the Buttons because of some Blending Problems.
+  //This should cause no Problems because all Buttons on this screen
+  //Has Z Position.
+  //Draw BG
+  DrawBG;
+
+  //Instead of Draw FG Procedure:
+  //We draw Buttons for our own
+  for I := 0 to Length(Button) - 1 do
+    Button[I].Draw;
+
+  // Statics
+  for I := 0 to Length(Static) - 1 do
+    Static[I].Draw;
+
+  // and texts
+  for I := 0 to Length(Text) - 1 do
+    Text[I].Draw;
 
 
   //Draw Equalizer
-- 
cgit v1.2.3