基于ArcGIS VBA的宗地四至生成法3
Private Sub CommandButton1_Click()
'////////////////////////基础配置////////////////////////////////
Dim pMxDoc As IMxDocument '代表本文档数据
Dim pMap As IMap '代表激活的地图
Dim pFeaLayer As IFeatureLayer '代表地图中的图层，这里仅有一个Dim pFeaClass As IFeatureClass '代表图层中的要素类数据
'///////////////////////////////////////////////////////////////
Dim pQueryF1 As IQueryFilter '查询条件1
Dim pQueryF2 As IQueryFilter '查询条件2
Dim pFeaCursor1 As IFeatureCursor '要素游标1，提取要素数据使用Dim pFeaCursor2 As IFeatureCursor '要素游标2，提取要素数据使用Dim pFeature1 As IFeature '要素1对应变量
Dim pFeature2 As IFeature '要素2对应变量
Dim pPoint As IPoint '存储对象中心点
Dim pArea As IArea '求取中心点辅助变量
Dim pPoint2 As IPoint '求取对象2的中心点
Dim pArea2 As IArea '求取对象2的中心点
Dim pLineFea1 As IPolyline
Dim pLine As IPolyline
Dim pPoly As IPolygon
Dim pPoColl As IPointCollection
Dim sSizhi(4) As String '存储宗地四至信息
sSizhi(0) = "荒地" '东至
sSizhi(1) = "荒地" '西
sSizhi(2) = "荒地" '南
sSizhi(3) = "荒地" '北
Dim dSizhi(4) As Double '存储宗地四至坐标
On Error GoTo ErrorHandler:
Set pMxDoc = ThisDocument
Set pMap = pMxDoc.FocusMap
Set pFeaLayer = https://www.360docs.net/doc/e08571823.html,yer(0)
Set pFeaClass = pFeaLayer.FeatureClass
Set pQueryF1 = New QueryFilter
Set pQueryF2 = New QueryFilter
pQueryF1.WhereClause = "权利人='" + "黄永和'" '重置一次循环对象集，实验
'Set pFeaCursor1 = pFeaClass.Search(pQueryF1, False)
'Set pFeaCursor1 = pFeaClass.Update(pQueryF1, False)
Set pFeaCursor1 = pFeaClass.Update(Nothing, False)
Set pFeature1 = pFeaCursor1.NextFeature
Set pPoint = New Point '中心点对象实例化
Set pPoint2 = New Point '中心点2对象实例化
Set pLineFea1 = New Polyline
Set pLine = New Polyline
'-----------------------------------------------------------------------------------------------
Dim lNumFeat As Long
lNumFeat = pFeaClass.FeatureCount(Nothing)
Dim lNumNow As Long
lNumNow = 0
'-----------------------------------------------------------------------------------------------
Do While Not pFeature1 Is Nothing
'求取对象中心坐标
Set pArea = pFeature1.Shape
pArea.QueryCentroid pPoint
dSizhi(0) = pPoint.X
dSizhi(1) = pPoint.X
dSizhi(2) = pPoint.Y
dSizhi(3) = pPoint.Y
'pQueryF2.WhereClause = "权利人<>'" + "黄永和'" + pFeature1.Value(pFeature1.Fields.FindFieldByAliasName("权利人"))
pQueryF2.WhereClause = "权利人<>'" + pFeature1.Value(pFeature1.Fields.FindFieldByAliasName("权利人")) + "'"
Set pFeaCursor2 = pFeaClass.Search(pQueryF2, False) '重置二次循环对象集，实验
'Set pFeaCursor2 = pFeaClass.Search(Nothing, False) '重置二次循环对象集，针对全部数据
Set pFeature2 = pFeaCursor2.NextFeature
Do While Not pFeature2 Is Nothing '000
Dim pTopo1 As ITopologicalOperator '面转为线
Dim pTopo2 As ITopologicalOperator
Set pTopo1 = pFeature1.Shape
Set pLineFea1 = pTopo1.Boundary
Set pTopo1 = pLineFea1
Set pLine = pTopo1.Intersect(pFeature2.Shape, esriGeometry1Dimension)
If pLine.IsEmpty = False Then
Set pArea2 = pFeature2.Shape
pArea2.QueryCentroid pPoint2
If (pLine.FromPoint.X + pLine.ToPoint.X) / 2 > dSizhi(0) And pPoint2.Y < IIf(pLine.FromPoint.Y < pLine.ToPoint.Y, pLine.ToPoint.Y, pLine.FromPoint.Y) And pPoint2.Y > IIf(pLine.FromPoint.Y > pLine.ToPoint.Y, pLine.ToPoint.Y, pLine.FromPoint.Y) Then '判读是否为东至
dSizhi(0) = (pLine.FromPoint.X + pLine.ToPoint.X) / 2
sSizhi(0) = pFeature2.Value(pFeature2.Fields.FindFieldByAliasName("权利人"))
End If
If (pLine.FromPoint.X + pLine.ToPoint.X) / 2 < dSizhi(1) And pPoint2.Y < IIf(pLine.FromPoint.Y < pLine.ToPoint.Y, pLine.ToPoint.Y, pLine.FromPoint.Y) And pPoint2.Y > IIf(pLine.FromPoint.Y > pLine.ToPoint.Y, pLine.ToPoint.Y, pLine.FromPoint.Y) Then '判读是否为西至
dSizhi(1) = (pLine.FromPoint.X + pLine.ToPoint.X) / 2
sSizhi(1) = pFeature2.Value(pFeature2.Fields.FindFieldByAliasName("权利人"))
End If
If (pLine.FromPoint.Y + pLine.ToPoint.Y) / 2 < dSizhi(2) And pPoint2.X < IIf(pLine.FromPoint.X < pLine.ToPoint.X, pLine.ToPoint.X, pLine.FromPoint.X) And pPoint2.X > IIf(pLine.FromPoint.X > pLine.ToPoint.X, pLine.ToPoint.X, pLine.FromPoint.X) Then '判读是否为南至
dSizhi(2) = (pLine.FromPoint.Y + pLine.ToPoint.Y) / 2
sSizhi(2) = pFeature2.Value(pFeature2.Fields.FindFieldByAliasName("权利人"))
End If
If (pLine.FromPoint.Y + pLine.ToPoint.Y) / 2 > dSizhi(3) And pPoint2.X < IIf(pLine.FromPoint.X < pLine.ToPoint.X, pLine.ToPoint.X, pLine.FromPoint.X) And pPoint2.X > IIf(pLine.FromPoint.X > pLine.ToPoint.X, pLine.ToPoint.X, pLine.FromPoint.X) Then '判读是否为北至
dSizhi(3) = (pLine.FromPoint.Y + pLine.ToPoint.Y) / 2
sSizhi(3) = pFeature2.Value(pFeature2.Fields.FindFieldByAliasName("权利人"))
End If
End If
Set pFeature2 = pFeaCursor2.NextFeature
Loop '002 pFeature1.Value(pFeature1.Fields.FindFieldByAliasName("东至")) = sSizhi(0)
pFeature1.Value(pFeature1.Fields.FindFieldByAliasName("西至")) = sSizhi(1)
pFeature1.Value(pFeature1.Fields.FindFieldByAliasName("南至")) = sSizhi(2) pFeature1.Value(pFeature1.Fields.FindFieldByAliasName("北至")) = sSizhi(3) pFeaCursor1.UpdateFeature pFeature1
Set pFeature1 = pFeaCursor1.NextFeature
'-------------------------------------------------
lNumNow = lNumNow + 1
TextBox1.Text = Str(lNumNow)
'-------------------------------------------------
Loop
Exit Sub
土地出让合同(宗地出让)新标准样本
合同编号：WU-PO-7794-276 土地出让合同（宗地出让）新标准 样本 In Order T o Protect The Legitimate Rights And Interests Of Each Party, The Cooperative Parties Reach An Agreement Through Common Consultation And Fix The Responsibilities Of Each Party, So As T o Achieve The Effect Of Restricting All Parties 甲方：_________________________ 乙方：_________________________ 时间：________年_____月_____日 A4打印/ 新修订/ 完整/ 内容可编辑
土地出让合同（宗地出让）新标准 样本 使用说明：本合同资料适用于协作的当事人为保障各自的合法权益，经过共同协商达成一致意见并把各方所承担的责任固定下来，从而实现制约各方的效果。资料内容可按真实状况进行条款调整，套用时请仔细阅读。 出让人：_________ 地址：_________ 邮政编码：_________ 电话：_________ 法定代表人：_________ 职务：_________ 受让人：_________ 地址：_________ 邮政编码：_________ 电话：_________
法定代表人：_________ 职务：_________ 第一章总则 第一条根据《中华人民共和国土地管理法》、《中华人民共和国城市房地产管理法》、《中华人民共和国合同法》和其他法律、行政法规、地方性法规，双方本着平等、自愿、有偿、诚实信用的原则，订立本合同。 第二条出让人根据法律的授权出让土地使用权，出让土地的所有权属中华人民共和国。国家对其拥有宪法和法律授予的司法管辖权、行政管理权以及其他按中华人民共和国法律规定由国家行使的权力和因社会公众利益所必需的权益。地下资源、埋藏物和市政公用设施均不属于土地使用权出让范围。 第二章出让土地的交付与出让金的缴纳
利用ArcGIS水文分析工具提取河网水系的方法.docx
利用ArcGIS水文分析工具提取河网水系的方法 DEM包含有多种信息，ArcToolBox提供了利用DEM提取河网的方法，但是操作比较烦琐（帮助可参看Hydrologic analysis sample applications），今天结合我自己的使用将心得写出来与大家分享。提取河网首先要有栅格DEM，可以利用等高线数据转换获得。在此基础上，要经过洼地填平、水流方向计算、水流积聚计算和河网矢量转化这几个大步骤。 1．洼地填平 DEM洼地（水流积聚地）有真是洼地和数据精度不够高所造成的洼地。洼地填平的主要作用是避免DEM的精度不够高所产生的（假的）水流积聚地。洼地填平使用ArctoolBox->Spatial Analysis Tools->Hydrology -> Fill工具。 2．水流方向计算 水流方向计算就可以使用上一步所生成的DEM为源数据了（如果使用未经洼地填平处理的数据，可能会造成精度下降）。这里主要使用ArctoolBox->Spatial Analysis Tools->Flow Direction 工具。输入的DEM 采用第一步的Fill1_exam1
3．水流积聚计算 这里主要使用ArctoolBox->Spatial Analysis Tools->Flow Accumulation 工具流向。栅格数据就是第二步所获得的数据（FlowDir_fill1）。可以看到，生成的水流积聚栅格已经可以看到所产生的河网了。现在所需要做的就是把这些河网栅格提取出来。可以把产生的河网的支流的象素值作为阀值来提取河网栅格。 4．提取河网栅格 使用spatial analyst中的栅格计算器，将所有大于河网栅格阀值的象素全部提取出来。至于这个阀值是多少因具体情况而定。通常是要大于积聚计算后得到栅格的最低河流象素值。这里采用的是500这个值。最后生成只有0、1值的栅格数据。其中1表示是河网，0是非河网。 5．生成河网矢量 这里主要使用ArctoolBox->Spatial Analysis Tools->Stream to Feature工具.Input Stream raster 为第四步只有0、1值的河网栅格。流向栅格使用第二步所生成的栅格数据。 6．矢量河网处理 由于Stream to Feature工具.将所有栅格象素均转为矢量线段。所以要进行处理，方法是利用属性查询的方法把所有GRID_CODE为1的全部选择出来。
ArcGIS环境下基于DEM的水文特征提取研究
论文题目ArcGIS环境下基于DEM的水文特征提取研究姓名 所在学院 专业班级 学号109042010006 指导老师 二○一三年一月四日
数字高程模型10GIS姜婷109042010006 ArcGIS环境下基于DEM的水文特征提取研究 ——以闽江流域建溪水系为例 姜婷 （福建师范大学地理科学学院，福建省福州市350108） 摘要：选择闽江流域建溪水系为研究对象,以数字高程模型DEM(Digit Elevation Models)为基础,利用ArcGIS软件的水文分析工具从DEM数据中提取研究区域的流域水文特征的详细过程。主要包括:DEM的生成和预处理、水流方向的确定、水流累积量提取、河网的提取和子流域的划分。结果表明，利用该方法提取的河网与利用手工方法提取的河网基本一致，从而证明该方法具有较高的精度。 关键词：数字高程模型；水文特征；ArcGIS；提取；建溪水系 21世纪以来水资源危机日益突出，水文模型已经成为目前国内外水文学研究的热门课题。随着“3S”技术的发展，为水文科学注入了新的血液。目前水文模拟技术趋向于将水文模型同GIS 与RS集成，以便充分利用GIS在数据管理、空间分析及可视性方面的功能。数字高程模型DEM (Digital ElevationModel)是用一组有序数值阵列形式表示地面点的平面坐标(x,y)和高程z的一种实体地面模型。它包含了大量的地理信息,是构成GIS的基础数据，其用途十分广泛,利用DEM可以提取流域的许多重要水文特征参数，如坡度、坡向、水沙运移方向、汇流网络、流域界线等。目前,利用DEM进行流域分析的工具很多,ArcGIS的水文分析模块(Hydro logymodel)是美国环境系统研究所公司(ESRI)为ArcGIS推出的一个水文分析模块,主要用于地形和河流网系的提取和分析,实现地形模型可视化,其强大的流域特征分析功能可以满足各种流域DEM处理的需要。 1流域概况 建溪是闽江上游三大溪中最大的溪流，是一个树枝状水系。水系源头在武夷山脉和仙霞岭余脉，南平以上流域面积16396平方公里，占闽江流域的27%。河系贯通崇安、建阳、浦城、松溪、政和、建瓯、南平七个县市。河流总长635.6公里，流域内有大小溪流120多条。流域内气候温和湿润，处于高雨区，年平均降雨量1800～2200毫米。建溪的年均流量每秒521立方米，年径流量164亿立方米，约占闽江总流量的1/3。流域内山区海拔差异明显,因而该水系具有河流比降大、源短流急、易发洪水等特点。本文基于该流域的数字高程提取流域水文信息为不同尺度的水文模型提供参数,并可满足各种水文模拟的应用需求。 2基于DEM的流域水文信息提取 流域水文信息是进行水文模拟的必要信息，提取流域信息也是构建现代化水文模型、进行水文模拟以及其他相关研究的前提。作为研究水文模型和水文状态变量空间分布的基础数据,DEM 的一个重要用途就是提取地貌指数。本文采用ArcGIS中的水文分析模块进行流域水文信息的提取。流域水文特征提取的主要过程包括：DEM 的生成和预处理、水流方向的确定、汇流累积量的计算、河网的提取和子流域的划分。 2.1DEM数据的来源和预处理 本文的栅格DEM数据采用国际科学数据服务平台（https://www.360docs.net/doc/e08571823.html,/index.jsp）提供的SRTM90米空间分辨率基础高程的数据。根据闽江流域建溪水系的经纬度坐标,确定出该数据的列号为60行号为7。 首先利用ArcGIS软件切出建溪流域所在区域的DEM，其中包括崇安、建阳、浦城、松溪、政和、建瓯、南平七个县市，从而生成本实验所需的DEM数据，见图1。
宗地四至提取方法的分析与研究
宗地四至提取方法的分析与研究 发表时间：2017-04-19T15:46:57.217Z 来源：《基层建设》2017年2期作者：田方方1 郭甲腾2 邓振民1 [导读] 摘要：本文在农村土地承包经营权确权登记的背景下，分析与研究了宗地四至的提取方法，采用四方向锥形模型描述宗地的空间方向关系，给出了两种判断宗地空间方向关系的方法，并对提出的两种方法进行了比较说明，实现了农村土地承包经营权确权登记中宗地四至的自动化提取。 1山东中基地理信息监理有限责任公司，250000；2 东北大学沈阳市和平区三号巷 110819 摘要：本文在农村土地承包经营权确权登记的背景下，分析与研究了宗地四至的提取方法，采用四方向锥形模型描述宗地的空间方向关系，给出了两种判断宗地空间方向关系的方法，并对提出的两种方法进行了比较说明，实现了农村土地承包经营权确权登记中宗地四至的自动化提取。 关键词：宗地四至；空间方向关系；四方向锥形模型；确权登记 Abstract：This paper studies the methods for extracting relative location of adjoining parcels. and describes the spatial direction relations of parcels by four directions cone-shaped model, presents and compares two methods to judge the spatial direction relations of parcels, which realize the automated extraction of relative location of adjoining parcels in the ownership register for rural land contract and management rights. Key words: relative location of adjoining parcels; spatial direction relations; four directions cone-shaped model; ownership register 0 引言 宗地是地籍调查单元，为土地权属界址线所封闭的地块，即地籍调查和土地登记的基本土地单元[1]。确定宗地的位置、权属、界线等是土地确权的重点工作。其中，四至作为描述宗地位置的重要参数，四至的获取就显得尤为重要。四至是每宗地四邻的名称[2]。宗地四至应填写相邻宗地的土地使用权人、所有权人名称；与道路、河流等线状地物相邻的填写地物名称；与空地、荒山、荒滩等未确定使用的国有土地相邻的，应准确描述相应地物、地貌名称[3]。目前，国土建库方面的软件都未能提供较好的宗地四至提取方法。尽管有些CAD插件提供了生成宗地四至的功能，但是它们生成宗地四至的方法需要手工提前输好CAD的扩展属性信息，如手工提前输入的界址线邻宗地号信息等[4]。目前开展的农村土地承包经营权确权登记工作工期紧、任务重，其中提取四至的任务尤其繁重，为保证项目按时、保质、保量的完成，本文就提取四至这一任务进行了优化，打破了手工录入四至的传统作业流程，实现了四至提取的自动化。 １宗地空间方向关系 1.1 宗地空间方向关系的划分 在研究宗地四至提取方法之前，首先要明确宗地四至的方向划分，即宗地的空间方向关系。在应用空间方向关系时，一个最基本的问题是如何有效地建立描述空间方向关系的表达模型。本文采用四方向锥形模型来描述宗地的空间方向关系。 四方向锥形模型是以某一空间目标为参考目标，以东西南北方向线为轴将空间目标及周围的区域等分成四个方向区域来定义方向关系[5]，如图1a所示。以参考点O为中心，将空间区域分为E、S 、W 、 N四个方向区域，用其他空间目标与这些方向区域间的位置关系来描述空间目标间的方向关系，如图1b。源目标B相对于参考目标A的方向关系为: dir(A,B) = E,即B在A的东边。 四方向锥形模型适合于相对于空间目标形状和大小距离较远的空间目标间方向关系的判定[6]，基于四方向锥形模型的这一弊端，本文在研究四方向锥形模型的基础上，提出了中心点判断方法和垂足-中心点判断方法。 1.2 宗地空间方向关系的判断 1. 2.1 中心点判断方法 中心点判断方法，即基于四方向锥形模型空间方向关系描述，将宗地抽象为两个点，即将宗地抽象为宗地的中心点，根据两点连线在四方向锥形模型的显示区域判断宗地间的空间方向。 下面以相邻的两个宗地，宗地A与宗地A1为例进行说明，其中宗地A为目标宗地，判断A的四至，即A1在A的哪个方位。宗地A的中心点为O，宗地A1的中心点为O1，O、O1连线构成了线段OO1。由四方向锥形模型的几何特征可以看出，只要判断出线段OO1的斜率，即可判断O、O1的空间方向关系，即为宗地A、A1的空间方向关系。 线段OO1的斜率，当K>1时，两个宗地的方向是南北向，反之，则为东西向。如果是南北向，则比较两中心点Y值的大小，Y值大的在北边，反之则在南边；如果是东西向，则比较两中心点X值的大小，X值大的在东边，反之则在西边。如图2a所示。宗地A1在宗地A的东边。
基于ArcGIS VBA的宗地四至生成法
'基本思想：求取地块中心点，以中心点向正南正北正西正东发送射线，求取与四条线相交的四个地块即为四至地块 Private Sub CommandButton1_Click() Dim pMxDoc As IMxDocument '代表本文档数据 Dim pMap As IMap '代表激活的地图 Dim pFeaLayer As IFeatureLayer '代表地图中的图层，这里仅有一个 Dim pFeaClass As IFeatureClass '代表图层中的要素类数据 Dim pQueryF1 As IQueryFilter '查询条件1 Dim pQueryF2 As IQueryFilter '查询条件2 Dim pFeaCursor1 As IFeatureCursor '要素游标1，提取要素数据使用 Dim pFeaCursor2 As IFeatureCursor '要素游标2，提取要素数据使用 Dim pFeature1 As IFeature '要素1对应变量 Dim pFeature2 As IFeature '要素2对应变量 Dim pRelation As IRelationalOperator '空间关系分析使用 Dim pTopo As ITopologicalOperator '求交空间分析使用 Dim pPoint As IPoint '存储对象中心点 Dim pArea As IArea '求取中心点辅助变量 Dim pIntersectGeo As IGeometry Dim pPoColl As IPointCollection Dim pDLine As IPolyline '东至水平线 Dim pXLine As IPolyline '西至水平线 Dim pNLine As IPolyline '南至水平线 Dim pBLine As IPolyline '北至水平线 Dim pTempLine As IPolyline '------------------- Dim pDPoint As IPoint '东至交点 Dim pXPoint As IPoint '西至交点 Dim pNPoint As IPoint '南至交点
ArcGIS Hydrology水文分析-基本原理
ArcGIS Hydrology水文分析功能介绍(1)-基本原理 1.基本原理 DEM是数字高程模型的英文简称(Digital Elevation Mode)，是流域地形、地物识别的重要原始资料。自20世纪60年代以来,在利用数字高程模型DEM提取流域水文特征,模拟地表水文过程方面,国内外都开展了大量的研究。 1.1基于DEM进行流域分析的原理 从DEM提取流域特征，一个良好的流域结构模式是确定算法的前提和关键。1967年ShreveL¨描述的流域结构模式一直被后来的水文学者所引用．并设计了一些成熟的算法。 Shreve使用一个具有一个根的树状图来描述流域结构(如图 1 流域结构模式图所示)。在这个结构中，主要包括两个部分，一部分是结点集，一部分是界线集。沟谷结合点和沟谷源点共同组成一个沟谷结点集。所有的沟谷段组成沟谷段集，形成一个沟谷网络；所有的分水线段组成分水线段集，形成一个分水线网络；沟谷段集和分水线段集共同组成界线集。 沟谷网络中的每一段沟谷都有一个汇流区域，这些区域由流域分水线集来控制。外部沟谷段有一个外部汇流区．而内部沟谷段有两个内部汇水区，分布在内部沟谷段的两侧。整个流域被分割成一个个子流域．每个子流域好象是树状图上的一片“叶子”。 Shreve的树状图流域结构模型是简单明确的．虽然沟谷网络的结点模型和线模型与在栅格DEM中用于表示沟谷结点和沟谷线的栅格点和栅格链之间存在着拓扑不一致性。但它给出了沟谷网络、分水线网络和子汇流区的定义，明确表达了它们之间的相关关系，成为设计流域特征提取技术的基础。
1.2 常用算法 流向判定建立在3×3 的DEM 栅格网的基础上，其方法有单流向法和多流向法之分，但单流向法因其确定简单、应用方便而应用广泛。 1.2.1 单流向法 单流向法假定一个栅格中的水流只从一个方向流出栅格，然后根据栅格高程判断水流方向。目前应用的单流向法是D8法。此外，还有Rho8 方法、DEMON 法、Lea 法和D∞ 法等。最常用的是D8 法：假设单个栅格中的水流只能流入与之相邻的8 个栅格中。它用最陡坡度法来确定水流的方向，即在3×3 的DEM 栅格上，计算中心栅格与各相邻栅格间的距离权落差（即栅格中心点落差除以栅格中心点之间的距离），取距离权落差最大的栅格为中心栅格的流出栅格。 所谓最陡坡度法的原理是假设地表不透水，降雨均匀．那么流域单元上的水流总是流向最低的地方“窗口滑动指以计算单元为中心，组合其相邻的若干个单元形成一个窗口”，以“窗口”为计算基本元素，推及整个DEM，求取最终结果。目前应用最广泛的是基于流向分析和汇流分析的流域特征提取技术。Jenson and Domingue (1988)设计了应用该技术的典型算法，该算法包括3个过程：流向分析，汇流分析和流域特征提取。 1) 流向分析：以数值表示每个单元的流向。数字变化范围是1～255。其中1：东；2：东南；4南；8：西南；16：西；32：西北；64：北；128：东北。除上述数值之外的其它值代表流向不确定，这是由DEM中洼地”和“平地”现象所造成的。所谓“洼地”即某个单元的高程值小于任何其所有相邻单元的高程。这种现象是由于当河谷的宽度小于单元的宽度时，由于单元的高程值是其所覆盖地区的平均高程，较低的河谷高度拉低了该单元的高程。这种现象往往出现在流域的上游。“平地指相邻的8个单元具有相同的高程，与测量精度、DEM单元尺寸或该地区地形有关。这两种现象在DEM 中相当普遍，Jenson and Domingue 在流向分析之前，将DEM进行填充；将“洼地”变成“平地”，再通过一套复杂的迭代算法确定“平地”流向。流向分析过程如图所示。 2) 汇流分析：汇流分析的主要目的是确定流路。在流向栅格图的基础上生成汇流栅格图．汇流栅格上每个单元的值代表上游汇流区内流入该单元的栅格点的总数，既汇入该单元的流入路径数(NIP)，NIP较大者，可视为河谷，NlP等于0，则是较高的地方，可能为流域的分水岭。
【CN110032566A】基于AutoCAD的宗地四至快速分析法【专利】
(19)中华人民共和国国家知识产权局 (12)发明专利申请 (10)申请公布号 (43)申请公布日 (21)申请号 201910322969.3 (22)申请日 2019.04.22 (71)申请人 上海飞未信息技术有限公司 地址 201108 上海市闵行区光华路2118号 第3幢五层B537室 (72)发明人 陆腾 李菁 夏小雪 罗顶林 任现超 张晓宁 徐玉国 谢润中 汪富林 (51)Int.Cl. G06F 16/22(2019.01) G06F 16/2458(2019.01) (54)发明名称基于AutoCAD的宗地四至快速分析法(57)摘要本发明公开了基于AutoCAD的宗地四至快速分析法，其方法包括以下步骤：A、基于k -d tree 算法对所有宗地建立索引；B、读取宗地的每一条边和每一个点；C、读取宗地在四个方向上的极限点；D、判断狭长宗地；E、计算最优四个方向点；F、分组四个方向边；G、索引查找四邻宗地，计算出四至，步骤A中，k -d树（k -dimensional树的简称），是一种分割k维数据空间的数据结构，主要应用于多维空间关键数据的搜索（如：范围搜索和最近邻搜索），同时，K -d树是二进制空间分割树的特殊的情况。本发明可准确、高效的生成宗地四至属性信息，并可自动高效计算出宗地四至， 有效提高了测绘内业人员的工作效率。权利要求书1页 说明书3页CN 110032566 A 2019.07.19 C N 110032566 A
权 利 要 求 书1/1页CN 110032566 A 1.基于AutoCAD的宗地四至快速分析法，其特征在于：其方法包括以下步骤： A、基于k-d tree算法对所有宗地建立索引； B、读取宗地的每一条边和每一个点； C、读取宗地在四个方向上的极限点； D、判断狭长宗地； E、计算最优四个方向点； F、分组四个方向边； G、索引查找四邻宗地，计算出四至。 2.根据权利要求1所述的基于AutoCAD的宗地四至快速分析法，其特征在于：所述步骤A 中，k-d树（k-dimensional树的简称），是一种分割k维数据空间的数据结构，主要应用于多维空间关键数据的搜索（如：范围搜索和最近邻搜索），同时，K-d树是二进制空间分割树的特殊的情况。 3.根据权利要求1所述的基于AutoCAD的宗地四至快速分析法，其特征在于：所述步骤C 中，读取所有点，找X坐标值最大的点，如果有多个就按Y坐标值由小到大排序，就得到了东方向上的极限点；读取所有点，找Y坐标值最小的点，如果有多个就按X坐标值由小到大排序，就得到了南方向上的极限点；读取所有点，找X坐标值最小的点，如果有多个就按Y坐标值由小到大排序，就得到了西方向上的极限点；读取所有点，找Y坐标值最大的点，如果有多个就按X坐标值由小到大排序，就得到了北方向上的极限点。 4.根据权利要求1所述的基于AutoCAD的宗地四至快速分析法，其特征在于：所述步骤D 中，如果宗地的外接矩形长边是短边的5倍以上，视为狭长宗地。 5.根据权利要求1所述的基于AutoCAD的宗地四至快速分析法，其特征在于：所述步骤E 中，在相邻极限点之间选择方向点，取宗地的中心点，连接到Ymax和Xmin的线，并做这个角度的角平分线，交于宗地，那么距离这个交点最近的点就是西北方向点，同理，计算出西南方向点、东北方向点和东南方向点，特别地，对于狭长宗地，需要根据狭长程度，调整角的平分程度。 6.根据权利要求1所述的基于AutoCAD的宗地四至快速分析法，其特征在于：所述步骤F 中，根据最优四个方向点，把宗地的边分为东南西北四组。 7.根据权利要求1所述的基于AutoCAD的宗地四至快速分析法，其特征在于：所述步骤G 中，遍历四至边，找出共用边的相邻宗地即可。 2
基于CASS开发宗地四至属性的自动生成探讨
基于CASS开发宗地四至属性的自动生成探讨 摘要：本文讲述了基于CASS开发宗地四至属性的自动生成的必要性；概述了宗地图的制作原理；分析了CASS软件的选进性及开发模式；讨论了程序设计的具体流程；具体分析了程序各模块的实现及典型模块程序代码；在现阶段具有一定的理论与实践意义。 关键词：CASS，宗地，VBA，四至属性 土地登记工作中一个很重要的内容就是宗地图的制作，而宗地图四至属性的标注是宗地图制作的一项重要内容。依据传统的做法，四至属性的标注需要查阅每一宗地的实际位置，手工录入到宗地属性或是标注在宗地图上，依据笔者实践生产经验，这项工作所需技术含量不高，但比较繁琐，需花费大量的人力、物力。而基于CASS开发宗地四至属性的自动生成程序可以把大量人力、物力从繁琐的劳动中解脱出来，因此基于CASS开发宗地四至属性的自动生成程序在宗地图的制作中变得举足重要。 南方CASS是目前国内广泛使用的宗地图制作成图软件，因其功能强大，通俗易懂，便于操作且能与其他地籍相关软件进行数据无缝接口，被广泛应用于宗地图制作。本文结合自身参与的集体土地所有权发证项目，探讨基于CASS开发宗地四至属性的自动生成，希望能给广大同行起到抛砖引玉的作用[1]。 1 宗地图概述 宗地图是描述宗地位置、界址点线关系、相邻宗地编号的分宗地籍图，用来作为该宗土地产权证书和地籍档案的附图。宗地图中包括[2]： (1)图幅号、地籍号、坐落 (2)单位名称、宗地号、地类号和占地面积单位名称、宗地号、地类号和占地面积标注在宗地图的中部。例如，某宗地的使用权属第六中学，宗地号为7，地类号为083(按城镇土地分类083为科教用地)，占地面积1 165．6㎡。 (3)界址点、点号、界址线和界址边长 界址点以直径0．8mm的小圆圈表示，包含与邻宗地公用的界址点，从宗地左上角沿顺时针方向以1开始顺序编号，连接各界址点形成界址线，两相邻界址点之间的距离即为界址边长。 (4)宗地内建筑物和构筑物 若宗地内有房屋和围墙，应注明房屋和围墙的边长。
ArcGIS提取斜坡单元步骤详解要点
斜坡单元 地质灾害危险性区划中常用的单元类型有网格单元、地域单元、均一条件单元、子流域单元、斜坡单元等。其中: 网格单元形状较规则，便于实现快速剖分，离散后得到的矩阵形式的数据有利于进一步运算，但是不能完全反映地势起伏，与地质环境条件联系不够紧密; 均一条件单元没有考虑不同区域的地质环境条件差异; 子流域单元适用于泥石流灾害危险性区划，对滑坡、崩塌等则不适用。斜坡单元是滑坡、崩塌等地质灾害发育的基本单元，并且在各类控制或影响因素中，河流和沟谷的发育阶段对滑坡、崩塌的形成具有明显的控制作用，因此采用基于幼年期沟谷划分的斜坡单元作为评价单元，可以与地质环境条件紧密联系，综合体现各类控制或影响因素的作用，使评价结果更贴近于实际。因此，在满足DEM 精度要求的前提下，斜坡单元划分较适用于地质灾害危险性区划【1】。 斜坡单元划分原理 斜坡单元划分的实质是基于DEM 的地表水文分析，包括正反地形无洼地DEM 的生成、水流方向的提取、汇流累积量的计算、河网的生成、集水流域的生成等关键步骤，其基本原理是利用正反地形分别提取山谷线和山脊线( 分别对应于汇水线和分水线)，把生成的集水流域与反向集水流域融合，再经后期处理人工修改不合理的单元，最终得到的由汇水线与分水线所组成的区域即为斜坡单元。斜坡单元划分流程见图【1】。
ArcGIS划分斜坡单元操作步骤 1、生成无洼地DEM ——原理：DEM 是一种比较光滑的地形表面模型，由于DEM 误差以及一些真实地形的存在，使DEM表面存在一些凹陷的区域，在进行水流方向计算时往往会导致不合理的甚至错误的水流方向，因此计算前应先对原始DEM数据进行洼地填充，得到无洼地的DEM。基本过程是: 首先，利用水流方向数据计算出DEM 数据中的洼地区域和洼地深度;其次，依据洼地深度并参考真实地形，确定填充阈值对洼地进行填充; 再次，一次洼地填充完毕后又会产生新的洼地，因此需要重复上述过程，反复填充【1】。 ——操作：填洼
地块四至填写工具说明
原理说明： 1、将面要素转点，求出面要素的质心点； 2、计算面要素是否邻接； 3、两面要素邻接时，连接其质心点，计算出该线段的方向值，从而求得四至方向。 例：上图4个面状地块，现需计算出1的四邻关系，由1-2,1-3,1-4三条线段的角度可得：1的南向为2和3，东向为4，而西和北则输出空值。此工具只有在地块相接的情况下才能输出其四至，而不相接的方向上则输出为空。
四至填写程序： 将以上两个文件复制到此ArcGIS安装路径下： ……\ArcGIS\Desktop10.2\ArcToolbox\Toolboxes 1、打开ArcMap—Arctoolbox 2、数据准备 建立文件夹：在某一盘建立一个文件夹，将要进行四至计算的SHP文件放入其中。（注：此次所使用的小工具只支持SHP格式文件的运算，不支持数据库中要素类的运算，需将库中的地块要素类导出为SHP文件，在导出前需建立一个“序号”字段、短整型，将属性表中对象ID的值赋值给“序号”，此操作用于此后的“连接”操作。 建议每个shp文件包含的地块数保持在1500以内。）
3、运行工具 FARMER 自己定义保存位置
4、运行过程界面（1000个地块大概需要4到5分钟） 4、导出dbf表格 将上一步输出的shp文件用ArcMap打开，导出属性表。 5、用Excel打开dbf表格
AE列存放的是导出的四至 P,Q,R,S四列，存放的是，地块东、西、南、北至DKDZ，DKXZ……，四列中放入函数： 文本文档里面的东： =IF(ISERROR(SEARCH("E",SUBSTITUTE(AE2,"@E",""),1)),"",MID(SUBSTITUTE(AE2,"@E",""),SEARC H("@",SUBSTITUTE(AE2,"@E",""),1)+1,SEARCH("E",SUBSTITUTE(AE2,"@E",""),1)-SEARCH("@",SU BSTITUTE(AE2,"@ E",""),1)-1)) 西： =IF(ISERROR(SEARCH("W",SUBSTITUTE(AE2,"$ W",""),1)),"",MID(SUBSTITUTE(AE2,"$ W",""),SEAR CH("$",SUBSTITUTE(AE2,"$ W",""),1)+1,SEARCH("W",SUBSTITUTE(AE2,"$ W",""),1)-SEARCH("$",S UBSTITUTE(AE2,"$ W",""),1)-1)) 南： =IF(ISERROR(SEARCH("S",SUBSTITUTE(AE2,"%S",""),1)),"",MID(SUBSTITUTE(AE2,"%S",""),SEARCH ("%",SUBSTITUTE(AE2,"%S",""),1)+1,SEARCH("S",SUBSTITUTE(AE2,"%S",""),1)-SEARCH("%",SUBST ITUTE(AE2,"% S",""),1)-1)) 北： =IF(ISERROR(SEARCH("N",SUBSTITUTE(AE2,"#N",""),1)),"",MID(SUBSTITUTE(AE2,"#N",""),SEARCH ("#",SUBSTITUTE(AE2,"#N",""),1)+1,SEARCH("N",SUBSTITUTE(AE2,"#N",""),1)-SEARCH("#",SUBSTI TUTE(AE2,"# N",""),1)-1)) 四列单元格，下拉到最底部。保存工作表。 表连接，
用地红线图和土地宗地图有什么区别
用地红线图和土地宗地 图有什么区别 Document serial number【LGGKGB-LGG98YT-LGGT8CB-LGUT-
宗地图定义 为：描述宗地空间位置关系 的地图。（宗地：parcel Of land ，土地使用权人的权属 界址范围内的地块。 权属界址线所封闭的 地块。历史上曾称宗地为“丘”。） 用地红线图和土地宗地图有什么区别 就我地方而言 1.土地宗地图是国土部门的测绘公司绘制的。只注重土地四至位置、土地面积、土地定位坐标。对现状的描绘较少，也缺少规划路网等等。 2.用地红线图是规划主管部门出具的，他要求规划部门使用具有测绘资质的单位提供的最新地形图，并在地形图上标注规划路网、绿线、蓝线等等，然后将土地宗地图的红线位置标注在地形图上，作为用地范围。 3.国土部门与规划部门使用的坐标系不是同一个，现在最大的5米的误差，一般可以忽略不计。 4.我们在规划条件中都要注明，用地实际面积应以国土部门实测为准。 土地宗地图应该包括项目用地红线图、城市道路、城市绿化、广场等用地，而用地红线图仅为项目用地 宗地图是反映一宗地的基本情况。包括：宗地权属界线、界址点位置、宗地内建筑物位置与性质，与相邻宗地的关系等。 红线图是规划局确定的项目，或城市规范管理部门正式确定的项目建筑的的示意图，其中红线是用来表示建筑物的边界外沿界限，即实际可使用土地的边界图。宗地图是当地地理位置，红线图是土地的边界图
宗地图是描述宗地位置、界址点线关系、相邻宗地编号的分宗地籍图，用来作为该宗土地产权证书和地籍档案的附图。宗地图中包括： (1)图幅号、地籍号、坐落 (2)单位名称、宗地号、地类号和占地面积 单位名称、宗地号、地类号和占地面积标注在宗地图的中部。例如，某宗地的使用权属第六中学，宗地号为7，地类号为44(按城镇土地分类44为教育单位)，占地面积1 165．6㎡。 (3)界址点、点号、界址线和界址边长 界址点以直径0．8mm的小圆圈表示，包含与邻宗地公用的界址点，从宗地左上角沿顺时针方向以1开始顺序编号，连接各界址点形成界址线，两相邻界址点之间的距离即为界址边长。 (4)宗地内建筑物和构筑物 若宗地内有房屋和围墙，应注明房屋和围墙的边长。 (5)邻宗地宗地号及界址线 应在宗地图中画出与本宗地有共同界址点的邻宗地界址线，并在邻宗地范围内注明它的宗地号。 (6)相邻道路、街巷及名称
利用ArcGIS水文分析工具提取河网的具体操作
利用ArcGIS水文分析工具提取河网的操作ArcGIS 水文分析工具提取河网 DEM包含有多种信息，ArcToolBox提供了利用DEM提取河网的方法，但是操作比较烦琐（帮助可参看Hydrologic analysis sample applications），今天结合我自己的使用将心得写出来与大家分享。提取河网首先要有栅格DEM，可以利用等高线数据转换获得。在此基础上，要经过洼地填平、水流方向计算、水流积聚计算和河网矢量转化这几个不步骤。 1．洼地填平 DEM洼地（水流积聚地）有真是洼地和数据精度不够高所造成的洼地。洼地填平的主要作用是避免DEM 的精度不够高所产生的（假的）水流积聚地。洼地填平使用ArctoolBox->Spatial Analysis Tools->Hydrol ogy->Fill工具。 2．水流方向计算 水流方向计算就可以使用上一步所生成的DEM为源数据了（如果使用未经洼地填平处理的数据，可能会造成精度下降）。这里主要使用ArctoolBox->Spatial Analysis Tools->Flow Direction 工具。输入的DE M采用第一步的Fill1_exam1 3．水流积聚计算 这里主要使用ArctoolBox->Spatial Analysis Tools->Flow Accumulation工具流向。栅格数据就是第二步所获得的数据（FlowDir_fill1）。可以看到，生成的水流积聚栅格已经可以看到所产生的河网了。现在所需要做的就是把这些河网栅格提取出来。可以把产生的河网的支流的象素值作为阀值来提取河网栅格。
4．提取河网栅格 使用spatial analyst中的栅格计算器，将所有大于河网栅格阀值的象素全部提取出来。至于这个阀值是多少因具体情况而定。通常是要大于积聚计算后得到栅格的最低河流象素值。这里采用的是500这个值。最 后生成只有0、1值的栅格数据。其中1表示是河网，0是非河网。 5．生成河网矢量 这里主要使用ArctoolBox->Spatial Analysis Tools->Stream to Feature工具.Input Stream raster 为第 四步只有0、1值的河网栅格。流向栅格使用第二步所生成的栅格数据。
基于ArcGIS VBA的宗地四至生成法1
'-------------------------------------------基础配置---------------------------------------- Dim pMxDoc As IMxDocument '代表本文档数据Dim pMap As IMap '代表激活的地图Dim pFeaLayer As IFeatureLayer '代表地图中的图层，这里仅有一个 Dim pFeaClass As IFeatureClass '代表图层中的要素类数据'-------------------------------------------查询条件---------------------------------------- Dim pQueryF1 As IQueryFilter '查询条件1 Dim pQueryF2 As IQueryFilter '查询条件2 Dim pFeaCursor1 As IFeatureCursor '要素游标1，提取要素数据使用 Dim pFeaCursor2 As IFeatureCursor '要素游标2，提取要素数据使用 Dim pFeature1 As IFeature '要素1对应变量 Dim pFeature2 As IFeature '要素2对应变量 '-------------------------------------------算法变量----------------------------------------- Dim iNameCount As Long '权利人数组存有的数目 Dim iColumnCountStart As Long '起始输入的Excel行数Dim iColumnCountEnd As Long '结束输入的Excel行数Dim bIsNameExist As Boolean '标识当前权利人是否已写入 Dim pName As String '当前权利人姓名 Dim pNameArray() As String '已写入权利人姓名数组'----------------------------------------Excel数据写入准备----------------------------------- Dim xlapp As Excel.Application Dim xlbook As Excel.Workbook Dim xlsheet As Excel.Worksheet Set xlapp = CreateObject("excel.Application") Set xlbook = xlapp.Workbooks.Open("D:\实验表格.xls") xlapp.Visible = True Set xlsheet = xlbook.Worksheets(1) On Error GoTo ErrorHandler: iNameCount = 0 iColumnCountStart = 5 iColumnCountEnd = 5 bIsNameExist = False Set pMxDoc = ThisDocument Set pMap = pMxDoc.FocusMap Set pFeaLayer = https://www.360docs.net/doc/e08571823.html,yer(0) Set pFeaClass = pFeaLayer.FeatureClass
土地使用证中的四至指的是什么意思
土地使用证中的四至指的是什么意 思 土地证上的“四至”是指建筑基地或耕地四周跟别的基地或耕地分界的地方。按照国务院的有关要求，开发区通过审核并公告后，应落实四至范围，以防止开发区四处“漂移”和变相扩区，从而达到合理控制开发区用地规模的目的。 大家都知道，如果我们对于一块土地享有使用权，那么，它的最好凭证便是土地使用证了。所以，我们在申请土地使用证的办理过程中，需要对于这块土地的大小、方位等等数据进行探测证明，这一系列过程中就涉及到土地使用证中的四至。接下来，小编将针对四至的概念为大家详细介绍，来看一下吧。 一、土地使用证上应该包括什么 土地使用证是确认土地使用权的法律凭证。根据《中华人民共和国土地管理法实施条例》，国家依法实行土地登记发证制度。依法登记的土地所有权和土地使用权受法律保护，任何单位和个
人不得侵犯。土地登记内容和土地权属证书式样由国务院土地行政主管部门统一规定。 土地使用证内各项数据和编号，如单位名称、四至、土地数量、位置、土地变更等，必须与土地登记表相一致。土地使用证附图可根据土地利用现状底图或地籍图透绘获得。随着面积和界线的变更，附图也应作相应改动。 国有土地使用证由国家土地管理局统一监制，市、县人民政府颁发，土地管理机关填写，发给依法使用国有土地的单位和个人，并由其保存。其主要内容包括： 1、土地使用者名称、地址、图号、[1]地号、用途、批准使用期限、四至、填发机关签章、年、月、日。 2、城镇土地使用中用地面积，其中建筑占地，共有使用权面积，其中分摊面积，土地等级;农村土地中土地总面积，其中地类面积。 3、备注。 4、变更记事。 5、附图以及证书的编号等。 二、土地使用证中的四至指的是什么意思
宗地地籍调查表
编号：地籍调查表 _______市_______乡__________村 _______区_______街__________巷 年月日
初始、变更
封面： （1）.编号：这是宗地的正式地籍号，但区（县）编号可省去括号。 （2）. 区（县）街道号：该宗地使用者通讯地址。 （3）. 年月日：现场权属调查时间。 地籍调查表 （1）.初始、变更：若初始地籍调查时，在“变更”二字上划一从左上至右下的斜杠，反之则在“初始”二字上划斜杠。 （2）.土地使用者 （A）名称：单位全称（即该单位公章全称）、个人用地则填户主姓名。 （B）性质：全民单位、集体单位、股份制企业、外资企业、个体企业或个人等。 （3）.上级主管部门：与单位有行政、资产等关系的上级主管部门；个人用地时此栏可以不填。 （4）.土地坐落：此宗地的坐落。 （5）.法人代表或户主：单位主要负责人（与“地籍调查法人代表身份证明书”一致）或户口簿上的户主。 （6）.土地权属性质：国有土地使用权或集体土地建设用地使用权或集体土地所有权。国有土地使用权又分：划拨国有土地使用权、出让国有土地使用权、国家作价出资（入股）国有土地使用权、国家租赁国有土地使用权、国家授权经营国有土地使用权。 （7）、预编地籍号、地籍号：预编地籍号是指在工作用图上预编此宗地的地籍号。地籍号是指通过调查正式确定的地籍号。 （8）.所在图幅号： （A）未破宗时，即为此宗地所在的图幅号。 （B）破宗时，应该包括此宗地各部门地块所在的图幅号。 （9）.宗地四至：具体填写邻宗地的地籍号及四至情况或注“详见宗地草图”字样。 （10）.批准用途、实际用途、使用期限：批准用途是指权属证明材料中批准的此宗地用途。实际用途是指现场调查核实的此宗地主要用途。使用期限是指权属证明材料中批准此地块使用的期限，如“20年”或“50年”等，没有规定期限的可以空此栏。 （11）.共有使用权情况：指共用宗地时，使用者共同使用此宗地的情况。 （12）.说明：说明初始地籍调查时，注记此宗地局部改变用途等；变更地籍调查时，注明原使用者、土地坐落、地籍号及变更的主要原因；宗地的权属来源证明材料的情况说明。 （13）、界址种类、界址线类别及位臵：根据现场调查结果，在相应位臵处画“√”符号，也可在空栏处填写表中不具备的种类、类别等。 （14）、界址调查员姓名：指所有参加界址调查的人员姓名。 （15）、指界人签章：指界人姓名、签章，原则上不得空格，且指界人必须签字、盖章或按手印。 （16）.权属调查员记事及调查员意见： （A）现场核实申请书中有关栏目填写是否正确，不正确的作更正说明。 （B）界址有纠纷时，要记录纠纷原因（含双方各自认定的界址），并尽可能提出处理意见。 （C）指界手续履行等情况。 （D）界标设臵、边长丈量等技术方法、手段。 （E）评定能否进入地籍测量阶段。 （17）.地籍勘丈记事： （A）勘丈前界标检查情况。