软件著作权申请书精选文档格式.docx

1、的远程及时自动化监测、 远程数据传输和数据办理等工作的专业软件。 该软件性能稳固、靠谱性高，测试精度知足监测要求，在水利工程等领域有广阔的应用远景。三、软件开发的软硬件环境软件环境： Windows2000/WindowsXP/Windows2003/VISTA的简体中文版本，介绍采用WindowsXP，office2003硬件环境： CPU（P），内存（ 1GB），硬盘（ 60GB）四、软件的技术特色和功能1.软件的技术特色1）易保护：采纳模块化设计，在整个项目的进行中，代码的保护不过在局部模块中，保护起来特别方便；2）效率高：全中文界面，菜单式设计，各部分功能了如指掌，初学者易于掌握，提升

2、了使用效率；3）易扩展：因为面向对象的特征，设计出高内聚、低耦合的系统构造，使得系统更灵巧、更简单扩展。2.软件的主要功能1）可及时远程监测各测点丈量参数，可依据需要设定测点数据，对原始数据可进行滤波、计算，可远程传输数据，并对数据进行剖析和办理；2）监测数据可以以多种方式（数据表、时间历程曲线图、 X/Y 坐标图、模拟图、直方图等）显示，并以数据库形式保留，方便进行历史数据查问；3）可直接生成 TXT、EXCEL，或其余形式报表文件；4）打印监测数据，实现对系统信息打印的管理功能，供给及时打印、准时打印、随机打印功能。支持对图形、报表、曲线、报警信息、各样统计计算结果等的打印；5）拥有数据越

3、限报警功能，可现场即时上传报警信息，同时，还拥有 GSM 手机短信报警管理系统；6）能对系统中的每一用户进行口令和操作权限的管理，能对不一样的用户分派不一样的系统接见、操作权限级别，保障运转系统的安全性；7）操作界面清楚直观，工具条与按钮操作。显示界面可分为主界面和各子界面，各界面间切换灵巧，界面图案可按客户要求灵巧变动；8）拥有在线编写、保护、改正、扩展功能。系统硬件和软件都知足开放性标准的要求，知足此后系统在硬件节点的增添、数据库容量的扩大、系统软件功能的加强等方面的要求。五、软件的先进性“冻土远程及时监测软件”主要用于季节冻土区低温环境下的冻土温度场、应力场和变形等冻胀参数的远程及时自动

4、化监测、数据传输和数据办理等，该技术核心内容经过科技查新，还没有见有有关报导。成就创建性：1）软件采纳全中文操作界面，支持全部的通信模式，可以很好的兼容国内外的仪器设施和传感器，使冻土模型试验和野外原位观察实现了自动化和远程及时在线监测。2）初次开发了季节冻土温度场及时显示技术，实现了寒区冻土温度场的及时可视化功能，使寒区冻土的及时监测更为直观。六、软件源程序代码1.软件代码说明本软件程序是一个单调的运转软件，各个软件子模块的预约义，程序清单的商定格式以下：文件名源代码模块名功能简介（备注）（代码种类）MDIForm1主窗体（控制软件） （窗体）frmnewProject新建工程（管理监测计划

5、） （窗体）Dialog_ManageDoc工程管理（备注无） （窗体）frmdataJH数据显示（串口，传感器有关信息）（窗体）frmPattern图形建模（数据模拟显示） （窗体）frmReV_Send指令发送模块（控制发送硬件指令）frmxjybc巡检编程（监测计划编制） （窗体）frmPro_Edit编程（监测计划编制） （窗体）Dialog_Dselect串口连结设置（通信设置） （窗体）FRM80巡检收集模块（巡检数据显示）unloa_Mess监测通信（监测硬件通信） （窗体）frmLine数据及时曲线显示（及时显示监测信息数据）frmLinexyXY 数据曲线绘制（历史数据绘线显

6、示）frmPattern_Draw等值线绘制（按数据绘线） （窗体）frmresetQuery_Import导入数据（数据此外保留） （窗体）Dialog_JD历史数据查问（查察已经收集回来的数据）frmresetTimeQuery数据准时间导出（数据此外保留） （窗体）frmalarm报警设置（有效数据范围设置）frmhisline历史趋向曲线（有效显示数据）frmSplash软件简介（启动窗体） （窗体）Dia_SensorAdd传感器信息编写（工程控制设置） （窗体）Dialog_Ckdset等值线便利参数设置（数据显示设置）Dialog_Find查找（查问数据） （窗体）Dialog_

7、Setshow点设置显示（传感器设置） （窗体）Form_calendar日期选择（定位时间） （窗体）frmdataJhalarm属性设置（报警的属性设置） （窗体）frmGPRS无线传输设置（传输控制设置）frmnewDoc新建文档（监测计划管理） （窗体）frmPro_Prog程序指令编写（发丧命令操作硬件）frmStartshow启动窗体（显示信息） （窗体）frmunload数据下载（从硬件内读取数据）Seri_1unloa_Mess_AU数据协助下载（数据设置下载） （窗体）mduRAS工程设置（类模块代码会合，无窗体）（类模块）modAddressOfModcomAPI工程设置（

