video 打开摄像头画质太差 咋改善

liguoqing

video 打开摄像头画质太差 咋改善 或者有什么其他的代替码  画质太辣哭了

  

子程序名	返回值类型	公开	备 注
_按钮枚举设备_被单击

变量名	类 型	静态	数组	备 注
id	文本型
lst	文本型		0
i	整数型

id ＝ GetCameraList ()  ' //获取列表
lst ＝ 分割文本 (id, #换行符, )
计次循环首 (取数组成员数 (lst), i)
如果真 (lst [i] ≠ “”)
列表框1.加入项目 (lst [i], )

计次循环尾 ()

子程序名	返回值类型	公开	备 注
_按钮打开设备_被单击

SetCameraID (列表框1.现行选中项)  ' //设置相机
StartCamera (标签1.取窗口句柄 ())

.版本 2<br /> <br /> .子程序 _按钮枚举设备_被单击<br /> .局部变量 id, 文本型<br /> .局部变量 lst, 文本型, , "0"<br /> .局部变量 i, 整数型<br /> <br /> id ＝ GetCameraList ()  ' //获取列表<br /> lst ＝ 分割文本 (id, #换行符, )<br /> <br /> <br /> .计次循环首 (取数组成员数 (lst), i)<br />     .如果真 (lst <i> ≠ “”)<br />         列表框1.加入项目 (lst <i>, )<br />     .如果真结束<br /> <br /> .计次循环尾 ()<br /> <br /> <br /> <br /> .子程序 _按钮打开设备_被单击<br /> <br /> SetCameraID (列表框1.现行选中项)  ' //设置相机<br /> StartCamera (标签1.取窗口句柄 ())

黯丄辶

标签1的宽高决定了显示的效果，把标签1的长宽设置与摄像头分辨率长宽一致即可全分辨率显示！