王涛，张大鹏，朱建伟，徐莹

(1.天津市测绘院，天津 300381； 2.天津市东丽区地籍管理中心，天津 300300)

土地利用变化图斑调查内业处理程序的开发

王涛1∗，张大鹏2，朱建伟1，徐莹1

(1.天津市测绘院，天津 300381； 2.天津市东丽区地籍管理中心，天津 300300)

土地利用遥感监测的一项基础性工作是变化图斑外业调查及内业处理，外业调查过程琐碎且易出错，内业处理人工工作量大，因而考虑开发一套自动化处理程序，用于减少工作量，提高效率并避免人工误操作。该程序基于标准化的地类编码表，实现了照片自动整理、自动判定变化图斑坐落、调查表的自动填写等功能，应用于实际生产并取得了明显效益。

变化图斑；外业调查；自动化处理程序；标准化

1 引 言

土地利用遥感动态监测是国土资源大调查的重要组成部分，其目标是以全国土地利用遥感体系为依托，以3S技术为主要手段，及时、准确掌握土地利用状况，为各级政府决策提供科学依据。天津市地籍管理中心的土地利用遥感监测体系中的一项重要工作是土地利用变化图斑外业调查及制表。变化图斑的外业调查是对遥感影像变化检测提取的变化图斑的外业实地核实，为土地变更及违法建设监察等工作提供准确、翔实的资料，外业调查成果的好坏直接影响到天津市土地利用变更管理系统的质量。

2 外业调查及内业处理工作内容

变化图斑外业调查的工作内容包括:①确定新增建设用地图斑的真伪和范围；②确定变化图斑的坐落及邻近的重要地理要素(道路和水系)；③实地拍摄地块的多角度照片；④调查新增建设用地图斑的地类、现场情况描述；⑤调查新增建设用地的用地单位名称；⑥测量新增道路、管道等线状地物的宽度。

内业处理则是完成图斑照片的整理和电子版调查记录表的填写。规程要求将照片存放到以图斑号命名的文件夹中，并按拍摄顺序将照片命名为图斑号-a、图斑号-b、……的样式。调查记录表的主要内容如表1所示。

变化图斑外业调查记录表 表1

外业调查所采用的资料为2.5m SPOT 5彩色影像、变化图斑矢量数据，相关数据包括:调查区的村界矢量数据、道路矢量数据、水系矢量数据。

该工作的流程如图1所示。

图1 外业调查及内业处理流程

3 内业自动化处理程序

内业处理包括照片整理和电子版调查表的填写，工作量大且易发生手工操作失误，有时还会因人员习惯的差异造成内容的不一致。针对此情况，本文在对记录表各项内容逻辑分析的基础上，运用程序实现对调查记录表的自动填写，同时利用程序自动处理照片整理问题。

本程序基于VB.NET 2005平台开发，图2为其界面。该程序的功能有:①图斑照片自动整理；②运用空间分析方法自动判定图斑坐落；③自动填写调查表。

使用前须建立工程目录，工程目录的内容包括:①照片目录，存放全部原始照片；②数据目录，包括待填写的调查表，调查区的变化图斑shapefile文件、村界shapefile文件、道路及水系shapefile文件。

图2 土地利用变化图斑内业处理程序

3.1 图斑照片整理

外业调查人员在拍摄图斑照片时，须在外业调查表上依次记录每个图斑的照片数量。内业处理时，根据拍照记录人工制作Excel文件格式的图斑照片索引表。程序的图斑照片整理功能读取照片索引表内容(如图3所示)，首先根据序号及图斑号，在工程目录下依次建立图斑号命名的照片文件夹；因照片的拍照顺序与图斑号在时间上是连续对应的，且每个图斑包含的照片数量也已知，因而从时间逻辑上依据照片文件的拍照时间可判定每张照片归属于哪个图斑照片文件夹，依据此原理程序自动从存放全部原始照片的目录中将应有的照片复制到图斑照片文件夹中，并依据照片文件的拍照时间先后将其改名为图斑号-a.JPG、图斑号-b.JPG、……的样式，如图4所示。这样图斑照片整理的工作全部完成，其全部由程序实现而无需人工处理照片数量，在工程目录下自动建立图斑号命名的照片文件夹，将其应有的照片全部复制到该文件夹内并按要求改名。本功能完全替代了内业人工操作，且避免了外业拍照时的照片编号和记录。

图3 照片索引表

图4 自动创建的照片目录

3.2 自动判定图斑位置

调查表中的一项重要内容为判定图斑坐落，即准确填写图斑所在行政村村名及四向位置(即村的东、南、西、北方位)，若图斑周围50m内有道路或河流经过，还须填写道路或河流的名称及方位。本程序运用ArcObject提供的矢量数据空间分析接口，运用叠置分析自动判定图斑所在行政村坐落，运用缓冲区分析判定图斑附近的道路或河流要素。图斑矢量与村界矢量空间叠置分析如图5所示，其中红线所框为变化图斑，黄线则代表村界。叠置分析判定图斑坐落的代码如下。

'村界矢量与图斑矢量进行求交运算，生成新的交集矢量文件

Dim pNewwsName As IWorkspaceName

pNewwsName=New WorkspaceName

pNewwsName.WorkspaceFactoryProgID="esriData-SourcesFile.ShapefileWorkspaceFactory"

pNewwsName.PathName=strPathTB

Dim pDatasetName As IDatasetName

pDatasetName=pFeatClassName

pDatasetName.Name="Intersect"

pDatasetName.WorkspaceName=pNewwsName

Dim tol As Double=0.1

