基于GIS技术的城乡土地利用规划支持系统(5)

土地利用总体规划

２６８ 新疆农业科学４５卷

３．２程序设计及实现

３．２．１变量定义

系统采用美国ＥＳＲＩ公司的ＭａｐＯｂｊｅｃｔｓ组件作为底层地图数据操作控件，主要图层调入以及属性数据读取、点线面的输入、符号的类型均有ＭａｐＯｂｊｅｃｔｓ空间的函数完成［８ｊ，代码如下：

／／初始化记录集符号库

ｐｕｂｌｉｃｓｔａｔｉｃＭａｐＯｂｊｅｃｔｓ２．Ｒｅｃｏｒｄｓｅｔｉｄｅｎｔｉｆｙｉｌａｓｈ；。

ｐｕｂｌｉｃｓｔａｔｉｃＭａｐＯｂｊｅｃｔｓ２．ＳｙｍｂｏｌＣｌ脚ｉｄｅｎｔｉｆｙＳｙｍｂｏｌ＝ｎｅｗ

ＵａｐＯｂｊｅｃｔｓ２．ＭａｐＬａｙｅｒｄｒａｗｌａｙｅｒ＝ｎｅｗＭａｐＯｂｊｅｃｔｓ２．ＳｙｍｂｏｌＣｈ鹧（）；／／创建图层对象接口及点线面对象接口ｐｕｂｌｉｃｓｔａｔｉｃＭａｐＯｂｊｅｃｔｓ２．ＭａｐＬａｙｅｒ（）；

ｐｕｂｌｉｃＭａｐＯｂｊｅｃｔｓ２．Ｐｏｉｎｔｓｐｔｓ＝ｎｅｗＭａｐＯｂｊｅｃｔｓ２．Ｐｏｉｎｔｓ（）；

ｐｕｂｌｉｃＭａｐＯｂｊｅｃｔｓ２．Ｐｏｉｎｔｓ

３．２．２属性调用ｐｕｂｌｉｃＭａｐＯｂｊｅｃｔｓ２．Ｐｏｌｙｇｏｎｐｔｓ＝ｎｅｗ邺ｂｊｅｃｔｓ２．Ｐｏｉｎｔｓ（）；ｄｒａｗｔｅｓｔ＝ｎｅｗＭａｐＯｂｊｅｃｔｓ２．Ｐｏｌｙｇｏｎ（）；

当地图从数据库调入系统时，和地图相关的属性数据的读取以及操作［８，９］很关键，属性数据的提取是空间分析以及查询、统计功能实现的基础。

／／向属性表添加纪录

ＬｉｓｔＶｉｅｗＩｔｅｍｌｉ＝ｎｅｗＬｉｓｔＶｉｅｗｌｔｅｍ（）；

ｌｉ．ＳｕｂＩｔｅｍｓ．Ｃｌｅａｒ（）；

Ｙ＝ｔｄｅｓｃ．ｇｅｔ．ＦｉｅｌｄＮａｍｅ（０）；∥获取图层名称

ｌｉ．ＳｕｂＩｔｅｍｓ［０］．Ｔｅｘｔ＝ｐｒｏｒｅｃｓ．Ｆｉｅｌｄｓ．Ｉｔｅｍ（ｙ）．ＶａｌｕｅＡｓＳｔｒｉｎｇ；／／Ｎ数据集中添加图层名

ｆｏｒ（Ｘ＝ｌ；Ｘ＜ｔｄｅｓｃ．ＦｉｅｌｄＣｏｕｎｔ；Ｘ＋＋）｛

ｓｔｒｉｎｇａｄｄｒｅｓ＝ｐｒｏｒｅｃｓ．Ｆｉｅｌｄｓ．Ｉｔｅｍ（ｙ）．ＶａｌｕｅＡｓＳｔｒｉｎｇ；／／Ｎ数据集中添加属性数据

ｌｉ．ＳｕｂＩｔｅｍｓ．Ａｄｄ（ａｄｄｒ酷）；｝

