ILayer layer = mapControl.get_Layer(1); //layer 1 is usa_base_map
ILayer があります。ストリート レイヤーや鉄道レイヤーなどのさまざまなサブレイヤーにアクセスして、オンとオフを切り替えたいと考えています。これらのレイヤーにアクセスする方法を教えてください。
ILayer layer = mapControl.get_Layer(1); //layer 1 is usa_base_map
ILayer があります。ストリート レイヤーや鉄道レイヤーなどのさまざまなサブレイヤーにアクセスして、オンとオフを切り替えたいと考えています。これらのレイヤーにアクセスする方法を教えてください。
ICompositeLayer
グループレイヤーを(linky )にキャストしたいと思うでしょう。
ベースマップ サブレイヤーへのアクセス 次のコード例は、ベースマップ サブレイヤーにアクセスし、内部レイヤーを取得し、内部レイヤーのプロパティを更新し、ベースマップ レイヤーに変更を通知する方法を示しています。通知によってレイヤーの内部キャッシュが無効になり、コンテンツが再描画されて更新が反映されます。この例では、更新によってフィーチャ レイヤーの定義式がクリアされます。[C#]
private void UpdateBasemapSublayerAndNotify(IBasemapLayer basemapLayer, IMap map)
{
ICompositeLayer basemapCompositeLayer = basemapLayer as ICompositeLayer;
IBasemapSubLayer basemapSubLayer = basemapCompositeLayer.get_Layer(0)as
IBasemapSubLayer;
ILayer innerLayer = basemapSubLayer.Layer;
IFeatureLayer featureLayer = innerLayer as IFeatureLayer;
if (featureLayer != null)
{
IFeatureLayerDefinition featureLayerDef = featureLayer as
IFeatureLayerDefinition;
featureLayerDef.DefinitionExpression = "";
}
//When performing operations against the wrapped layer that change properties, you must
//notify the basemaplayer so the display cache can be recreated if necessary.
basemapLayer.NotifyLayerChanged(basemapSubLayer as ILayer,
esriLayerEventHint.esriLayerEventHintProperties, null);
IActiveView activeView = map as IActiveView;
activeView.PartialRefresh(esriViewDrawPhase.esriViewGeography, basemapLayer as
object, null);
}
[VB.NET]
Private Sub UpdateBasemapSublayerAndNotify(ByVal basemapLayer As IBasemapLayer, ByVal map As IMap)
Dim basemapCompositeLayer As ICompositeLayer = TryCast(basemapLayer, ICompositeLayer)
Dim basemapSubLayer As IBasemapSubLayer = TryCast(basemapCompositeLayer.get_Layer(0), IBasemapSubLayer)
Dim innerLayer As ILayer = basemapSubLayer.Layer
Dim featureLayer As IFeatureLayer = TryCast(innerLayer, IFeatureLayer)
If featureLayer IsNot Nothing Then
Dim featureLayerDef As IFeatureLayerDefinition = TryCast(featureLayer, IFeatureLayerDefinition)
featureLayerDef.DefinitionExpression = ""
End If
'When performing operations against the wrapped layer that change properties, you must
'notify the basemaplayer so the display cache can be recreated if necessary.
basemapLayer.NotifyLayerChanged(TryCast(basemapSubLayer, ILayer), esriLayerEventHint.esriLayerEventHintProperties, Nothing)
Dim activeView As IActiveView = TryCast(map, IActiveView)
activeView.PartialRefresh(esriViewDrawPhase.esriViewGeography, TryCast(basemapLayer, Object), Nothing)
End Sub