请问大侠们，用VFP如何检测USB摄像头是否已经安装？

关注中……

摄像头控件如果未注册，打开控件时会出错，可以在表单的ERROR 事件跟踪出错.
检测摄像头有无安装(这是我的控件,其它的不知道)：
  if thisform.oleavcap.curvcd=0
      thisform.oleavcap.playstate=1 &&打开摄像头
   else
        =messagebox('摄像头未安装',64,'提示')
   endif





[ 本帖最后由 bccn201304 于 2013-5-4 10:07 编辑 ]

收到的鲜花

• hu9jj 于 2013-05-04 09:47 送鲜花  40朵   附言：好文章

谢谢，3楼的朋友，不过我问的是在主程序开始的时候，检查USB摄像头是否已经安装，不是在表单中。