diff options
author | brunzelchen <brunzelchen@b956fd51-792f-4845-bead-9b4dfca2ff2c> | 2010-06-06 13:17:42 +0000 |
---|---|---|
committer | brunzelchen <brunzelchen@b956fd51-792f-4845-bead-9b4dfca2ff2c> | 2010-06-06 13:17:42 +0000 |
commit | 2010a5089cd13eb84a0f3828b3770d61b94f067f (patch) | |
tree | 7f85499186be81f3851a74595b7442db4e465b64 /VideoPreview/src/screens | |
parent | 9aa7604420cba68314ee94f28c34b70fa5540d06 (diff) | |
download | usdx-2010a5089cd13eb84a0f3828b3770d61b94f067f.tar.gz usdx-2010a5089cd13eb84a0f3828b3770d61b94f067f.tar.xz usdx-2010a5089cd13eb84a0f3828b3770d61b94f067f.zip |
stop drawing video texture and close video after audio playback finished
git-svn-id: svn://svn.code.sf.net/p/ultrastardx/svn/branches/experimental@2452 b956fd51-792f-4845-bead-9b4dfca2ff2c
Diffstat (limited to 'VideoPreview/src/screens')
-rw-r--r-- | VideoPreview/src/screens/UScreenSong.pas | 5 |
1 files changed, 4 insertions, 1 deletions
diff --git a/VideoPreview/src/screens/UScreenSong.pas b/VideoPreview/src/screens/UScreenSong.pas index c450dc5f..d7f309c7 100644 --- a/VideoPreview/src/screens/UScreenSong.pas +++ b/VideoPreview/src/screens/UScreenSong.pas @@ -1665,10 +1665,13 @@ begin //We draw Buttons for our own for I := 0 to Length(Button) - 1 do begin - if (I<>Interaction) or not Assigned(fCurrentVideo) or (VideoAlpha<1) then + if (I<>Interaction) or not Assigned(fCurrentVideo) or (VideoAlpha<1) or AudioPlayback.Finished then Button[I].Draw; end; + if AudioPlayback.Finished then + StopVideoPreview; + if Assigned(fCurrentVideo) then begin // Just call this once |