以文本方式查看主题

-  Foxtable(狐表)  (http://foxtable.net/bbs/index.asp)
--  专家坐堂  (http://foxtable.net/bbs/list.asp?boardid=2)
----  怎么屏蔽没有设备时的报错  (http://foxtable.net/bbs/dispbbs.asp?boardid=2&id=192590)

--  作者:xxfoxtable
--  发布时间:2024/7/3 22:42:00
--  怎么屏蔽没有设备时的报错
\'获得摄像头名称列表
\'_Cams,_CamList在全局代码定义

Dim f As DCap.Filter
_Cams = New DCap.Filters()
If _Cams.VideoInputDevices.Count = 0 Then
Else
    _CamList.Clear()
    _CamList.Add("无")
    Dim c As Integer
    For c = 0 To _Cams.VideoInputDevices.Count - 1
        f = _Cams.VideoInputDevices(c)
        _CamList.Add(f.Name)
    Next
End If


图片点击可在新窗口打开查看此主题相关图片如下:1.png
图片点击可在新窗口打开查看

图片点击可在新窗口打开查看此主题相关图片如下:2.png
图片点击可在新窗口打开查看

[此贴子已经被作者于2024/7/3 22:45:43编辑过]

--  作者:有点蓝
--  发布时间:2024/7/4 9:02:00
--  
http://www.foxtable.com/bbs/dispbbs.asp?BoardID=2&ID=92116&skin=0