如何更改摄像头分辨率?
我不想通过设置窗口调整分辨率,想直接通过下面的代码更改, 不过一到:Call capSetVideoFormat(lwndC, BmpFormat, s)就出现类型不匹配?
是什么原因呢?
Dim BmpFormat As BITMAPINFO
Dim flag As Boolean
Dim s As Long
s = capGetVideoFormatSize(lwndC)
Call capSetVideoFormat(lwndC, BmpFormat, s)
BmpFormat.bmiHeader.biWidth = 640
BmpFormat.bmiHeader.biHeight = 480
flag = capSetVideoFormat(lwndC, BmpFormat, s)