软件著作权申请书精选.docx
《软件著作权申请书精选.docx》由会员分享，可在线阅读，更多相关《软件著作权申请书精选.docx（15页珍藏版）》请在冰豆网上搜索。
软件著作权申请书精选
软件著作权申请书
——冻土远程及时监测软件系统
黑龙江省水利科学研究院
2010年4月
软件著作权申请书
——冻土远程及时监测软件
冻土远程及时监测软件是黑龙江省水利科学研究院独立开发的合用于水利工程野
外原位监测和实验室监测的专业软件。
其特色在于可使水利行业野外冻土及时监测和数
据自动收集实现真实意义上的远程监控，保证通信数据的靠谱性和及时性。
一、软件简介
“冻土远程及时监测软件”是鉴于Microsoft.NETFramework架构进行开发的新一
代先进的监测软件，其运转环境为WindowsXP/Windows2003Server操作系统，软件为
全中文环境，运转稳固靠谱，可依据详细的自定义要求进行系统配置，为每一用户供给
口令及硬件加密，保证数据的安全。
该切合国家标准《GB/T17544-1998信息技术软件
包质量要乞降测试》的规定。
该软件采纳模块化组织形式，经过模块分区，进行各样功能管理与应用。
该软件的
核心构造主要包含工程管理模块、通信模块（数据通信）、编程模块、图形建模模块、
数据交互模块（及时监测、剖析报表、报警等）、传感器库管理模块和帮助模块。
二、软件合用行业和用途
本软件是以知足冻土试验监测的需求为目的，将冻胀参数的及时监测曲线、土体温
度场散布、X-Y曲线、历史数据查问，以及远程及时监测和数据收集与传输等功能集于
一体的专业软件，主要用来知足工程冻土室内试验和野外原位观察的需要，为寒区水工
建筑物冻害损坏机理研究供给基础平台，指导寒区水利工程建设。
使水利行业野外冻土
数据自动收集实现真实意义上的远程监控，保证通信数据的靠谱性和及时性。
本软件的主要功能是将寒区水工建筑物冻害防治技术研究作为主因素材，利用计算
机编程语言、互联网及其数据库的功能，服务于工程冻土监测、寒区水工建筑物冻害破
坏机理研究领域，进行季节冻土区低温环境下的冻土温度场、应力场和变形等冻胀参数
的远程及时自动化监测、远程数据传输和数据办理等工作的专业软件。
该软件性能稳固、
靠谱性高，测试精度知足监测要求，在水利工程等领域有广阔的应用远景。
三、软件开发的软硬件环境
软件环境：
Windows2000/WindowsXP/Windows2003/VISTA的简体中文版本，介绍采
用WindowsXP，office2003
硬件环境：
CPU（PⅣ），内存（1GB），硬盘（60GB）
四、软件的技术特色和功能
1.软件的技术特色
1）易保护：
采纳模块化设计，在整个项目的进行中，代码的保护不过在局部模块
中，保护起来特别方便；
2）效率高：
全中文界面，菜单式设计，各部分功能了如指掌，初学者易于掌握，
提升了使用效率；
3）易扩展：
因为面向对象的特征，设计出高内聚、低耦合的系统构造，使得系统
更灵巧、更简单扩展。
2.软件的主要功能
1）可及时远程监测各测点丈量参数，可依据需要设定测点数据，对原始数据可进
行滤波、计算，可远程传输数据，并对数据进行剖析和办理；
2）监测数据可以以多种方式（数据表、时间历程曲线图、X/Y坐标图、模拟图、直
方图等）显示，并以数据库形式保留，方便进行历史数据查问；
3）可直接生成TXT、EXCEL，或其余形式报表文件；
4）打印监测数据，实现对系统信息打印的管理功能，供给及时打印、准时打印、
随机打印功能。
支持对图形、报表、曲线、报警信息、各样统计计算结果等的打印；
5）拥有数据越限报警功能，可现场即时上传报警信息，同时，还拥有GSM手机短
信报警管理系统；
6）能对系统中的每一用户进行口令和操作权限的管理，能对不一样的用户分派不一样
的系统接见、操作权限级别，保障运转系统的安全性；
7）操作界面清楚直观，工具条与按钮操作。
显示界面可分为主界面和各子界面，
各界面间切换灵巧，界面图案可按客户要求灵巧变动；
8）拥有在线编写、保护、改正、扩展功能。
系统硬件和软件都知足开放性标准的
要求，知足此后系统在硬件节点的增添、数据库容量的扩大、系统软件功能的加强等方
面的要求。
五、软件的先进性
“冻土远程及时监测软件”主要用于季节冻土区低温环境下的冻土温度场、应力场
和变形等冻胀参数的远程及时自动化监测、数据传输和数据办理等，该技术核心内容经
过科技查新，还没有见有有关报导。
成就创建性：
1）软件采纳全中文操作界面，支持全部的通信模式，可以很好的兼容国内外的仪
器设施和传感器，使冻土模型试验和野外原位观察实现了自动化和远程及时在线监测。
2）初次开发了季节冻土温度场及时显示技术，实现了寒区冻土温度场的及时可视
化功能，使寒区冻土的及时监测更为直观。
六、软件源程序代码
1.软件代码说明
本软件程序是一个单调的运转软件，各个软件子模块的预约义，程序清单的商定格
式以下：
文件名
源代码模块名
功能简介（备注）
（代码种类）
MDIForm1
主窗体（控制软件）（窗体）
frmnewProject
新建工程（管理监测计划）（窗体）
Dialog_ManageDoc
工程管理（备注无）（窗体）
frmdataJH
数据显示（串口，传感器有关信息）
（窗体）
frmPattern
图形建模（数据模拟显示）（窗体）
frmReV_Send
指令发送模块（控制发送硬件指令）
（窗体）
frmxjybc
巡检编程（监测计划编制）（窗体）
frmPro_Edit
编程（监测计划编制）（窗体）
Dialog_Dselect
串口连结设置（通信设置）（窗体）
FRM80
巡检收集模块（巡检数据显示）
（窗体）
unloa_Mess
监测通信（监测硬件通信）（窗体）
frmLine
数据及时曲线显示（及时显示监测信息数据）
（窗体）
frmLinexy
XY数据曲线绘制（历史数据绘线显示）
（窗体）
frmPattern_Draw
等值线绘制（按数据绘线）（窗体）
frmresetQuery_Import
导入数据（数据此外保留）（窗体）
Dialog_JD
历史数据查问（查察已经收集回来的数据）
（窗体）
frmresetTimeQuery
数据准时间导出（数据此外保留）（窗体）
frmalarm
报警设置（有效数据范围设置）
（窗体）
frmhisline
历史趋向曲线（有效显示数据）
（窗体）
frmSplash
软件简介（启动窗体）（窗体）
Dia_SensorAdd
传感器信息编写（工程控制设置）（窗体）
Dialog_Ckdset
等值线便利参数设置（数据显示设置）
（窗体）
Dialog_Find
查找（查问数据）（窗体）
Dialog_Setshow
点设置显示（传感器设置）（窗体）
Form_calendar
日期选择（定位时间）（窗体）
frmdataJhalarm
属性设置（报警的属性设置）（窗体）
frmGPRS
无线传输设置（传输控制设置）
（窗体）
frmnewDoc
新建文档（监测计划管理）（窗体）
frmPro_Prog
程序指令编写（发丧命令操作硬件）
（窗体）
frmStartshow
启动窗体（显示信息）（窗体）
frmunload
数据下载（从硬件内读取数据）
（窗体）
Seri_1
串口连结设置（通信设置）（窗体）
unloa_Mess_AU
数据协助下载（数据设置下载）（窗体）
mduRAS
工程设置（类模块代码会合，无窗体）
（类模块）
modAddressOf
工程设置（类模块代码会合，无窗体）
（类模块）
ModcomAPI
工程设置（串口类模块代码会合，无窗体）
（类模块）
Moddabase
工程设置（数据库类模块代码会合，无窗体）
（类模块）
Moddatataker
工程设置（DT类模块代码会合，无窗体）（类模块）
modDisPlay
工程设置（显示类模块代码会合，无窗体）
（类模块）
ModNotifyIcon
工程设置（图标类模块代码会合，无窗体）
（类模块）
ModSensorMes
工程设置（传感器类模块代码会合，无窗体）
（类模块）
modSubClass
工程设置（子类模块代码会合，无窗体）
（类模块）
ModunloadActiveForm
工程设置（下载类模块代码会合，无窗体）
（类模块）
2.软件源程序代码
1）MDIForm1工程源码剖析详解以下：
工程名称：
寒区冻土实验监测系统
窗体源码名称：
MDIForm1
功能分类：
整合管理
功能简介：
软件操作主窗体。
窗体截图：
下列图
窗体截图
部分源码以下：
OptionExplicit
DimPort_SeCAsInteger
DimTmpA（5）AsString
DimTmpB（5）AsString
DimstrQQAsString
'定义串口接收的参数
'分别储存
'分别储存
'定义全局变量
DimKZsj_interAsLong
'控制时间
DimRev_sendCSJLAsLong
'接收到的数据容量
'DimMDIxzstring（1000）AsString
'接收到的数据缓冲地区
DimMDIxzLaststringAsString
'接收到的数据缓冲地区
DimCurxzPortAsInteger
DimMDIxzLongAsLong
'缓冲数据空间
DimMDIformZhCurAsInteger
'目前下载的组号
DimMDIformAdressCurAsLong
'目前下载的地点
'---------------------------------------------------
DimDate_JAsLong
DimTime_JAsLong
'---------------------------------------------------
PrivateDeclareFunctionHtmlHelpALib""（ByValhwndCallerAsLong,ByValpszFileAsString,ByValuCommandAsLong,ByValdwDataAsLong）AsLong
PrivateSubCom_DTadress_Click（）
IfSerial_ZWfSThen
DT_ZWadress=""
Else
DT_ZWadress=&""
EndIf
EndSub
PrivateSubIDM_CloseProgect_Click（）
Dimret
IfCurProjectpath=""AndProjectname=""Then
MsgBox"目前没有激活的工程",vbYes
Else
ret=MsgBox（"将要封闭目前工程，确立点击是，撤消否",vbYesNo）
IfvbYes=retThen
MDIunloadallwindow
Formunload
EndIf
EndIf
EndSub
2）ModunloadActiveForm工程源码剖析详解以下：
工程名称：
寒区冻土实验监测系统
窗体源码名称：
ModunloadActiveForm
功能分类：
软件模块
功能简介：
工程设置
部分源码以下：
DimTotalWAsInteger
PublicMove_HAsInteger'动向加载菜单A
PublicMove_HxjAsInteger'巡检仪器加载
'------------工程管理---------------
PublicProjectnameAsString
PublicPrjsaveasPathAsString
PublicCurProjectpathAsString'定义目前工程的路径
'-----------------------------------
'-----------新建窗体-start--------------------
'---------------------------------------
PublicXjbc（3）AsNewfrmxjybc
PublicQx（5）AsNewfrmLine
PublicBc（10）AsNewfrmPro_Edit
PublicYx（5）AsNewfrmLinexy
PublicTx（5）AsNewfrmPattern
PublicDw（5）AsNewfrmPattern_Draw
PublicDaSet（10）AsNewDialog_Setshow
PublicWinshowbc（10）AsBoolean
PublicWinshowxjbc（3）AsBoolean
PublicXjbc_IndexAsInteger
PublicXj_IndexAsInteger
PublicBc_IndexAsInteger
PublicQx_IndexAsInteger
PublicYx_IndexAsInteger
PublicDw_IndexAsInteger
PublicZjBc_IndexAsInteger
PublicZbBc_IndexAsBoolean
'-----------------------------------------
PublicFunctionFormunload（）AsBoolean
DimiAsInteger
'------------------------------------------
Projectname=""'工程名为空那么删除目前全部的文档
CurProjectpath=""
Mainmenucongfig（Projectname）
'------------------------------------------
OnErrorResumeNext
'------------------------------------------
'///////////////////////////////////////////
UnloadMDIForm_Timeset
UnloadDialog_Find
UnloadDialog_LunXun
UnloadFRM80
UnloadFRM81
UnloadFRM82
'//Unloadfrmxjybc
UnloadfrmPattern
UnloadfrmPattern_Draw
UnloadfrmdataJH
UnloadfrmGPRS
UnloadDialog_DSelect
UnloadfrmReV_Send
UnloadfrmnewProject
UnloadDaSet（SStab_Index）
Unloadfrmalarm
UnloadfrmPro_Prog
UnloadfrmresetQuery_Import
UnloadfrmresetTimeQuery
UnloadDialog_ManageDoc
'///////////////////////////////////////////////
'///////////////////////////////////////////
'----------------------------
Fori=1ToMove_HStep1
OnErrorResumeNext
Unload（i）
Nexti
Fori=1ToMove_HxjStep1
OnErrorResumeNext
Unload（i）
Nexti
Fori=0ToQx_IndexStep1
OnErrorResumeNext
UnloadQx（i）
Nexti
Fori=0ToYx_IndexStep1
OnErrorResumeNext
UnloadYx（i）
Nexti
Fori=0ToBc_IndexStep1
OnErrorResumeNext
UnloadBc（i）
Nexti
Fori=0ToDw_IndexStep1
OnErrorResumeNext
UnloadDw（i）
Nexti
Fori=0ToXjbc_IndexStep1
OnErrorResumeNext
UnloadXjbc（i）
Nexti
Formunload=True
EndFunction
升级会员 