阅读:1967回复:2
VB+MAPX 如何动获得选择刚添加的图元的SELECTION
请教:
1 VB+MAPX , 我已实现添加一个面图元到指定图层。(使用原有工具 ) 2 怎样实现第一条完成后,自动获得选择刚添加的图元的SELECTION。 3 我想实现添加面图元后,自动提示改变该面图元颜色。 4 Dim j As MapXLib.Features Dim F As MapXLib.Feature Dim rvs As MapXLib.RowValues Dim jj1 As Long Map1.Refresh Map1.Layers.Item(val(ToolBars.Combo3.ListIndex + 1)).Refresh jj1 = Formmain.Map1.Layers.Item(val(ToolBars.Combo3.ListIndex + 1)).AllFeatures.Count + 1 Set F = Formmain.Map1.Layers.Item(val(ToolBars.Combo3.ListIndex + 1)).GetFeatureByID(jj1) F.Style.RegionColor = YanSer ‘YANSER 已定义好颜色。 F.Update 5 以上运行,改变的图元不是刚才添加的图元,而是以前的另一个图元的颜色,也就是获得Feature不是刚添加的Feature。 |
|
1楼#
发布于:2004-03-02 16:09
通过学习联机帮助文件,解决了,谢谢
|
|
2楼#
发布于:2004-03-02 16:23
我用很长时间开发以下程序,实现了选择刚添加的图元,现共享一下,希望多交流.. Dim F As New Feature Dim fNew As New Feature Set F = Map1.FeatureFactory.CreateRegion(Points, Map1.DefaultStyle) Set fNew = Map1.Layers(ToolBars.Combo3.ListIndex + 1).AddFeature(F) fNew.Update |
|