aboutsummaryrefslogtreecommitdiffstats
path: root/VideoPreview/src/media
diff options
context:
space:
mode:
authorbrunzelchen <brunzelchen@b956fd51-792f-4845-bead-9b4dfca2ff2c>2010-05-24 15:54:42 +0000
committerbrunzelchen <brunzelchen@b956fd51-792f-4845-bead-9b4dfca2ff2c>2010-05-24 15:54:42 +0000
commit94db57d020985bd886b8c90c0b9bb8ce8d6072b7 (patch)
tree856ab6b965b1ac1a4332e069b6955d044b8f5c9a /VideoPreview/src/media
parent99002f7a9a6e96c824725e9a5bea7ef3e3422c08 (diff)
downloadusdx-94db57d020985bd886b8c90c0b9bb8ce8d6072b7.tar.gz
usdx-94db57d020985bd886b8c90c0b9bb8ce8d6072b7.tar.xz
usdx-94db57d020985bd886b8c90c0b9bb8ce8d6072b7.zip
update of reset method (uvideo): added default values
git-svn-id: svn://svn.code.sf.net/p/ultrastardx/svn/branches/experimental@2414 b956fd51-792f-4845-bead-9b4dfca2ff2c
Diffstat (limited to 'VideoPreview/src/media')
-rw-r--r--VideoPreview/src/media/UMedia_dummy.pas4
-rw-r--r--VideoPreview/src/media/UVideo.pas20
-rw-r--r--VideoPreview/src/media/UVisualizer.pas4
3 files changed, 22 insertions, 6 deletions
diff --git a/VideoPreview/src/media/UMedia_dummy.pas b/VideoPreview/src/media/UMedia_dummy.pas
index a77579f4..46cbe6b8 100644
--- a/VideoPreview/src/media/UMedia_dummy.pas
+++ b/VideoPreview/src/media/UMedia_dummy.pas
@@ -115,7 +115,7 @@ type
procedure SetScreen(Screen: integer);
function GetScreen(): integer;
- procedure SetScreenPosition(X, Y: double; Z: double = 0.0);
+ procedure SetScreenPosition(X, Y, Z: double);
procedure GetScreenPosition(var X, Y, Z: double);
procedure SetWidth(Width: double);
@@ -372,7 +372,7 @@ begin
Result := 0;
end;
-procedure TVideo_Dummy.SetScreenPosition(X, Y: double; Z: double = 0.0);
+procedure TVideo_Dummy.SetScreenPosition(X, Y, Z: double);
begin
end;
diff --git a/VideoPreview/src/media/UVideo.pas b/VideoPreview/src/media/UVideo.pas
index 56cebb4c..fdfb4d1e 100644
--- a/VideoPreview/src/media/UVideo.pas
+++ b/VideoPreview/src/media/UVideo.pas
@@ -177,7 +177,7 @@ type
procedure SetScreen(Screen: integer);
function GetScreen(): integer;
- procedure SetScreenPosition(X, Y: double; Z: double = 0.0);
+ procedure SetScreenPosition(X, Y, Z: double);
procedure GetScreenPosition(var X, Y, Z: double);
procedure SetWidth(Width: double);
@@ -520,6 +520,22 @@ begin
fPboId := 0;
fAspectCorrection := acoCrop;
+
+ fScreen := 1;
+
+ fScreenPositionX := 0;
+ fScreenPositionY := 0;
+ fScreenPositionZ := 0;
+ fScreenWidth := RenderW;
+ fScreenHeight := RenderH;
+
+ fFrameRange.Left := 0;
+ fFrameRange.Right := 1;
+ fFrameRange.Upper := 0;
+ fFrameRange.Lower := 1;
+
+ fAlpha := 1;
+ fReflectionSpacing := 0;
end;
procedure TVideo_FFmpeg.Close;
@@ -1145,7 +1161,7 @@ begin
end;
-procedure TVideo_FFmpeg.SetScreenPosition(X, Y: double; Z: double = 0.0);
+procedure TVideo_FFmpeg.SetScreenPosition(X, Y, Z: double);
begin
fScreenPositionX := X;
fScreenPositionY := Y;
diff --git a/VideoPreview/src/media/UVisualizer.pas b/VideoPreview/src/media/UVisualizer.pas
index b3ed7b0f..1cdc3500 100644
--- a/VideoPreview/src/media/UVisualizer.pas
+++ b/VideoPreview/src/media/UVisualizer.pas
@@ -149,7 +149,7 @@ type
procedure SetScreen(Screen: integer);
function GetScreen(): integer;
- procedure SetScreenPosition(X, Y: double; Z: double = 0.0);
+ procedure SetScreenPosition(X, Y, Z: double);
procedure GetScreenPosition(var X, Y, Z: double);
procedure SetWidth(Width: double);
@@ -300,7 +300,7 @@ begin
Result := 0;
end;
-procedure TVideo_ProjectM.SetScreenPosition(X, Y: double; Z: double = 0.0);
+procedure TVideo_ProjectM.SetScreenPosition(X, Y, Z: double);
begin
end;