2009NO.19SCIENCE&TECHNOLOGYINFORMATION科技资讯学术论坛基于MapInfo的线对象编辑工具张印廷何苗张晓棠张双娟(河北省地矿局测绘院河北廊坊065000)摘要:结合几个具体实例介绍MapBasic在扩展MapInfo线编辑工具中的应用,同时包括MapBasic程序的编译和执行技巧。关键词:MapInfo线编辑工具中图分类号:TP31文献标识码:A文章编号:1672-3791(2009)07(a)-0185-01MapInfo在地理信息方面的应用,为公多边形和星形线”第三种,ToggleButton开关式按钮,当众提供了一个良好的途径。它拥有强大的⋯⋯用户单击这类按钮时,按钮会在按下/非按桌面化地理信息处理功能,灵活的OLE(动PushButtonCalling造平行线ID3下之间来回变换,同时程序会调用相应子态链接与嵌入)和ODBC(开放式数据库连Icon过程。接)远程访问特性,做为一个平台,给每个MI_ICON_MAPSYMB_6PUSHButton和ToggleButton都没有使用该软件的用户留下了深刻的印象。HelpMsg“\n按指定宽度画平Cursor和DrawMode子句。从微观上讲,MapInfo提供了一些点线行线”2.2典型子过程例说面及注记工具,进行一些图形对象的基本⋯⋯本程序包含的子过程中,造平行线使编辑操作。然而,在地质测绘行业中,大多PUSHButtonCalling退出ID11用PushButton按钮,其他均使用ToolButton数电子地图数据生产的从业人员都是“半IconMI_ICON_ARROW_5按钮,两种按钮相应的子过程应用方法略路出家”,用惯了其他图形编辑软件,总感HelpMsg“\n退出线工具”有不同,下面分别介绍。觉MapInfo的图形编辑工具过于单调,不如Width12.2.1ToolButton按钮的处理程序其他图形软件得心应手,笔者从生产实践EndSub以剪断线为例说明。出发,用MapInfo的开发工具—MapBasic扩全局变量是软件开始执行时就被定义剪断线的通常操作方法是用鼠标在地展了一些线对象编辑工具,得到了生产实并一直有效到卸载软件时的变量,它可以图窗口中单击一条线,该线选中的同时被际的肯定。应用于软件的各个子过程中。在单击位置一分为二,单击位置成为其中SubMain和EndSub之间的部分是向一个结果对象的末节点和另一个结果对象1工具的主要功能MapInfo界面中加入一个标题为“线工具”的首节点(此点实际应与原线对象某片断该工具参考MapGis等矢量图形软件的的工具箱,该功能由CreateButtonPad完成,的两个端点共线,并非是鼠标单击的位置,线编辑功能编写,主要包括:生成格网线、其宽度由Width子句定义为1。MapBasic允否则,结果对象将各有一个片断改变走生成多边形和星形线、造平行线、改线方许定义三种类型的按钮。向)。本工具使用的是ToolButton按钮,当向、剪断线、相交线剪断、连接线、靠近线和第一种:ToolButton工具按钮,当用户ToolButton按钮被按下后,Create线端点平差,下面介绍其主要实现过程。单击它时,它处于激活状态直到选择了另ButtonPad命令的Cursor子句和DrawMode一个工具,这种工具按钮被激活时,用户单子句被执行,但其对应的实际过程不执行2主要实现过程击一个MapInfo窗口将调用对应的处理程而是处于待命状态,只有当用户在地图窗2.1声明子过程和全局变量并添加到工具箱序。Icon子句指定按钮图案,在MapBasic的口中单击叶,程序才开始进入对应过程。以本部分的代码如下:安装盘中搜索名为ICONDEMO.MB的文件后每次单击窗口,该过程就被调用一次,直DeclareSubMain并在MapBasic中编译执行,将为MapInfo添至选择其他工具。DeclareSub造星形线加一个IconSampler菜单项,依次选取其下剪断线工具的一般工作过程是:DeclareSub造网格线的子菜单打开各种工具箱,选中合适的按单击屏幕→获取单击点坐标→如果发⋯⋯钮图标后单击之,将出现一个对话框,任取现线对象立即获取其所在的表名、行号、线DeclareSub退出‘声明子过程该对话框中的两个参数之一置于Icon之后图形属性→以单击点坐标为中心构造一个Globallin(3)asobject均可以指定相应的按钮图案;Cursor子句足够小的圆形线对象→计算该圆对象与选⋯⋯定义工具处于激活状态时的鼠标形状,中线对象的交点坐标→两交点之中点即为‘声明全局变量DrawMode子句指定该工具在地图窗口中分割原