aboutsummaryrefslogtreecommitdiffstats
path: root/Game/Code/Classes/UWebCam.pas
diff options
context:
space:
mode:
Diffstat (limited to 'Game/Code/Classes/UWebCam.pas')
-rw-r--r--Game/Code/Classes/UWebCam.pas6
1 files changed, 5 insertions, 1 deletions
diff --git a/Game/Code/Classes/UWebCam.pas b/Game/Code/Classes/UWebCam.pas
index 5abb7622..9457a28d 100644
--- a/Game/Code/Classes/UWebCam.pas
+++ b/Game/Code/Classes/UWebCam.pas
@@ -75,6 +75,9 @@ const
width = 320;
height = 240;
+var
+ IWebCamDevice: TList;
+
begin
if WebCamReady then
exit;
@@ -84,7 +87,8 @@ begin
if(Ini.EnableWebCam=0) then
exit;
- if (Length(GetCapDevices())-1 < Ini.WebCamID) then
+ GetCapDevices(IWebCamDevice);
+ if (Length(IWebCamDevice)-1 < Ini.WebCamID) then
Exit;
try