Foxtable(狐表)用户栏目专家坐堂 → 例子提法错误


  共有3020人关注过本帖树形打印复制链接

主题:例子提法错误

帅哥哟,离线,有人找我吗?
有点蓝
  1楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:超级版主 帖子:106209 积分:540168 威望:0 精华:9 注册:2015/6/24 9:21:00
  发帖心情 Post By:2018/11/26 20:37:00 [显示全部帖子]

1、把2个dll放到Foxtable的安装目录
2、如果电脑没有摄像头就会出错,

全局代码
Public _Cams As DCap.Filters = New DCap.Filters()
改为
Public _Cams As DCap.Filters 

GetCams函数
try
Dim f As DCap.Filter
_Cams = New DCap.Filters()
_CamList.Clear()
_CamList.Add("无")
Dim c As Integer
For c=0 To _Cams.VideoInputDevices.Count - 1
    f = _Cams.VideoInputDevices(c)
    _CamList.Add(f.Name)
Next
catch
    msgbox("没有摄像头")
end try

其他所有用到_Cams的地方都判断一下是不是空值
[此贴子已经被作者于2018/11/26 20:37:24编辑过]

 回到顶部
帅哥哟,离线,有人找我吗?
有点蓝
  2楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:超级版主 帖子:106209 积分:540168 威望:0 精华:9 注册:2015/6/24 9:21:00
  发帖心情 Post By:2018/11/26 21:05:00 [显示全部帖子]

照搬人家全局代码

 回到顶部
帅哥哟,离线,有人找我吗?
有点蓝
  3楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:超级版主 帖子:106209 积分:540168 威望:0 精华:9 注册:2015/6/24 9:21:00
  发帖心情 Post By:2018/11/26 21:25:00 [显示全部帖子]

其他所有用到_Cams的地方都判断一下是不是空值。如果没有摄像头就不允许打开这个窗口

 回到顶部
帅哥哟,离线,有人找我吗?
有点蓝
  4楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:超级版主 帖子:106209 积分:540168 威望:0 精华:9 注册:2015/6/24 9:21:00
  发帖心情 Post By:2018/12/1 10:26:00 [显示全部帖子]

测试没有问题。给panel加上背景色或者边框就看出效果了

 回到顶部
帅哥哟,离线,有人找我吗?
有点蓝
  5楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:超级版主 帖子:106209 积分:540168 威望:0 精华:9 注册:2015/6/24 9:21:00
  发帖心情 Post By:2018/12/1 11:09:00 [显示全部帖子]

上传实例说明

 回到顶部
帅哥哟,离线,有人找我吗?
有点蓝
  6楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:超级版主 帖子:106209 积分:540168 威望:0 精华:9 注册:2015/6/24 9:21:00
  发帖心情 Post By:2018/12/1 12:17:00 [显示全部帖子]

请重新上传你修改后有问题的实例

 回到顶部
帅哥哟,离线,有人找我吗?
有点蓝
  7楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:超级版主 帖子:106209 积分:540168 威望:0 精华:9 注册:2015/6/24 9:21:00
  发帖心情 Post By:2018/12/1 12:18:00 [显示全部帖子]

注意panel不要放到图片框里面

 回到顶部
帅哥哟,离线,有人找我吗?
有点蓝
  8楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:超级版主 帖子:106209 积分:540168 威望:0 精华:9 注册:2015/6/24 9:21:00
  发帖心情 Post By:2018/12/3 22:27:00 [显示全部帖子]

由于特殊原因,linebox必须是隐藏的,不然无法看到框中的影像,因此无法拖动的。只能曲线处理,通过蓝色小块来控制

 下载信息  [文件大小:   下载次数: ]
图片点击可在新窗口打开查看点击浏览该文件:摄像头拍照(1).zip



 回到顶部