--[[ This script tests for the presence of Techsmith Screen Capture Codec These registry keys should exist on the target system: [HKEY_LOCAL_MACHINE\SOFTWARE\Microsoft\Windows NT\CurrentVersion\drivers.desc] "tsccvid.dll"="TechSmith Screen Capture Codec" [HKEY_LOCAL_MACHINE\SOFTWARE\Microsoft\Windows NT\CurrentVersion\Drivers32] "vidc.tscc"="tsccvid.dll" This file should exist on the target system: _SystemFolder\\tsccvid.dll ]] function mq_FindTSCC() local bOK = true; local strVersion = "0.0.0.0"; -- Debug.ShowWindow(); -- step 1 bOK = Registry.DoesKeyExist(HKEY_LOCAL_MACHINE, "SOFTWARE\\Microsoft\\Windows NT\\CurrentVersion\\drivers.desc"); if (bOK) then strDriver = Registry.GetValue(HKEY_LOCAL_MACHINE, "SOFTWARE\\Microsoft\\Windows NT\\CurrentVersion\\drivers.desc", "tsccvid.dll", true); if (Application.GetLastError() ~= 0) then bOK = false; Debug.Print("Step 1: tsccvid.dll not found in HKEY_LOCAL_MACHINE\\SOFTWARE\\Microsoft\\Windows NT\\CurrentVersion\\drivers.desc\r\n"); else Debug.Print("Step 1: tsccvid.dll found\r\n"); end end -- step 2 bOK = Registry.DoesKeyExist(HKEY_LOCAL_MACHINE, "SOFTWARE\\Microsoft\\Windows NT\\CurrentVersion\\Drivers32"); if (bOK) then strDriver = Registry.GetValue(HKEY_LOCAL_MACHINE, "SOFTWARE\\Microsoft\\Windows NT\\CurrentVersion\\Drivers32", "vidc.tscc", true); if (Application.GetLastError() ~= 0) then bOK = false; Debug.Print("Step 2: vidc.tscc not found in HKEY_LOCAL_MACHINE\\SOFTWARE\\Microsoft\\Windows NT\\CurrentVersion\\Drivers32\r\n"); else Debug.Print("Step 2: vidc.tscc found\r\n"); end end -- step 3 if (bOK) then -- Detect the version of the driver verInfo = File.GetVersionInfo(_SystemFolder .. "\\tsccvid.dll"); if(Application.GetLastError() ~= 0)then strVersion = "0.0.0.0"; Debug.Print("Step 3: tsccvid.dll not found in " .. _SystemFolder .. "\r\n"); else -- OK, we have the file version strVersion = verInfo.FileVersion; Debug.Print("Step 3: tsccvid.dll version " .. strVersion .. " found in " .. _SystemFolder .. "\r\n"); end end if (bOK ~= true) then strVersion = "0.0.0.0"; end return strVersion; end