图层叠加?(问题请教)(30分)

  • 主题发起人 主题发起人 WOPCD
  • 开始时间 开始时间
W

WOPCD

Unregistered / Unconfirmed
GUEST, unregistred user!
我用的是DELPHI+MO2.0,请问图层叠加是怎样实现的,我看了一些相关资料,但是没有代码,自己操作了,但是没有成功。请把代码写上,谢谢了。lq7971@hotmail.com
 
请问什么是mo
 
对不起,可能使我说的不明白。我要得是mapobject.map两个图层之间叠加,生成一个新图层,当然,属性库也会相应的调整。叠加的代码我不会写,富翁们,帮帮我吧!
 
VB代码供参考
dim rs1 as mapobjects2.recordset
dim rs2 as mapobjects2.recordset
set rs1=layer1.records
set rs2=layer2.records
rs1.movefirst
rs2.movefirst
with newLayer.records
do
while not rs1.eof
.addnew
.fields("Shape").value=rs1.fields("Shape").value
'其它属性
.update
rs1.movenext
loop
do
while not rs2.eof
.addnew
.fields("Shape").value=rs2.fields("Shape").value
'其它属性
.update
rs2.movenext
loop
end with
 
能不能不用设置属性库,让属性库默认,从而只是设置两个图层之间的叠加的方式。
 
这是两个图形的连接操作。如果当两个图层的空间位置重叠,此时要求产生的第三个新图层,是按照已知两个图层的四种空间关系叠加的结果,其结果将原来多边形要素分割成新要素,新要素综合了原来两层或多层的属性。该怎么作呢。
 
如果考虑到线相互切割构面以及线切割面的话,这个问题你出3000大洋恐怕也不会有一个完美的结果。自己想办法吧。
 
接受答案了.
 
后退
顶部