| 以文本方式查看主题 - Foxtable(狐表) (http://foxtable.com/bbs/index.asp) -- 专家坐堂 (http://foxtable.com/bbs/list.asp?boardid=2) ---- Aforge照片名称 (http://foxtable.com/bbs/dispbbs.asp?boardid=2&id=176850) |
| -- 作者：aidimeng -- 发布时间：2022/4/28 17:06:00 -- Aforge照片名称 Dim pl As WinForm.Panel = e.Form.Controls("Panel2") Dim pc As WinForm.PictureBox = e.Form.Controls("PictureBox2") Dim player As Aforge.Controls.VideoSourcePlayer = pl.basecontrol.controls("vp") addhandler player.newframe, addressof player_newframe Dim fileName As String = DateTime.Now.ToString("yyyy-MM-dd-HH-mm-ss-ff") & ".jpg" If filesys.FileExists("c:\\temp.jpg") Then FileSys.CopyFile("c:\\temp.jpg",projectpath & filename) FileSys.DeleteFile("c:\\temp.jpg") \'MessageBox.Show("保存成功!") Else MessageBox.Show("请重新拍照!") Return End If removehandler player.newframe, addressof player_newframe 看了论坛中Aforge 拍照的代码，上面是拍照的语句，看了半天没看明白，照片的名称是什么啊，temp.jpg吗 哪个值等于temp.jpg啊
|
| -- 作者：有点蓝 -- 发布时间：2022/4/28 17:13:00 -- 输出代码：http://www.foxtable.com/webhelp/topics/1987.htm 然后搜索还有什么地方有temp.jpg
|
| -- 作者：aidimeng -- 发布时间：2022/4/28 17:16:00 -- 谢谢，找得到了 |