３．２．３编辑功能

除了对于属性数据的操作，还将要对图层做相应的点线面编辑［８，９１，从功能实现鼠标输入点线面的地物，并在输入的同时，调用符号库对端点标注。

／／端点为红色：

ｄｒａｗｔｅｓｔ＝ａｘＭａｐｌ．ＴｒａｃｋＰｏｌｙｇｏｎ（）；／／获得端点路径

ｐｔｓ＝（ＭａｐＯｂｊｅｃｔｓ２．Ｐｏｉｎｔｓ）ｄｒａｗｔｅｓｔ．Ｐａｒｔｓ．Ｉｔｅｍ（０）；／／初始化端点符号

ＭａｐＯｂｊｅｃｔｓ２．Ｒｅｃｔａｎｇｌｅｒｅｃｔ；／／获得图形区域

ｒｃｃｔ＝ａｘＭａｐｌ．Ｅｘｔｅｎｔ；

ａｘＭａｐｌ．ＴｍｃｋｉｎｇＬａｙｅｒ．ＣｌｅａｒＥｖｅｎｔｓ（）；／／结束路径动作

３．２．４拓展功能（柱状比例图）

从功能为土地利用结构分析功能，利用地图属性的三个指标，显示出每个区域的柱状对比图［８ ９１，使得对于土地利用规划总体状况有个全面的了解，方便指标的分配，以及用地标准、类型以及总量的控制。

／／获得图层并初始化属性调用变量

ＥＳＩｕ．ＭａｐＯｂｊｅｃｔｓ２．ＭａｐＬａｙｅｒｌｙｒ＝ｔｈｉｓ．ａｘＭａｐｌ．Ｌａｙｅｒｓ．Ｉｔｅｍ（０）鹪ＥＳＲＩ．盹Ｉ融ｊｅｃｔｓ２．Ｃｏｒｅ．ＭａｐＬａｙｅｒ；

ｐＣｈａｒｔＲｅｎｄｅｒｅｒ＝ｎｅｗＥＳＲＩ．ＭａｐＯｂｊｅｃｔｓ２．ＣｈａｒｔＲｅｎｄｅｒｅｒ

／／定义要获取的指标

ｐＣｈａｒｔＲｅｎｄｅｒｅｒ．ＦｉｅｌｄＣｏｕｎｔ＝３；ＥＳＲＩ．ＭａｐＯｂｊｅｃｔｓ２．ＣｈａｒｔＲｅｎｄｅｒｅｒＣｌａａｓ（）；

ｐＣｈａｒｔＲｅｎｄｅｒｅｒ．ｓｅｔ—Ｆｉｅｌｄ（Ｏ，＂ＧＤＦ’）；ｐＣｈａｒｔＲｅｎｄｅｒｅｒ．ｓｅｔ—Ｃｏｌｏｒ（０，（ｕｉＩｌｔ）劂．ＭａｐＯｂｊｅｃｔｓ２．Ｃｏｒｅ．ＣｏｌｏｒＣｏａｓｔａｎｔｓ．ｍｏＲｅｄ）；

ｐＣｈａｒｔＲｅｎｄｅｒｅｒ．ｓｅｔ—Ｆｉｅｌｄ（１，”ＡＧＲＩＣＩ『Ｉ肌ＩⅣ）；

ｐＣｈａｒｔｎｅｎｄｅｌ＇＿ｅｒ．ｓｅｔ—Ｃｏｌｏｒ（１，（ｕｉｎｔ）Ｅｓ砒．ＭａｐＯｂｊｅｃｔｓ２．Ｃｏｒｅ．Ｃｏｌｏｒｃｏｎｓｔａｎｔｓ．ｍｏＹｅｌｌｏｗ）；

ｐＣｈａｌ＇ｔｎｅｎｄｅｒｅｒ．ｓｅｔ—Ｆｉｅｌｄ（２，７Ｉｎｄｕｓｔｒｙ＂）；／／９，颜色符号库中调用柱状图的形状和颜色