Foxtable(狐表)用户栏目专家坐堂 → 摄像头代码如何加入判断,当没有摄像头时候就不拍照,当有摄像头时候才拍照!


  共有4988人关注过本帖树形打印复制链接

主题:摄像头代码如何加入判断,当没有摄像头时候就不拍照,当有摄像头时候才拍照!

帅哥哟,离线,有人找我吗?
李孝春
  1楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:九尾狐 帖子:2472 积分:17346 威望:0 精华:0 注册:2013/1/31 0:03:00
摄像头代码如何加入判断,当没有摄像头时候就不拍照,当有摄像头时候才拍照!  发帖心情 Post By:2014/6/9 22:22:00 [只看该作者]

摄像头代码如何加入判断,当没有摄像头时候就不拍照,当有摄像头时候才拍照!

代码如下:
Dim c As new camera
c.capture() '开始照相
If c.image IsNot Nothing Then '照相成功
    c.Save("c:\abc.bmp") '保存文件
End If

 回到顶部
帅哥哟,离线,有人找我吗?
有点甜
  2楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:版主 帖子:85326 积分:427815 威望:0 精华:5 注册:2012/10/18 22:13:00
  发帖心情 Post By:2014/6/9 22:27:00 [只看该作者]

 判断起来很麻烦的。要另外引用一个dll文件的

 

 先参考这个地方 http://foxtable.com/bbs/dispbbs.asp?BoardID=2&ID=41778&replyID=&skin=1

 


 回到顶部
帅哥哟,离线,有人找我吗?
kgdce
  3楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:三尾狐 帖子:627 积分:6899 威望:0 精华:0 注册:2013/12/17 1:00:00
  发帖心情 Post By:2014/8/5 10:35:00 [只看该作者]

以下是引用有点甜在2014-6-9 22:27:00的发言:

 判断起来很麻烦的。要另外引用一个dll文件的

 

 先参考这个地方 http://foxtable.com/bbs/dispbbs.asp?BoardID=2&ID=41778&replyID=&skin=1

 

参考后,对其中的"摄像头拍照.rar“已清楚,此程序无法检测设备,如无设备就会报错,能有办法解决吗?请老师帮助。


 回到顶部
帅哥哟,离线,有人找我吗?
有点甜
  4楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:版主 帖子:85326 积分:427815 威望:0 精华:5 注册:2012/10/18 22:13:00
  发帖心情 Post By:2014/8/5 10:46:00 [只看该作者]

以下是引用kgdce在2014-8-5 10:35:00的发言:

参考后,对其中的"摄像头拍照.rar“已清楚,此程序无法检测设备,如无设备就会报错,能有办法解决吗?请老师帮助。

 

这样检测

 

try
    Dim cmr As New DCap.Filters()
catch ex As exception
    msgbox("没有设备")
End try


 回到顶部