《在AutoCAD中实现面积的快速量测.pdf》由会员分享，可在线阅读，更多相关《在AutoCAD中实现面积的快速量测.pdf（3页珍藏版）》请在三一文库上搜索。
1、文章编号 : 0494 -0911( 2002)04 - 0033 -02中图分类号 : P271文献标识码 : B 在 AutoCAD 中实现面积的快速量测 龚有亮 1, 曹歆宏2, 翟 翊 1 ( 1. 解放军信息工程大学测绘学院 , 河南 郑州 450052; 2. 河南省遥感测绘院, 河南 郑州 450008) Realizing Rapid Area Measurement in AutoCAD GONGYou - liang, CAO Xin - hong, ZHAI Yi 摘要 :提出一种在AutoCAD 中快速量测面积的方法, 只要在图斑内部任意指定一个点, 就可以 自动获得图
2、斑的面积和图斑边界拐 点的坐标 , 增强了AutoCAD的面积量算功能, 操作简便 , 提高了量测效率。 关键词 :AutoCAD; 面积 ; 数字地图 ; 地籍测量 收稿日期 : 2001 -12-18;修回日期 : 2002 -01-09 作者简介 : 龚有亮 ( 1970 -) , 男, 内蒙古察右后旗人, 讲师, 硕士生 , 主要研究方向为数字测图。 一、 引言 AutoC AD 具有强大的图形绘制和编辑功能, 易 于进行二次开发, 被广泛用于编辑各类数字地图。 在地籍测量、土地详查等项目中会大量遇到从DWG 格式数字图中量测图斑面积的工作。这时要用到 AutoCAD 的面积查询命令(
3、 area), 该命令有两种使用 方式: 一是按顺序输入或指定多边形图斑的所有拐 点,就可以得到其面积; 二是在屏幕上选择一个自我 封闭的图元 ( 例如封闭的多义线、 圆等 ) , 即可查询出 图元面积。实际上, 大多数图斑由多个图元围成, 量 测面积时必须按照第一种方式逐个捕捉图斑拐点。 这样做有 3 点不足 : 一是容易产生错误, 如漏掉不明 显的拐点 ; 二是图斑拐点的数量大, 且大部分被多个 图斑共用 , 需重复输入 , 工作量大 , 速度慢 ; 三是只能 查询到图斑面积, 不能记录图斑边界的拐点坐标。 本文提出一种快速面积量测方法, 只要在图斑内部 指定一个点 , 就可以自动获得图斑
4、边界拐点的坐标 和图斑的面积 , 增强了 AutoCAD的面积量算功能, 克 服了上述 3 个缺点。 二、 快速面积量测方法 1. 基本原理 AutoC AD 有一个边界创建命令( boundary), 如果 若干图元围成一个封闭区域, 只需要在区域内指定 一个点 , 该命令就能够搜索到区域的边界, 并创建一 条封闭的多义线或是一个面域作为边界。我们只要 提取这个边界图元的面积和拐点坐标, 就能得到我 们需要的数据。最简单的情况下生成的边界线是由 直线段组成的封闭多义线, 下面的 VBA 程序段说明 了创建边界并提取数据的过程。 Dim P0As Variant. 用户指定的图斑内点 Dim
5、PlineObjAs AcadLWPolyline . 边界曲线 Dim Area As Double. 面积 Dim X( ) As Double, Y( ) As Double. 坐标 Dim PnAs Integer, i As Integer Dim PointTmpAs Variant P0 = ThisDrawing.Utility. GetPoint(, / 请在图斑 内指定一点 0). 得到图斑内一点 ThisDrawing . SendCommand (/ -boundary 0 另一 种方法是通过做辅助线, 把外围图斑分割成几个区 域,分别量取面积后累加得到结果。现在我们有
6、更 简单的办法 , 创建边界时只要把点指定在外围图斑 的范围内 , 即可得到图2 中的外部边界线和两条内 部边界线 , 分别查询其所围面积, 用最大的面积减去 其他的面积之和, 就是外围图斑面积。这个过程可 以用程序实现 , 操作起来与不是图斑嵌套的情况没 有任何不同。 图 2图斑嵌套 4. 图斑边界拐点的排列 一般来说 , 当我们得到图斑边界拐点坐标之后, 总希望这些点以某种顺序排列, 比如从最西北方向 的点开始顺时针排列。实验表明, 用以上方法获取 的拐点序列一般按逆时针方向排列, 但是当图斑嵌 套时得到的内部边界拐点按顺时针方向排列, 但不 知道这一经验规律是否绝对可靠。可靠的方法是我
7、们自己判断拐点序列的排列顺序, 再整理为我们要 求的顺序。判断的方法如图3 所示 ,首先找到最西 边的点 , 在图 3 中是 3 号点 , 则从该点前一个点开始 的连续 3 个点 ( 在图 3 中是点2、 3、 4) 的排序就代表 了整个拐点序列的排序; 而这 3 个点的排序可以通 过比较坐标方位角判断出来: 若中间点到前点的坐 标方位角小于中间点到后点的坐标方位角, 则为逆 时针 排列 , 反 之为顺时针排列。在图3 中 A32小于 A34, 因此为逆时针排列。 图 3判断拐 点顺序 5. 从图上自动获取点名 图斑边界的许多拐点都有点名( 比如界址点的 编号 ) , 当我们得到拐点坐标之后,
8、 也希望能够从图 上提取出点名。假设点名都以/ TEXT0类型图元的 形式放在某一图层上, 我们就可以建立一个选择集, 包含当前图形窗口范围内所有该图层上的/ TEXT0 图元 , 作为候选点名的集合。对于每一个拐点, 计算 出该点到每个候选点名中心的距离, 找到一个距离 最近的候选点名, 如果该文本图元字符数目合适( 例 如少于 6个字符 ), 而且到拐点的距离也合适( 例如 小于文本图元宽度的3 倍), 就可以提取该文本图元 的字符串作为点名。只要图上点名注记位置准确, 该方法提取点名的成功率很高。 6. 数据的存储和资料整理 我们可以把面积量测得到的数据存储在数据文 件中 , 以利于后续
9、的面积分类统计以及生成报表等 工作 ; 如果量测得到的数据量很大, 而且这些数据要 被某些单位存档或被某些软件系统使用, 则最好存 储在数据库中, 以便于管理和数据共享。面积量算 后的资料整理工作本来也是很繁重的, 这里我们就 轻松多了 , 可以通过编程直接在DWG文件中生成 ( 下转第 37 页) 34测绘通报2002年第 4 期 图 2D2点垂直形变与线性拟合 位于塔体外圈的其他3 个水准点均有类似的图 形,这些点均位于塔基的桩排式地下连续墙内,由于 可能的基岩风化和当时的气象因素引起了这些点的 整体微 量下沉 , 造 成了前面提到的/ 突变 0。与 D2 相比 , 位于塔体内圈的D6及其
10、他 3 个水准点均无该 / 突变0现象 ( 图 3) , D6点观测曲线在1. 3 mm之 内波动 , 主要反映了季节性因素的影响。 图 3D6点垂直形变与线性拟合 综上所述 , 塔基水准观测的工作基点相对参考 基点基本稳定,塔基各观测点相对工作基点均无明 显变化 , 由此可以推论各观测点之间亦无相对变化。 多年的塔基观测资料证实, 1979 1985 年之间 的塔基加固工程是非常成功的, 加固后的塔基基本 已成一体 , 没有明显不均匀沉降现象,由此也可以认 为 , 影响虎丘塔倾斜的主要因素之一的塔基问题已 基本解决。 参考文献 : 1钱玉成 . 虎丘塔的维修加固与变形测量J.文物保 护 与考
11、古科学 , 1994,6( 2): 27 - 31. 2袁铭, 刘争齐 ,黄翔. 苏州市 地面垂直形 变场的 时 空特征 J.工程勘察 , 2000,( 4). (上接第 34页 ) 界址点成果表、 土地分类面积统计表等各种报表。 三、 面积量测过程中的注意事项 1. 实验证明 , boundary命令只能在当前图形窗 口显示的范围内搜索图斑的边界, 因此 , 量测时必须 使图斑完整地显示在窗口内, 否则将无法找到边界。 此外, 图斑必须是由若干图元围成的严格的封闭区 域,边界上不能有开口, 否则将得到错误的边界或找 不到边界 ; 这就要求绘图时尽量使用点位捕捉功能, 使图斑确实封闭。 2.
12、为减少图中与面积量算无关的图元对量测 工作的干扰 , 量测时需要关闭那些无关的图层,或者 另存一个新文件专门用于面积量测, 此文件中只保 留面积量测所需要的图元。而且, 为了加快bound - ary 命令搜索图斑边界的速度, 量测时图形窗口内除 了要量测的那个图斑之外, 尽量不要显示图斑范围 之外的图元 , 可以通过放大图斑区域并结合调整图 形窗口边框来达到这一目的。 3. 为了直观地看到量测结果正确与否, 同时为 了避免重复量测和漏掉量测某些图斑, 应该用醒目 的颜色准确绘出搜索到的图斑边界线, 并用图案填 充图斑内部。这一工作由程序实现。当然这些图元 应绘在一个特定的图层上,以便于不需要时将其关 闭或删除。 四、 结束语 笔者在 AutoCAD2000 中文 版中 , 利用 AutoCAD 内置的VBA 语言 编程 , 实 现了本文所述的全部功 能。实验证明,用该方法量测面积速度快, 量测结果 准确可靠 , 操作简便 ,大大提高了量测效率。此方法 可以广泛应用于地籍测量、土地详查、 房地产测量、 土地分割测量等需要在数字图上量测面积的工作当 中。 参考文献 : 1王钰. 用 VBA 开 发 AutoCAD2000应用 程序 M . 北 京: 人民邮电出版社,1999. 372002年第 4 期测绘通报