result-values for TMenu.Draw() added

git-svn-id: svn://svn.code.sf.net/p/ultrastardx/svn/trunk@1232 b956fd51-792f-4845-bead-9b4dfca2ff2c

7 files changed, 9 insertions, 4 deletions

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.