首页 理论教育 辽河流域水环境突发污染事故应急系统简介

辽河流域水环境突发污染事故应急系统简介

时间:2023-10-25 理论教育 版权反馈
【摘要】:单击VB菜单的“工程”项,选择“部件”,所需的ESRI MapObjects控件,单击“确定”,实现系统的GIS功能。图5-15属性页对话框④在Layers栏中,通过“”“”来改变各图层的覆盖关系。

辽河流域水环境突发污染事故应急系统简介

5.6.1.1 开发环境

系统开发环境包括操作系统、硬件、地理信息系统与数据库管理系统软件平台以及开发旅游资源调查与评价信息系统所用的其他应用软件。该系统的开发基于Windows XP操作系统,以Visual Access7.0数据库管理属性数据,采用MapObjects2.2 GIS组件,应用VB6.0可视化编程语言进行开发。具体采用的系统配置如下。

①操作系统:Windows XP。

②处理器P42.0,内存128M以上,显存32 M以上,硬盘40以上,优盘、活动硬盘、打印机、扫描仪输入输出设备

③地理信息系统软件:MapObjects2.2、ArcView3.3等。

④关系数据库管理系统:Access数据库管理系统。

⑤开发语言及其他应用软件:Visual Basic6.0、Photoshop7.0等。

5.6.1.2 系统简介

(1)系统GIS功能的实现

实现系统GIS功能的具体步骤是:

①安装MapObjects。

②将系统所需的MapObjects控件插入VB工程中。

VB 6.0是Microsoft的面向广大开发人员的软件开发系列产品,它简单易用,适用面广,无论是通信、数据库,还是多媒体以及普通的Windows应用程序都可以用VB进行开发,而且方便快捷。Visual Basic具有以下特点:

①可视化:Visual的英文含义即是可视化,在可视化环境下创作前端界面就如同摆放积木一样。

②面向对象:面向对象的编程建立在类的基础上,通过类的封装使源程序更便于维护。

③部件编程:Visual Basic中进行的部件编程建立在微软的部件对象模型(COM)基础上。

事件驱动:在事件驱动模式下,程序的执行依靠系统能够识别的触发事件来启动。(www.xing528.com)

单击VB菜单的“工程”项,选择“部件”,所需的ESRI MapObjects控件,单击“确定”,实现系统的GIS功能。在弹出的对话框中,选择系统,即可在VB程序中使用控件,实现系统的GIS功能。

(2)在VB环境中加载MapObjects

①运行VB,新建一个工程,在“工程”菜单中,右键单击“部件”以显示“部件”对话框,见图5-13。该对话框中将列出所有已经注册的可加入的对象、设计者和ActiveX控件。

②要在工具框中加入ActiveX控件,选定控件名称左边的复选框。这里我们选择MapObjects2.2等几个控件。

③单击“确定”以关闭“部件”对话框。所有选定的MapObjects控件将出现在工具框的高级控件部分,见图5-14。若要将其他ActiveX控件加入“部件”对话框,单击“浏览”按钮,并找到扩展名为.ocx的文件。这些文件通常安装在C:\Windows\system或System32目录中。在将ActiveX控件加入可用控件列表中时,Visual Basic自动在“部件”对话框中选定它的复选框。

(3)地图图层的加载和显示

利用MapObjects的Map控件,可以不编写任何程序,直接显示数字地图。

①在VB中建立一个Form,并向该Form添加如图5-15所示的Map控件(它在Form中的缺省名为Map1),在Map1控件上单击右键,弹出菜单。

②选择Properties命令,显示如图5-15所示的属性页对话框。

图5-13 在VB高级控件栏中显示的几个ESRI MapObjects主要控件

图5-14 添加MapObject控件到VB中

③选择Add按钮,并进入图层文件所在的路径,选择所需要的图层后,单击打开按钮。所添加的图层名称显示在Layers栏中。若卸载某图层,则点击Remove按钮。

图5-15 属性页对话框

④在Layers栏中,通过“img”“img”来改变各图层的覆盖关系。

⑤此外,选择其中某图层,再通过属性对话框,还能设置各个图层的属性。见图5-16。

图5-16 Form1运行结果

免责声明:以上内容源自网络,版权归原作者所有,如有侵犯您的原创版权请告知,我们将尽快删除相关内容。

我要反馈