YouTube | Facebook | Twitter  Feed

選択(VerboseEvents)のインデックス(データ フレーム・(VerboseEvents))を取得

2016/9/1 (木)

public object SelectedLayerInformation(IMxDocument pMxDocument, ref Inteer FrameIndex, ref int LayerIndex)
{
    int intFrame = 0;
    int intLayer = 0;
    bool blnFrag = false;
    IMap pMap = default(IMap);
    //選択したレイヤのデータフレーム インデックス、レイヤ インデックスを取得
    for (intFrame = 0; intFrame <= pMxDocument.Maps.Count - 1; intFrme++) {
        pMap = pMxDocument.Maps.Item(intFrame);
        for (intLayer = 0; intLayer <= pMap.LayerCount - 1; intLyer++) {
            if (object.ReferenceEquals(pMxDocument.SelectedLyer, pMap.Layer(intLayer))) {
                blnFrag = true;
                break; // TODO: might not be correct. Wa : Exit For
            }
        }
        if (blnFrag == true) {
            break; // TODO: might not be correct. Was : ExitFor
        }
        break; // TODO: might not be correct. Was : Exit For
    }
    //戻り値
    FrameIndex = intFrame;
    LayerIndex = intLayer;
}
Function SelectedLayerInformation(ByVal pMxDocument As IMxDocument, ByRef FrameIndex As Integer, ByRef LayerIndex As Integer)
    Dim intFrame As Integer
    Dim intLayer As Integer
    Dim blnFrag As Boolean
     
    Dim pMap As IMap
 
    '選択したレイヤのデータフレーム インデックス、レイヤ インデックスを取得
    For intFrame = 0 To pMxDocument.Maps.Count - 1
        Set pMap = pMxDocument.Maps.Item(intFrame)
        For intLayer = 0 To pMap.LayerCount - 1
            If pMxDocument.SelectedLayer Is pMap.Layer(intLayer) Then
                blnFrag = True
                Exit For
            End If
        Next intLayer
        If blnFrag = True Then
            Exit For
        End If
    Exit For
     
    '戻り値
    FrameIndex = intFrame
    LayerIndex = intLayer
     
End Function

関連記事

  • この記事を書いた人

羽田 康祐

Esri認定インストラクター、GIS上級技術者、測量士補、潜水士。GISy / GISc とその関連分野である地理学・地図学について日々の出来事で学んだ記憶を記録するためにブログを書いています。行動原理は伊達と酔狂。好きな地形は圏谷。好きな地図投影法はパースクインカンシャル図法。呉市生まれ広島市出身。GIS を使った自己紹介はこちら

-プログラミング, ArcGIS
-,

© 2020 WINGFIELD since1981