8、串口类模块代码会合，无窗体）Moddabase工程设置（数据库类模块代码会合，无窗体）Moddatataker工程设置（ DT 类模块代码会合，无窗体） （类模块）modDisPlay工程设置（显示类模块代码会合，无窗体）ModNotifyIcon工程设置（图标类模块代码会合，无窗体）ModSensorMes工程设置（传感器类模块代码会合，无窗体）modSubClass工程设置（子类模块代码会合，无窗体）ModunloadActiveForm工程设置（下载类模块代码会合，无窗体）2.软件源程序代码1）MDIForm1 工程源码剖析详解以下：工程名称：寒区冻土实验监测系统窗体源码名称： MDIF

9、orm1功能分类：整合管理功能简介：软件操作主窗体。窗体截图：下列图窗体截图部分源码以下：Option ExplicitDim Port_SeC As IntegerDim TmpA（5） As StringDim TmpB（5） As StringDim strQQ As String 定义串口接收的参数分别储存定义全局变量Dim KZsj_inter As Long控制时间Dim Rev_sendCSJL As Long接收到的数据容量Dim MDIxzstring（1000） As String接收到的数据缓冲地区Dim MDIxzLaststring As StringDim Curx

10、zPort As IntegerDim MDIxzLong As Long 缓冲数据空间Dim MDIformZhCur As Integer目前下载的组号Dim MDIformAdressCur As Long目前下载的地点-Dim Date_J As LongDim Time_J As LongPrivate Declare Function HtmlHelpA Lib （ByVal hwndCaller As Long, ByVal pszFile As String, ByVal uCommand As Long, ByVal dwData As Long） As LongPrivat

11、e Sub Com_DTadress_Click（）If Serial_ZWfS ThenDT_ZWadress = ElseDT_ZWadress = & End IfEnd SubPrivate Sub IDM_CloseProgect_Click（）Dim retIf CurProjectpath = And Projectname = ThenMsgBox 目前没有激活的工程 , vbYesret = MsgBox（ 将要封闭目前工程，确立点击是，撤消否 , vbYesNo）If vbYes = ret ThenMDIunloadallwindowFormunload2）Modunlo

12、adActiveForm 工程源码剖析详解以下： ModunloadActiveForm 软件模块工程设置Dim TotalW As IntegerPublic Move_H As Integer 动向加载菜单 APublic Move_Hxj As Integer 巡检仪器加载- 工程管理 -Public Projectname As StringPublic PrjsaveasPath As StringPublic CurProjectpath As String 定义目前工程的路径- 新建窗体 -start-Public Xjbc（3） As New frmxjybcPublic Qx

13、（5） As New frmLinePublic Bc（10） As New frmPro_EditPublic Yx（5） As New frmLinexyPublic Tx（5） As New frmPatternPublic Dw（5） As New frmPattern_DrawPublic DaSet（10） As New Dialog_SetshowPublic Winshowbc（10） As BooleanPublic Winshowxjbc（3） As BooleanPublic Xjbc_Index As IntegerPublic Xj_Index As IntegerP

14、ublic Bc_Index As IntegerPublic Qx_Index As IntegerPublic Yx_Index As IntegerPublic Dw_Index As IntegerPublic ZjBc_Index As IntegerPublic ZbBc_Index As Boolean-Public Function Formunload（） As BooleanDim i As Integer-Projectname = 工程名为空那么删除目前全部的文档CurProjectpath = Mainmenucongfig （Projectname）On Error

15、 Resume Next/Unload MDIForm_TimesetUnload Dialog_FindUnload Dialog_LunXunUnload FRM80Unload FRM81Unload FRM82/Unload frmxjybcUnload frmPatternUnload frmPattern_DrawUnload frmdataJHUnload frmGPRSUnload Dialog_DSelectUnload frmReV_SendUnload frmnewProjectUnload DaSet（SStab_Index）Unload frmalarmUnload

16、frmPro_ProgUnload frmresetQuery_ImportUnload frmresetTimeQueryUnload Dialog_ManageDoc/-For i = 1 To Move_H Step 1Unload （i）Next iFor i = 1 To Move_Hxj Step 1For i = 0 To Qx_Index Step 1Unload Qx（i）For i = 0 To Yx_Index Step 1Unload Yx（i）For i = 0 To Bc_Index Step 1Unload Bc（i）For i = 0 To Dw_Index Step 1Unload Dw（i）For i = 0 To Xjbc_Index Step 1Unload Xjbc（i）Formunload = TrueEnd Function