视频监控系统毕业论文答辩介绍PPT

论文要点
论文要点
Company Logo
结论
本课题的设计内容为视频监控软件的分析与设计， 主要做了以下几方面工作：录像，保存图片，设置视 频参数，设置时间和日期等。
通过本课题的设计工作，我对视频监控系统有了 进一步的了解，对于视频监控系统的结构体系也有了 基本的认识。对于视频监控对社会乃至个人的安全的 意义有了深刻的认识和体会，通过阅读相关知识也认 识到了当今视频监控的发展状况，而且通过本课题的 工作更加熟悉了VB开发环境。
实现跨区域统一监控、存储、管 理、资源共享，整合利用视频资 源，达到视频资源的最大程度的 共享。
信息联动
视频监控与其他信息系统联动， 如水利行业与交通部门联动，共 享两个系统中的视频资源，达到 迅速、方便、准确的处理事件。
、
开发环境
我的主要工作是在 Visual Basic 6.0开发环境下， 利用视频采集卡的SDK进行开发设计，其中利用了部分 API所提供的对图像和视频处理的函数以及存储函数实 现对数字图像及视频的处理，来完成一部分功能的实现。 VB有如下优点： 1. VB是一种可视化的、面向对象和采用事件驱动方式 的结构化高级程序设计语言。 2.可用于开发Windows环境下的各类应用程序。 3.在Visual Basic环境下，利用事件驱动的编程机制、 新颖易用的可视化设计工具。
MsgBox "按“确定”录像保存到：C:\录像.avi" 'MsgBox可实现弹出窗口
ok = sdk2000.StartCapture("C:\录像.avi")
If ok Then
g_bCapturing = True
Else
MsgBox "录像失败!请检查故障 "
End If
End If
End Sub
End If
End Sub
、
论文要点
2.保存为jpg图片的核心代码：
Private Sub mnuSaveJPG_Click()
Dim ok As Boolean
ok = sdk2000.SaveImageToJpg("C:\图片.jpg")
If ok Then
MsgBox "图像存为 C:\图片.jpg"
LOGO
视频监控软件的分析与设计
院 系：计算机科学与技术 专 业：计算机科学与技术 指导老师： 答 辩 人： 答辩时间：2021.6.2
论文框架
1 研究背景 2 开发环境 3 论文要点 4 结论
1.研究背景
1)论文研究背景
交通
工地
视频监控 系统应用
领域
治安
银行
、
1.研究背景
2)视频监控系统发展概况
、
论文要点
1)系统功能需求分析
录像
设置时间和日期
需求 分析
保存图片
设置参 数
、
论文要点
2)各功能模块实现
➢ 录像
1开始录像的核心代码：
Private Sub mnuStartCapture_Click()
Dim ok As Boolean
If g_bCapturing = False Then
Else
MsgBox "保存失败!"
End If
End Sub
论文要点
Company Logo
论文要点
论文要点
2)各功能模块实现
➢ 设置视频参数
设置视频参数核心代码如下：
Private Sub mnuConfig_Click()
Load dlgConfig
Baidu Nhomakorabea
dlgConfig.Initialize sdk2000
dlgConfig.Show vbModal ‘显示” 模式对话框 “
Unload dlgConfig
End Sub
其中，在dlgConfig模块中，具体实现了设置功能。
、
以设置亮度为例：
Private Sub srlBrightness_Change() m_sdk2000.Brightness = srlBrightness.Value strBrightness.Caption = CStr(m_sdk2000.Brightness) End Sub
模拟视频监控系统
数字视频监控系统
分布式视频监控系统
20世纪90年代前， 主要是以模拟设备 为主的闭路电视监 控系统，称为第一 代。
20世纪90年代中期， 随着科技的发展，人 们利用计算机的高速 数据处理能力进行视 频的采集和处理，这 种基于PC机的多媒体 主控台系统称为第二 代数字化本地视频监 控系统。
20世纪90年代末， 随着网络带宽、计 算机处理能力和存 储容量的快速提高 ，视频监控步入了 全数字化的网络时 代，称为第三代远 程视频监控系统。
、
1.研究背景
3)视频监控的发展趋势
未来视频监 控系统发展 针对方向
智能化 平台化
系统有足够的智能，能识别不同 物体，发现监控画面中的异常情 况，以最快和最佳的方式发出警 报和提供有用信息。
1.保存为bmp图片的核心代码：
Private Sub mnuSaveBMP_Click()
Dim ok As Boolean
ok = sdk2000.SaveImageToBmp("C:\图片.bmp")
If ok Then
MsgBox "图像存为 C:\图片.bmp"
Else
MsgBox "保存失败!"
、
论文要点
2停止录像的核心代码：
Private Sub mnuStopCapture_Click()
If g_bCapturing Then
g_bCapturing = False
sdk2000.StopCapture
End If
End Sub
论文要点
论文要点
2)各功能模块实现
➢ 保存图片
其中，在dlgLogo 模块中，具体实现了设置功能。
、
论文要点
以设置日期为例
Private Sub cekDate_Click() m_sdk2000.ShowDate = Not
cekDate.Value <> 1 m_sdk2000.xDate = CLng( ) m_sdk2000.yDate = CLng( ) End Sub
论文要点
2)各功能模块实现
设置时间和日期 设置时间和日期模块核心代码如下：
Private Sub mnuLogo_Click() Load dlgLogo dlgLogo.Initialize sdk2000 dlgLogo.Show vbModal Unload dlgLogo End Sub