CorelDraw基于仿射变换纠正工具的开发.pdfVIP

· ·58 江西测绘 2013年 黄 凯，侯 超z (1．上海市测绘院上海市200006；2．江西省地理国情监测遥感院江西南昌 330046) 摘要：地图制图工作中常使用C叫elDraw软件。在制图时为了满足印刷要求，将对GIS数据进行仿射 变换，在CorelDraw中可以根据变换前后的数据逆求参数，并根据参数对数据进行坐标纠正，本章介绍该工 具的二次开发的设计思路和工作原理。 关键词：CorelDraw；VBA；仿射变换；纠正 basicfor 1 引言 VBA，(visual 宏语言。VBA提供了面向对象的程序设计方法。提 CorelDraw软件是一个基于图形绘制、设计与出 版一体化的数据处理软件，原用于美术、广告设计， 供了相当完整的程序设计语言。VBA是基于Visual 因其较好的图形和文字编辑处理功能。经常被地图 Basic发展而来的。利用VB可以编写出独立的 制图和地图出版部门使用。地图制图工作中，无法在 GIS软件中实现的色彩、文字和图形特效时．一般都们必须在一个宿主软件中调用我们所编写的程序。 CorelDraw 使用CorelDraw来实现。 VBA的对象模型从上至下．我们可 以直接调用有关文档、页面、图层和物件的方法和属性。 随着软件版本的升级．CorelDraw对其他矢量数 2．2 CordScript简介 据格式如CAD的DWG文件的兼容和支持也越来越 好．这一点。使测绘行业的GIS数据转化为DWG文 件后．可以更好地导人CorelDmw．从而提高了地图 制图工作的效率。 CorelDraw软件毕竟不是为测绘工作而设计的 软件。很重要的一点，它的坐标系统主要为印刷出版 供的命令，而且调用这些命令是相当方便的。 服务，并不考虑地理投影坐标系。因此，往往在使用 3 设计思路 GIS数据时，制图人员要根据地图版面进行数据的3．1流程 缩放和位移，在这一过程中。会丢失大量的地理定位 3．1．1必备的两个数据 坐标的信息。在地图版面条件不佳而对精度要求不 带有地理坐标的GIS数据，导出为DWG格式和 高时。制图人员有时还会随意地拉伸、缩放数据。虽 CDR地图数据。 然在当时不影响地图的使用，却对后期对该数据的 两个数据应有一定的范围描述实地．是同一区 维护带来很大的困难。制图人员往往要通过多次缩 域，操作人员才可在此范围内寻找和采集同名点。如 放、位移来比较，以得出变形参数，才可将新的现势 下图。 GIS数据正确衬底。 CorelDraw提供了VBA的开发环境，使我们可 以根据实际需求对软件进行二次开发。因此，我们可 以开发基于仿射算法的纠正工具，通过设置同名点 的方式．计算出地图图形数据与GIS数据之间的变 换参数．从而使CorelDraw的坐标和地理投影坐标系 建立联系。 2开发环境介绍 2．1 CorelDrawVBA简介 万方数据 总第99期第l期 CorelDmw基于仿射变换纠正工具的开发 ·59· 3．1．2步骤 中的坐标单位、VBA单位、数据文档的单位三者的 导人DWG数据： 相互关系。在没有资料的情况下，可以通过实验来确 记录DWG的中心坐标； 定。 采集同名点的坐标； 通过仿射变换计算缩放比例和位移参数； x，y，10000，False 根据参数。对DWG数据进行缩放和位移