递归火山软件开发平台

标题: 通过Opencv在MFC界面上显示视频的解决方案 [打印本页]

作者: xrea 时间: 2023-9-16 17:01
标题: 通过Opencv在MFC界面上显示视频的解决方案
1.介绍
官方例子中Opencv在MFC界面中显示视频的方案有个BUG，就是视频显示的时候会导致窗口不能移动！今天突然在看代码的时候突发灵感，实践了以下非常完美的解决了官方例子中的问题！
2.代码
<火山程序类型 = "通常" 版本 = 1 />

包火山.程序

类启动类 <公开基础类 = 窗口程序类>
{
变量主窗口对象 <类型 = 我的主窗口>

方法启动方法 <公开类型 = 整数>
{
      主窗口对象.创建主窗口 ()
      返回 (1)
}
}

# ===

类我的主窗口 <基础类 = 窗口注释 = "样例主窗口" @视窗.布局 = "client_size = \"753, 540\"" 标题 = "我的主窗口">
{
变量图片框_画面容器 <类型 = 图片框隐藏值属性 = "0" @视窗.布局 = "id = 101\r\npos = \"13, 14, 728, 448\"">
变量按钮_选择视频文件并播放 <类型 = 按钮折叠2 隐藏值属性 = "0" @视窗.布局 = "id = 102\r\npos = \"21, 478, 712, 48\""
         标题 = "选择视频文件并播放">
变量时钟1 <类型 = 时钟隐藏值属性 = "0" @视窗.布局 = "id = 103\r\npos = \"661, 502, 32, 32\"">
变量 m_video <类型 = CV视频>

方法时钟_周期事件 <接收事件类型 = 整数注释 = "每当经过了指定的时钟周期,将发送本事件.">
参数来源对象 <类型 = 时钟注释 = "提供事件产生的具体来源对象">
参数标记值 <类型 = 整数注释 = "用户调用\"挂接事件\"命令时所提供的\"标记值\"参数值,非此方式挂接事件则本参数值固定为0.">
{
      如果 (来源对象 == 时钟1)
      {
         变量 frame <类型 = CV矩阵类>
         本对象.m_video.取当前帧 (frame)
         CV核心.显示图像 ("cvwin", frame)
      }
      返回 (0)
}

方法按钮_被单击 <接收事件类型 = 整数注释 = "当按钮被单击后发送此事件">
参数来源对象 <类型 = 按钮注释 = "提供事件产生的具体来源对象">
参数标记值 <类型 = 整数注释 = "用户调用\"挂接事件\"命令时所提供的\"标记值\"参数值,非此方式挂接事件则本参数值固定为0.">
{
      如果 (来源对象 == 按钮_选择视频文件并播放)
      {
         变量对话框对象 <类型 = 通用对话框 "类型" = 打开文件过滤器 = "视频文件(*.mp4)|*.mp4">
         如果 (对话框对象.打开 (本对象))
         {
            本对象.m_video.打开视频 (对话框对象.文件名, )
         }
         本对象.时钟1.时钟周期 = 60
      }
      返回 (0)
}

方法我的主窗口_创建完毕 <接收事件类型 = 整数注释 = "当本组件及其中所有子组件均被创建完毕后发送此事件.">
参数来源对象 <类型 = 我的主窗口注释 = "提供事件产生的具体来源对象">
参数标记值 <类型 = 整数注释 = "用户调用\"挂接事件\"命令时所提供的\"标记值\"参数值,非此方式挂接事件则本参数值固定为0.">
{
      CV核心.创建CV窗口 ("cvwin", 本对象.图片框_画面容器.取用户区宽度 (), 本对象.图片框_画面容器.取用户区高度 (), 本对象.图片框_画面容器.取窗口句柄 ())
      返回 (0)
}
}

作者: 沉默流星 时间: 2023-9-16 21:40
支持

欢迎光临递归火山软件开发平台 (https://bbs.voldp.com/)