申请/专利权人：武汉大学

申请日：2020-12-07

公开（公告）日：2024-06-25

公开（公告）号：CN112487124B

主分类号：G06F16/29

分类号：G06F16/29;G06F16/25

优先权：

专利状态码：有效-授权

法律状态：2024.06.25#授权;2021.03.30#实质审查的生效;2021.03.12#公开

摘要：本申请公开了一种使用VBA将CorelDraw地图中点状要素转换到SuperMap的方法，用以解决CorelDraw地图中点状要素向GIS平台共享的难题，提高数据资源的利用率。包括：首先指定CorelDraw地图中需要转换的要素的符号图层、注记图层，以及控制点图层；使用CorelDrawVBA提供的对象模型接口，从地图成果的符号图层中获取专题点状要素的空间数据集，对应专题的注记图层获取属性数据集，从提前添加的控制点图层获取控制点信息；然后使用匹配算法为每个要素的几何数据与属性数据建立连接关系，并进行人工检核；最后使用仿射变换完成平面坐标到地理坐标的转换，得到真实可用的专题点状要素GIS成果，导入到SuperMap平台。本申请能够较为准确和快速地将CorelDraw地图中的点状要素转换到SuperMap平台进行展示分析等操作。

主权项：1.一种使用VBA将CorelDraw地图中点状要素转换到SuperMap的方法，其特征在于，包括以下几个步骤：S1：指定CorelDraw地图中需要转换的要素的符号图层、注记图层，以及控制点图层；S2：使用CorelDrawVBA提供的对象模型接口，从地图成果的符号图层中获取专题点状要素的空间数据集，对应专题的注记图层获取属性数据集，从而获取注记形状的最小外接矩形坐标集，从提前添加的控制点图层获取控制点信息；其中，点状要素的空间数据集和注记形状的外接矩形坐标集用于步骤S3的匹配算法，控制点信息用于步骤S4中的坐标转换过程；S3：使用匹配算法为每个点状要素的几何数据与属性数据建立连接关系，即建立实体的空间数据与属性数据的匹配关系，并对匹配结果进行人工检核；步骤S3中建立点状要素的几何数据与属性数据的连接问题即转变为寻找距离符号最近的注记，亦抽象为计算点状要素符号的中心点到注记的最小外接矩形面的最短距离；其中点到面的最短距离是点到组成面的所有边线的最短距离，而计算点到线的最短距离，则是用线段两端的垂线将点线所在平面分为三部分，当点落入相应区域时，则代入对应的距离公式，最终简化到计算点与点的距离比较；当要素的坐标点Px’,y’落在注记的外接矩形面ABCD内部或边界上时，最短距离为0，即认为该注记与符号完全匹配；落在矩形的长宽延长区域，只需要对相应轴向的坐标进行减法运算；落在角点的延伸区域时，计算点P到对应角点的空间距离即为最短距离；循环计算空间数据集中每个空间点位与注记集中所有外接矩形面的距离，计算出离该点最近的面，即认为该点要素的符号与该面代表的注记属性匹配；S4：使用坐标转换中的仿射变换方法完成平面坐标到地理坐标的转换，得到真实可用的专题点状要素GIS成果，导入到SuperMap平台。

全文数据：

权利要求：

百度查询： 武汉大学 一种使用VBA将CorelDraw地图中点状要素转换到SuperMap的方法

免责声明
1、本报告根据公开、合法渠道获得相关数据和信息，力求客观、公正，但并不保证数据的最终完整性和准确性。
2、报告中的分析和结论仅反映本公司于发布本报告当日的职业理解，仅供参考使用，不能作为本公司承担任何法律责任的依据或者凭证。

阅读全文 双屏查看 官方信息 专利公告 收藏专利 下载PDF 下载WORD