基于mapbasic的电力线属性修改
摘要：本文是由mapbasic结合mapinfo开发的程序实现的。主要是通过点选一段电力线，使与之‘线路名称’属性相同的电力线都呈被选中状态，同时出现一个文本窗口，给修改‘线路名称’属性提供接口。已有的值在第一个文本框中显示出来，第二个文本框是空白的，输入新属性值，点击确定就可修改全部选中电力线的‘线路名称’属性值。与mapinfo本身提供的功能，所进行的修改过程来比，速度提高了十几倍。
关键词：mapinfo，mapbasic，电力线，属性
1前言
这个问题的产生来源于辽中电力项目。该项目是根据辽中县农电局对辽中地区电力事业发展的需求，对该地区面积约1635平方公里范围内的66KV、10KV电力线路及供电所和变电所进行调查、测量，最后数字化1：1万地形图。电力专业数据包括66KV和10KV两种电力线，要对其电压伏数、杆塔号、线路名称、变电所或供电所名称进行实地测量调查，并填写在数据属性字段中。
在项目编辑过程中，由于作业方案的改变，要求将电力线的‘线路名称’属性值，举例来说，由‘三亿分’改为‘黄腊坨线三亿分’；‘三亿造纸厂支’改为‘黄腊坨线三亿分三亿造纸厂支’，也就是注记线路名称的全称。该项目共涉及到24个变电所，5万个左右的电杆，象蜘蛛网一样的线路，并且数据已经都是按杆位打断的数据，同一‘线路名称’值的线段有很多，看下表1所示的属性信息就会明白。
表1
要一个一个的修改肯定是不现实的事，如何能快速、高效的更改这一属性值，让我们来看看下面两种方法的比较，及最终的结论。
2依靠mapinfo软件本身的功能修改
Mapinfo本身自带了一个sql查询功能，借助它我们能一次选择同一‘线路名称’值的所有线出来，在统一修改其值。具体步骤如下：
⑴使所要修改的表变成可编辑状态。
⑵用‘信息查询’工具或‘新建浏览窗口’工具选择一个‘线路名称’值，如：三亿分。
⑶点击菜单‘查询’SQL选择，出现一个‘SQL选择’对话框，填写正确的选择条件，如图1，就可以选择所有线路名称’为东荒地分的电力线出来，同时出现一个名为Query1的浏览窗口。
图1
⑷选择菜单‘表’更新列，出现‘更新列’对话框，填写正确的选择条件，如图2，就可统一更改‘线路名称’的值为‘黄腊坨线三亿分’了。
图2
3属性修改的程序实现过程
⑴定义一个工具按钮
createbuttonpad"查询工具"as
toolbuttoncallingtool_subID1
iconmi_icon_arrow
cursormi_cursor_arrow
drawmodedm_custom_point
helpmsg"在地图窗口中单击n单击一位置"
⑵定义一个修改对话框
dialog'对话框
title"选择"
controlstatictext
title"点选电力线'线路名称'"
controledittext
values_vz
controlstatictext
title"替换'线路名称'"
controledittext
intosearchfor
controlokbutton
title"确定"
ControlCancelButton
title"取消"
⑶选择所有与选中的‘线路名称’同值的电力线
fetchreci_row_idfroms_table
s_tn=s_table
s_table=s_table+".线路名称"
s_vz=s_table
select*froms_tnwhere线路名称=s_vzintosel
next
⑷修改‘线路名称’值
ifcommandinfo(cmd_info_dlg_ok)then
ifsearchfor<>""then
updateselset线路名称=searchfor
dimnobjasobject
dimjasinteger
j=selectioninfo(sel_info_nrows)
dimnasinteger
forn=1toj
select*fromselwhererowid=nintosele1
nobj=sele1.obj
alterobjectnobjinfoobj_info_pen,makepen(1,2,red)
updateselsetobj=nobjwhererowid=n
next
endif
else
gotonpro'点取消键就跳到下一个循环
endif
到这程序实现的‘线路名称’属性值修改过程也就完成了。用文字总结一下就是通过点选一段电力线，使与之‘线路名称’属性相同的电力线都呈被选中状态，同时出现一个文本窗口，给修改‘线路名称’属性提供接口。已有的值在第一个文本框中显示出来，第二个文本框是空白的，输入新属性值，点击确定就可修改全部选中电力线的‘线路名称’属性值。完成一条电力线的修改只需几秒钟的时间。
4、结束语
上面两种方法虽然主要的完成过程都有四步，但第二种方法的整个过程都是程序实现的，人工只需点击一段线输入新值就可以，比起第一种方法要快上几十倍。在我们这样的生产单位，速度与效益是紧密相关的，在以后的工作中，我会挖掘更多的方法来提高作业效率。
参考文献：
[1]地理信息系统二次开发教程—语言篇/刘光编著.北京：清华大学出版社，2003
