以文本方式查看主题

-  Foxtable(狐表)  (http://www.foxtable.com/bbs/index.asp)
--  专家坐堂  (http://www.foxtable.com/bbs/list.asp?boardid=2)
----  如何设置图片的分辨率  (http://www.foxtable.com/bbs/dispbbs.asp?boardid=2&id=117654)

--  作者:lihe60
--  发布时间:2018/4/16 22:39:00
--  如何设置图片的分辨率
Dim c As new camera
c.capture() \'开始照相
If c.image IsNot Nothing Then \'照相成功

    c.Save(ProjectPath & "Attachments\\images\\a.jpg") \'保存文件

End If


如何控制拍摄图片的分辨率?

--  作者:有点蓝
--  发布时间:2018/4/16 23:01:00
--  
Dim c As new camera
c.capture() \'开始照相
If c.image IsNot Nothing Then \'照相成功
Dim bmp As new bitmap(c.image, 800, 600)
    bmp .Save(ProjectPath & "Attachments\\images\\a.jpg") \'保存文件

End If

http://www.foxtable.com/bbs/dispbbs.asp?boardid=2&Id=89637
http://www.foxtable.com/bbs/dispbbs.asp?BoardID=2&ID=84351

--  作者:lihe60
--  发布时间:2018/4/17 21:12:00
--  
上面代码一运行,就会自动拍一张。如何设置只打开摄像机而不会自动拍照片
--  作者:有点蓝
--  发布时间:2018/4/17 21:18:00
--  
http://www.foxtable.com/bbs/dispbbs.asp?BoardID=2&ID=99176&skin=0
--  作者:lihe60
--  发布时间:2018/4/17 21:25:00
--  
可以直接给代码吗?
--  作者:有点蓝
--  发布时间:2018/4/17 21:28:00
--  
我也不会,人家哪里有项目实例,下载自己看代码