From 13d8779f9ccb09a5ce4171387d0598d6266618bb Mon Sep 17 00:00:00 2001
From: tobigun <tobigun@b956fd51-792f-4845-bead-9b4dfca2ff2c>
Date: Fri, 8 Aug 2008 11:46:34 +0000
Subject: result-values for TMenu.Draw() added

git-svn-id: svn://svn.code.sf.net/p/ultrastardx/svn/trunk@1232 b956fd51-792f-4845-bead-9b4dfca2ff2c
---
 Game/Code/Screens/UScreenEditConvert.pas | 2 +-
 Game/Code/Screens/UScreenEditSub.pas     | 2 ++
 Game/Code/Screens/UScreenScore.pas       | 2 ++
 Game/Code/Screens/UScreenSing.pas        | 1 +
 Game/Code/Screens/UScreenSongMenu.pas    | 2 +-
 Game/Code/Screens/UScreenTop5.pas        | 2 +-
 Game/Code/Screens/UScreenWelcome.pas     | 2 +-
 7 files changed, 9 insertions(+), 4 deletions(-)

(limited to 'Game/Code/Screens')

diff --git a/Game/Code/Screens/UScreenEditConvert.pas b/Game/Code/Screens/UScreenEditConvert.pas
index a57e89fb..dfde696e 100644
--- a/Game/Code/Screens/UScreenEditConvert.pas
+++ b/Game/Code/Screens/UScreenEditConvert.pas
@@ -570,7 +570,7 @@ begin
   {$ENDIF}
   DrawLine(X, Y, X, Bottom, 0.3, 0.3, 0.3);
 
-
+  Result := true;
 end;
 
 procedure TScreenEditConvert.onHide;
diff --git a/Game/Code/Screens/UScreenEditSub.pas b/Game/Code/Screens/UScreenEditSub.pas
index 564ef42c..2d98f6bc 100644
--- a/Game/Code/Screens/UScreenEditSub.pas
+++ b/Game/Code/Screens/UScreenEditSub.pas
@@ -1309,6 +1309,8 @@ begin
 
   // draw text
   Lyric.Draw;
+
+  Result := true;
 end;
 
 procedure TScreenEditSub.onHide;
diff --git a/Game/Code/Screens/UScreenScore.pas b/Game/Code/Screens/UScreenScore.pas
index 9f177c5b..fdebbb8b 100644
--- a/Game/Code/Screens/UScreenScore.pas
+++ b/Game/Code/Screens/UScreenScore.pas
@@ -430,6 +430,8 @@ begin
     for I := 0 to Length(Text) - 1 do
       Text[I].Draw;
 *)
+
+  Result := true;
 end;
 
 procedure TscreenScore.FillPlayerItems(PlayerNumber : Integer; ScoreType: String);
diff --git a/Game/Code/Screens/UScreenSing.pas b/Game/Code/Screens/UScreenSing.pas
index 3343f0c6..6682a107 100644
--- a/Game/Code/Screens/UScreenSing.pas
+++ b/Game/Code/Screens/UScreenSing.pas
@@ -1251,6 +1251,7 @@ begin
     Static[StaticPausePopup].Visible := false;
   end;
 
+  Result := true;
 end;
 
 procedure TScreenSing.Finish;
diff --git a/Game/Code/Screens/UScreenSongMenu.pas b/Game/Code/Screens/UScreenSongMenu.pas
index edd3fabb..74e2c3fc 100644
--- a/Game/Code/Screens/UScreenSongMenu.pas
+++ b/Game/Code/Screens/UScreenSongMenu.pas
@@ -200,7 +200,7 @@ end;
 
 function TScreenSongMenu.Draw: boolean;
 begin
-  inherited Draw;
+  Result := inherited Draw;
 end;
 
 procedure TScreenSongMenu.onShow;
diff --git a/Game/Code/Screens/UScreenTop5.pas b/Game/Code/Screens/UScreenTop5.pas
index 4328190f..f4be431f 100644
--- a/Game/Code/Screens/UScreenTop5.pas
+++ b/Game/Code/Screens/UScreenTop5.pas
@@ -169,7 +169,7 @@ begin
     end;
   end; *)
 
-  inherited Draw;
+  Result := inherited Draw;
 end;
 
 end.
diff --git a/Game/Code/Screens/UScreenWelcome.pas b/Game/Code/Screens/UScreenWelcome.pas
index 019e5baf..613f3a80 100644
--- a/Game/Code/Screens/UScreenWelcome.pas
+++ b/Game/Code/Screens/UScreenWelcome.pas
@@ -116,7 +116,7 @@ begin
     Fadeout := true;
   end;
 
-  inherited Draw;
+  Result := inherited Draw;
 end;
 
 end.
-- 
cgit v1.2.3