'调用IBasicGeoprocessor接口进行矢量求交运算

Dim pBGP As IBasicGeoprocessor

pBGP=New BasicGeoprocessor

Dim pFeatClassOut As IFeatureClass

pFeatClassOut=pBGP.Intersect(pTableTB，False，pT-ableCJ，False，tol，pFeatClassName)

'从交集矢量文件中提取出图斑号与村名的对应关系，写入到临时TXT文件中

GetMappingFromFeatOut()

'从TXT文件中提取出映射关系，写入到调查表的“图斑坐落”项

FillTBZB2Blank()

图5 图斑矢量与村界矢量的叠置分析

3.3 自动填写调查表

该程序的自动填写功能可完成调查表中绝大多项内容的填写。如表1所示，“线状地物宽度”、“备注”等项须人工输入，“图斑位置”上步已填写完成，剩下“现场情况描述”、“变化后国标地类”、“变化后国标归并地类”三项是相关的。依据“现场情况描述”可判定“变化后国标地类”和“变化后国标归并地类”，则可编制程序实现此三项的自动填写，其实现包括两个步骤:

(1)首先须建立地类标准编码表，如表2所示，以编码来表示现场情况描述，该表还建立了现场情况编码与变化后国标地类、变化后国标归并地类2项内容的对应关系。另一方面，外业调查人员只需在调查草表内填写其编码而无须繁琐地填写文字版的“现场情况描述”项，这样既避免了手写误差，也提高了外业的工作效率。

(2)内业处理时，作业人员手工输入“现场情况描述”项编码，程序依照编码表判定出“变化后国标地类”、“变化后国标归并地类”的编码。接着，程序自动填写“变化后国标地类”、“变化后国标归并地类”2项并将“现场情况描述”项转化为文字描述，同时还可实现“用地单位”项的半自动填写。

自动填写的调查表如表3所示。调查表自动填写的代码如下所示。

'打开EXCEL格式的调查表

Dim excelApp As Object:Dim excelBook As Object: Dim excelSheet As Object

excelApp=CreateObject("Excel.Application")

excelBook=excelApp.Workbooks.Open(strXLS)

excelSheet=excelBook.Sheets(1)

Dim nRows As Integer，nCols As Integer

nRows=excelSheet.UsedRange.Rows.Count-3

For i=1 To nRows '首先根据现场描述，填写两个地类码

Dim strXCMSAs String

strXCMS=excelSheet.Cells(i+3，11).Value

Dim strTBCode0 As String="000"

Dim strTBCode1 As String="000"

If strXCMS＜＞""Then

DetemineTBCodeThroughXCMS(strXCMS，strTBCode0，strTBCode1)

End If

excelSheet.Cells(i+3，7).NumberFormat="＠"

excelSheet.Cells(i+3，7).Value=strTBCode0

excelSheet.Cells(i+3，8).NumberFormat="＠"

excelSheet.Cells(i+3，8).Value=strTBCode1

'将现场描述由代码转换为实际文字

Dim strXCMSTXT As String=String.Empty

ConvertXCMS2Text(strXCMS，strXCMSTXT)

excelSheet.Cells(i+3，11)=strXCMSTXT

'接着根据图斑坐落，补充填写用地单位

FillYDDWAAccordingTBZL()

Next

excelBook.Close()

excelApp.Quit()

excelSheet=Nothing:excelBook=Nothing:excelApp=Nothing

地类编码表 表2

自动填写完的调查表 表3

4 结 语

土地利用变化图斑外业调查工作较为琐碎，内外业处理上都存在改善之处。本程序基于上述情况考虑，既改变了内业靠繁重手工输入的模式，实现了自动化处理，也一定程度上减轻了外业工作的复杂度，降低了人力成本，在实际生产中取得了明显效益，获得项目工作人员的认可。该程序的应用不仅提高了工作效率，而且还体现了信息化测绘的特点。

[1] GB/T21010-2007.土地利用现状分类[S].

[2] TD/T1014-2007.第二次全国土地调查技术规程[S].

[3] TD/T1010-1999.土地利用动态遥感监测规程[S].

[4] 周荣军，李秀凤.全国“一张图”工程建设省级外业调查技术方法探讨[J].国土资源，2009(11):20～21.

[5] 刘连胜.土地利用动态遥感监测外业调查技术研究[J].广东土地科学，2010(3).

[6] 王德保，陈宝行，崔淑文.土地利用动态遥感监测应用研究[J].测绘通报，2004(2).

[7] 兰小机，刘德儿.ArcObjects GIS应用开发——基于C#. NET[M].南昌:江西理工大学出版社，2006.

Development of Indoor Process Program for Field Investigation of Land Use Changing Spot

Wang Tao1，Zhang Dapeng2，Zhu Jianwei1，Xu Ying1
(1.Tianjin Institute of Surveying and Mapping，Tianjin 300381，China；2.Tianjin Dongli District Cadastral Management Center，Tianjin 300300，China)

Investigation of changing spot is a basework of land use remote sensingmonitor system.Field investigation is cockamamie and fallible and indoor process is heavy，so this paper discusses an automatic process program to reduce workload and avoid factitious fault.This program is based on a standardlized code table，and its functions include automaticly neatening of photoes，automaticly determining of changing spot and automaticly filling in of questionary.This program is applied in actual work and it obtains obvious benefit.

changing spot；field investigatio；automatic process program；standard

1672-8262(2013)04-119-03

P237

B

2012—09—27

王涛(1983—)，男，工程师，注册测绘师，研究方向为城市管线GIS开发及信息化测绘研发。