From 1387c764c8a0e33e8f58296d8544f2a03566c6a4 Mon Sep 17 00:00:00 2001 From: brunzelchen Date: Tue, 25 May 2010 15:38:35 +0000 Subject: modified aspect correction procedure. added depth test for z-value handling. fixed property height. added DrawReflection procedure. git-svn-id: svn://svn.code.sf.net/p/ultrastardx/svn/branches/experimental@2420 b956fd51-792f-4845-bead-9b4dfca2ff2c --- VideoPreview/src/screens/UScreenSing.pas | 16 ++++++++++++++++ 1 file changed, 16 insertions(+) (limited to 'VideoPreview/src/screens') diff --git a/VideoPreview/src/screens/UScreenSing.pas b/VideoPreview/src/screens/UScreenSing.pas index dc43881a..76eb385e 100644 --- a/VideoPreview/src/screens/UScreenSing.pas +++ b/VideoPreview/src/screens/UScreenSing.pas @@ -847,8 +847,24 @@ 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.Width := 200; + fCurrentVideo.Height := 150; + fCurrentVideo.ReflectionSpacing := 10; + //***** end testing + fCurrentVideo.SetScreen(ScreenAct); fCurrentVideo.Draw; + + fCurrentVideo.DrawReflection; //just for testing, should be deleted! end; // draw static menu (FG) -- cgit v1.2.3