diff options
author | tobigun <tobigun@b956fd51-792f-4845-bead-9b4dfca2ff2c> | 2008-08-09 13:16:41 +0000 |
---|---|---|
committer | tobigun <tobigun@b956fd51-792f-4845-bead-9b4dfca2ff2c> | 2008-08-09 13:16:41 +0000 |
commit | 935d27eb1a081ca49d5b17fc63bface95e404ac9 (patch) | |
tree | 0b24d17d57bc17ed56e90d09e1c94af8401c24e7 /Game/Code/Screens | |
parent | 962788be19c76ab74a36a9757eacd22f99297150 (diff) | |
download | usdx-935d27eb1a081ca49d5b17fc63bface95e404ac9.tar.gz usdx-935d27eb1a081ca49d5b17fc63bface95e404ac9.tar.xz usdx-935d27eb1a081ca49d5b17fc63bface95e404ac9.zip |
check if video was successfully opened. Otherwise a seek might be performed on an uninitialized video.
git-svn-id: svn://svn.code.sf.net/p/ultrastardx/svn/trunk@1250 b956fd51-792f-4845-bead-9b4dfca2ff2c
Diffstat (limited to '')
-rw-r--r-- | Game/Code/Screens/UScreenSing.pas | 8 |
1 files changed, 5 insertions, 3 deletions
diff --git a/Game/Code/Screens/UScreenSing.pas b/Game/Code/Screens/UScreenSing.pas index 6682a107..656471db 100644 --- a/Game/Code/Screens/UScreenSing.pas +++ b/Game/Code/Screens/UScreenSing.pas @@ -493,9 +493,11 @@ begin fShowVisualization := false; if (CurrentSong.Video <> '') and FileExists(CurrentSong.Path + CurrentSong.Video) then begin - fCurrentVideoPlaybackEngine.Open( CurrentSong.Path + CurrentSong.Video ); - fCurrentVideoPlaybackEngine.Position := CurrentSong.VideoGAP + CurrentSong.Start; - CurrentSong.VideoLoaded := true; + if (fCurrentVideoPlaybackEngine.Open( CurrentSong.Path + CurrentSong.Video )) then + begin + fCurrentVideoPlaybackEngine.Position := CurrentSong.VideoGAP + CurrentSong.Start; + CurrentSong.VideoLoaded := true; + end; end; // set background |