From c9f0475aa950753f91fddf36f94d488e554d3757 Mon Sep 17 00:00:00 2001
From: tobigun <tobigun@b956fd51-792f-4845-bead-9b4dfca2ff2c>
Date: Wed, 6 Aug 2008 18:52:29 +0000
Subject: avoid seeking if video is not initialized

git-svn-id: svn://svn.code.sf.net/p/ultrastardx/svn/trunk@1223 b956fd51-792f-4845-bead-9b4dfca2ff2c
---
 Game/Code/Classes/UVideo.pas | 3 +++
 1 file changed, 3 insertions(+)

(limited to 'Game/Code/Classes')

diff --git a/Game/Code/Classes/UVideo.pas b/Game/Code/Classes/UVideo.pas
index e03eb894..698fb2de 100644
--- a/Game/Code/Classes/UVideo.pas
+++ b/Game/Code/Classes/UVideo.pas
@@ -790,6 +790,9 @@ procedure TVideoPlayback_FFMpeg.SetPosition(Time: real);
 var
   SeekFlags: integer;
 begin
+  if not fVideoOpened then
+    Exit;
+
   if (Time < 0) then
     Time := 0;
 
-- 
cgit v1.2.3