YouTube | Facebook | X(Twitter) | RSS

選択(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
  • この記事を書いた人

羽田 康祐

伊達と酔狂のGISエンジニア。GIS上級技術者、Esri認定インストラクター、CompTIA CTT+ Classroom Trainer、潜水士、PADIダイブマスター、四アマ。WordPress は 2.1 からのユーザーで歴だけは長い。 代表著書『"地図リテラシー入門―地図の正しい読み方・描き方がわかる』 GIS を使った自己紹介はこちら。ESRIジャパン(株)所属、元青山学院大学非常勤講師を兼務。日本地図学会第31期常任委員。発言は個人の見解です。

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