intouch/ifix嵌入视频控件2（报警视频联动初步思路）

在项目中有朋友遇到类似的需求，ifix中嵌入视频，并实现报警与视频的联动功能。诸如，重要设备启动时，摄像头自动弹窗，并持续一段时间自动弹窗关掉；设备故障时，摄像头自动截图，录像一段时间存储；设备停止时，摄像头自动弹窗等等。其实本质上，对ifix来讲，就是出发相应的报警事件，并在报警事件中调用相应接口实现。

重要点：设备启动/停止/故障时，摄像头如何自动跟随并拍照记录？

思路：设置预置点。（每个触发事件，配置好相应的预置点；当事件触发时，摄像头自动跟随到预置点即可）

初步将整个ifix嵌入视频，开发流程梳理下：

1.控件注册

直接打开开发包中register脚本双击，显示注册成功即可。

2.控件嵌入

插入OLE对象，找到NetvideoActive.ocx插入

3.脚本编写

'画面关闭时，释放摄像头
Private Sub CFixPicture_Close()
NetVideoActiveX231.ClearOCX

End Sub

'画面打开时，连接摄像头并开启实时播放
Private Sub CFixPicture_Initialize()
Dim lUserID As Long
Dim ret As Boolean

lUserID = NetVideoActiveX231.Login("192.168.1.127", 8000, "admin", "jsjl1340")
ret = NetVideoActiveX231.StartRealPlay(0, 0, 0)
NetVideoActiveX231.AboutBox

End Sub

'测试截图功能
Private Sub CommandButton1_Click()
NetVideoActiveX231.BMPCapturePicture "C:UsersyuanshengqiDesktop", True
End Sub

4.事件触发

在事件触发时，（编写调度脚本，比如事件调度事件，触发某些条件时，可以执行相关接口，比如截图功能，转换到预置点等）。