fixed property AspectCorrection (write).

added constant ReflectionH (reflection height).
added procedures for drawing black borders (acoLetterBox).


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

1 files changed, 5 insertions, 10 deletions

diff --git a/VideoPreview/src/screens/UScreenSing.pas b/VideoPreview/src/screens/UScreenSing.pas
index 76eb385e..835cb2df 100644
--- a/VideoPreview/src/screens/UScreenSing.pas
+++ b/VideoPreview/src/screens/UScreenSing.pas
@@ -847,24 +847,19 @@ begin
       fCurrentVideo.GetFrame(VideoFrameTime);
     end;
 
-    // clear just once when in dual screen mode
-    if (ScreenAct = 1) then
-    begin
-      glClearColor(0, 0, 0, 0);
-      //glClear(GL_COLOR_BUFFER_BIT or GL_DEPTH_BUFFER_BIT);
-    end;
-
     //***** for testing:
-    fCurrentVideo.SetScreenPosition(300, 10);
+    {fCurrentVideo.SetScreenPosition(10, 10, 1);
     fCurrentVideo.Width := 200;
-    fCurrentVideo.Height := 150;
+    fCurrentVideo.Height := 200;
     fCurrentVideo.ReflectionSpacing := 10;
+    fCurrentVideo.Alpha := 1;
+    fCurrentVideo.AspectCorrection := acoLetterBox;}
     //***** end testing
 
     fCurrentVideo.SetScreen(ScreenAct);
     fCurrentVideo.Draw;
     
-    fCurrentVideo.DrawReflection; //just for testing, should be deleted!
+    //fCurrentVideo.DrawReflection; //just for testing, should be deleted!
   end;
 
   // draw static menu (FG)