一个很好的批量绘制宗地图程序
1星 需积分: 49 77 浏览量
2017-01-06
16:06:56
上传
评论 15
收藏 36KB DOCX 举报 
一个很好的批量绘制宗地图程序
周 翔
1
王海超
2
文茂华
3
1 长江空间信息技术工程有限公司（武汉）（湖北省武汉市 430000）
2 长江空间信息技术工程有限公司（武汉）重庆分公司（重庆市 402120）
3 长江空间信息技术工程有限公司（武汉）清江项目部（武汉市 430000）
摘要: 宅基地与集体建设用地确权登记发证项目在绘制完成地籍总图后要批量绘制宗地图，作者为了解
决这个问题开发了自己的宗地图绘制程序并且独创性的解决了 CAD 地图截块儿与文字压盖问题。
关键词： 宗地图；地图截块；文字压盖
随着我国社会经济的发展，农村集体土地的
施工制度在不断改革，同时为了保护所有人的使
用权及相关的合法权益，做好农村宅基地与集体
建设用地的确权登记工作，并进行相应证件的发
放是非常必要的。宅基地与集体建设用地确权登
记发证项目在绘制完成地籍总图后要批量绘制宗
地图，而目前的绘图软件要么操作复杂要么不能
很好的满足要求，作者在实施过程中开发了自己
的程序，并且用自己的方法解决了 CAD 地图截块
与字体压盖问题。实现批量绘制宗地图需要解决
下面几个问题：
1、绘制宗地图框；
2、获取宗地图表头信息；
3、地图截块儿；
4、计算合适的比例尺并缩放宗地图；
5、生成界址点号与边长；
6、生成四至。
这其中我们着重介绍“地图截块儿”和“生成界
址点号与边长”。一、地图截块儿：顾名思义也就
是在一张完整的图中截取我们需要的一块儿另外
存放，这其中牵扯到不同类型地物的复制，地物
主要分点状地物，线状地物和已经连接成块儿的
块状地物。对于点状地物我们只要判断是否在我
们截取的范围内就可以了，而线状地物是难点，
如图 1：把方框中的小路截取处来，如果是一张纸
的话直接剪开就可以了，但是电子的地图却不行 。
解决问题的思路是这样的，首先获取线性地物的
坐标，然后判断哪些坐标在方框内，把在方框内
相连的坐标生成多段线，然后添加和截取地物一
样的扩展属性，线性地物就截取了。
图 1
图 2
方法介绍起来简单，解决此问题的难点在于代码
的编写，下面是解决此问题的源代码：
For i = 0 To m
Pt(0) = Coords(2 * i)
Pt(1) = Coords(2 * i + 1)
If isPointIsInTangle(Pt, zxPt, ysPt) Then
n = n + 1
ReDim Preserve Points(2 * n + 1) As
Double
Points(2 * n) = Pt(0) + (Point2(0) -
Point1(0))
Points(2 * n + 1) = Pt(1) + (Point2(1) -
Point1(1))
If i = m Then
If n >= 1 Then
If Obj.closed = True And Points(2 *
n) = Coords(2 * m) + (Point2(0) –Point1(0))
Then
ReDim Pts2(UBound(Points))
For j = 0 To UBound(Points)
Pts2(j) = Points(j)
评论2
最新资源