使用avicap32和易语言的视频设备打开摄像头都是黑屏，我的是win7系统

jiesansi

使用avicap32和易语言的视频设备打开摄像头都是黑屏，我的是win7系统。使用别的摄像头程序打开都能正常显示

jiesansi

成功了。换成了opencv的方式打开了

jiesansi

附上opencv在遍历摄像头列表的时候出现问题的解决方法：

  

id ＝ GetCameraList ()  ' //获取列表
lst ＝ 分割文本 (id, “|”, )
计次循环首 (取数组成员数 (lst), i)
如果真 (lst [i] ≠ “”)
如果真 (取代码 (lst [i], 1) ＜ 49 或 取代码 (lst [i], 1) ＞ 57 或 取代码 (lst [i], 1) ＝ 0)
列表框1.加入项目 (lst [i], )


计次循环尾 ()
列表框1.删除项目 (0)

.版本 2<br /> <br /> id ＝ GetCameraList ()  ' //获取列表<br /> lst ＝ 分割文本 (id, “|”, )<br /> .计次循环首 (取数组成员数 (lst), i)<br />     .如果真 (lst <i> ≠ “”)<br />         .如果真 (取代码 (lst <i>, 1) ＜ 49 或 取代码 (lst <i>, 1) ＞ 57 或 取代码 (lst <i>, 1) ＝ 0)<br />             列表框1.加入项目 (lst <i>, )<br /> <br />         .如果真结束<br /> <br />     .如果真结束<br /> <br /> .计次循环尾 ()<br /> <br /> 列表框1.删除项目 (0)

djkc

请问用的是什么opencv,能否共享一下，我搞了个opencv的摄像头，老是卡死闪退，哎

jiesansi

djkc 发表于 2020-6-11 16:56
请问用的是什么opencv,能否共享一下，我搞了个opencv的摄像头，老是卡死闪退，哎

新建文件夹.zip (277.55 KB, 下载次数: 262)

2020-6-11 17:50 上传

点击文件名下载附件 源码来自论坛的一位大神。不过他的获取摄像头名称列表存在一定问题，还好给弄好了，

djkc

jiesansi 发表于 2020-6-11 17:53
源码来自论坛的一位大神。不过他的获取摄像头名称列表存在一定问题，还好给弄好了，

谢谢朋友，我看看能不能用

编程辉煌

学习一下吧77777777777777777

gzdzy

学习了，看看

By未命名

不能录屏，没有效果

九命方

        好神奇!        好神奇!        好神奇!        好神奇!        好神奇!        好神奇!        好神奇!        好神奇!        好神奇!        好神奇!