上传者: whc2008
|
上传时间: 2019-12-21 21:53:45
|
文件大小: 36KB
|
文件类型: docx
宗地图绘制程序
宗地图绘制是宅基地与集体建设用地确权登记发证项目中的一个重要步骤。在完成地籍总图后,需要批量绘制宗地图,以确保农村宅基地与集体建设用地的使用权和相关合法权益受到保护。然而,现有的绘图软件要么操作复杂,要么不能满足要求。本文介绍了一个解决这个问题的宗地图绘制程序,该程序独创性地解决了CAD地图截块儿与文字压盖问题。
绘制宗地图需要解决以下几个问题:
1. 绘制宗地图框
2. 获取宗地图表头信息
3. 地图截块儿
4. 计算合适的比例尺并缩放宗地图
5. 生成界址点号与边长
6. 生成四至
其中,地图截块儿是宗地图绘制的关键一步。地图截块儿是指在一张完整的图中截取我们需要的一块儿另外存放。这个过程牵扯到不同类型地物的复制,地物主要分点状地物、线状地物和已经连接成块儿的块状地物。
为了解决地图截块儿问题,作者使用了以下思路:首先获取线性地物的坐标,然后判断哪些坐标在方框内,把在方框内相连的坐标生成多段线,然后添加和截取地物一样的扩展属性,线性地物就截取了。
在代码实现方面,作者使用了Visual Basic语言,使用了For循环和If判断语句来实现地图截块儿的算法。下面是解决此问题的源代码:
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))
...
End If
End If
...
通过这个宗地图绘制程序,可以批量绘制宗地图,解决了CAD地图截块儿与文字压盖问题,提高了绘图效率和准确性,为农村宅基地与集体建设用地确权登记发证项目提供了有力的技术支持。