基于MapInfo房地产管理信息系统开发.docVIP

基于MapInfo房地产管理信息系统开发 　　摘要:本文从房产管理的角度出发，以胜利发电厂房产为例，运用GIS的理论方法，结合MapInfo软件的优势，采用OLE技术，以VB6.0为编程语言，开发一套基于MapInfo软件的面向用户的房地产管理信息系统。本文概述了该系统的相关软件简介、总体设计、数据库设计和系统功能的实现。 　　关键词: GIS；MapInfo；OLE自动化；数据库；房产管理 　　 　　一、前言 　　 　　随着计算机信息技术的发展，用计算机进行房产及设备的管理已十分普遍，但早期开发的管理信息系统软件都是一般的管理信息系统（Management Information System简称MIS）。建立在传统的MIS上的管理信息系统只能对纯数据进行处理而不具备对地理空间数据进行分析和处理的能力，而房产管理的日常工作要涉及大量与地理信息有关的资料，如地形图、土地使用图、房屋平面图、房屋坐标、房屋面积等，因此用传统的MIS管理模式已远远不能满足信息社会发展的需要[1]。 　　地理信息系统（Geography Information System，简称GIS）是融计算机图形和属性数据库为一体，存储和处理空间信息的高新技术，是一种专门用于管理地理空间分布数据的计算机系统，是房产信息管理的有利工具。MapInfo（Mapping Information）吸取了传统的GIS的精华，是标准的GIS平台，具有强大的空间数据管理、分析和可视化功能，且自带二次开发工具MapBasic。因此用MapInfo进行房产管理系统的开发可以很好地满足房产管理的需要充分发挥GIS的空间分析和处理功能。 　　 　　二、MapInfo与VB简介 　　 　　MapInfo地理信息系统平台作为一个图形－文字信息完善结合的软件工具，能将所需要的信息资料形象、直观地与地理图形紧密地联结起来，能提供大量常用的分析、查询功能，能将结果以图形或表格的方式显示出来。 　　Visual Basic程序设计语言简单易学，其编程采用了面向对象，事件驱动的编程机制，用以程序巧妙地将Windows编程的复杂性封装起来，所见即所得的可视界面设计方法。 　　通过OLE自动化实现MapInfo与VB的集成二次开发的关键技术如下： 　　(一)VB与MapInfo建立与断开连接 　　首先，在模块中定义一个全局对象（object）变量，用CreateObject函数创建OLE自动化对象MapInfo. Application，并用Set语句将返回值赋给该刘象的引用变量，启动MapInfo的语句如下： 　　Set MapInfo=CreateObject (MapInfo. Application) 　　启动后的MapInfo实际上在后台运行。 　　程序结束时，要释放MapInfo及相关资源，通过Set MapInfo = Nothing使VB与MapInfo断开连接。 　　(二)向MapInfo发送命令 　　启动MapInfo后，构造表示MapBasic语句的字符串，并使用DO方法发送这个字符串。如想让MapInfo执行MapBasic的Open Table语句，如下： 　　MapInfo. DO Open Table 建筑物.tab interactive 　　(三)调用MapInfo中的菜单、工具条等功能 　　使用MapInfo的RunMenuCommand方法，即可创建MapInfo的标准工具按钮。如实现图形选择代码：MapInfo.RunMenuCommand 1701 　　将MapInfo中的Ruler、Info、Legend、Statistics和Message等无模式窗口用于自己的系统时，需再生这些窗口。使用Set Window … Parent语句。以Ruler窗口为例，代码如下： 　　MapInfo.RunMenuCommand M_TOOLS_RULER 　　MapInfo.Do Set Window Ruler Parent ActiveForm.hwnd Show 　　（四)建立客户自动化对象触发CallBack 　　 　　基于OLE自动化开发的难点在于所谓的CallBack，MapInfo服务器对客户程序地图窗口的反应叫CallBack。在集成地图应用系统中,一般采用回调机制从MapInfo获取信息。[2]假如你在地图窗口中移动地图目标，MapInfo能返回信息告诉你地图目标当前的坐标位置，这就是CallBack功能。如果你想定制自己的地图操作工具或菜单命令，你必须依靠CallBack。使用回叫机制,在下列情况下MapInfo向客户程序发送信息： 　　1、使用自定义工具与MapInfo交互。例如,在