Show Map Properties Online

This sample shows how to get initial map properties and layer details of layers.

XAML

<UserControl x:Class="ArcGISWPFSDK.ShowMapProperties"
             xmlns="http://schemas.microsoft.com/winfx/2006/xaml/presentation"
             xmlns:x="http://schemas.microsoft.com/winfx/2006/xaml"
             xmlns:mc="http://schemas.openxmlformats.org/markup-compatibility/2006" 
             xmlns:d="http://schemas.microsoft.com/expression/blend/2008" 
             xmlns:esri="http://schemas.esri.com/arcgis/client/2009">
    <Grid x:Name="LayoutRoot">
        <Grid.Resources>
            <LinearGradientBrush x:Key="PanelGradient" EndPoint="0.5,1" StartPoint="0.5,0">
                <LinearGradientBrush.RelativeTransform>
                    <TransformGroup>
                        <ScaleTransform CenterY="0.5" CenterX="0.5"/>
                        <SkewTransform CenterY="0.5" CenterX="0.5"/>
                        <RotateTransform Angle="176" CenterY="0.5" CenterX="0.5"/>
                        <TranslateTransform/>
                    </TransformGroup>
                </LinearGradientBrush.RelativeTransform>
                <GradientStop Color="#FF145787" Offset="0.16"/>
                <GradientStop Color="#FF3D7FAC" Offset="0.502"/>
                <GradientStop Color="#FF88C5EF" Offset="0.984"/>
            </LinearGradientBrush>
        </Grid.Resources>
        <Grid.ColumnDefinitions>
            <ColumnDefinition />
            <ColumnDefinition />
        </Grid.ColumnDefinitions>
        <esri:Map x:Name="MyMap" Extent="-9270434.248,5246977.326,-9269261.417,5247569.712"
                  Grid.Column="0">
            <esri:ArcGISTiledMapServiceLayer ID="StreetMapLayer" 
                      Url="http://services.arcgisonline.com/ArcGIS/rest/services/World_Street_Map/MapServer"/>
            <esri:ArcGISDynamicMapServiceLayer ID="BloomfieldHillsMichigan" 
                      Url="http://sampleserver3.arcgisonline.com/ArcGIS/rest/services/BloomfieldHillsMichigan/Parcels/MapServer"/>
        </esri:Map>
        <Grid Margin="1" Grid.Column="1" Background="White" VerticalAlignment="Stretch">
            <Border BorderBrush="{StaticResource PanelGradient}" BorderThickness="8">
                <ScrollViewer Margin="2">
                    <TextBlock x:Name="PropertiesTextBlock" Text="Initializing..." Foreground="Black" />
                </ScrollViewer>
            </Border>
        </Grid>
    </Grid>
</UserControl>

C#

using System.Text;
using System.Windows.Controls;
using ESRI.ArcGIS.Client;


namespace ArcGISWPFSDK
{
    public partial class ShowMapProperties : UserControl
    {
        public ShowMapProperties()
        {
            InitializeComponent();

            MyMap.Layers.LayersInitialized += Layers_LayersInitialized;
        }

        void Layers_LayersInitialized(object sender, System.EventArgs args)
        {
            StringBuilder sb = new StringBuilder();

            sb.AppendLine(string.Format("Spatial Reference: {0}", MyMap.SpatialReference.WKT != null ? MyMap.SpatialReference.WKT : MyMap.SpatialReference.WKID.ToString()));
            sb.AppendLine(string.Format("Minimum Resolution: {0}", MyMap.MinimumResolution));
            sb.AppendLine(string.Format("Maximum Resolution: {0}", MyMap.MaximumResolution));
            sb.AppendLine(string.Format("Width (pixels): {0}", MyMap.ActualWidth));
            sb.AppendLine(string.Format("Height (pixels): {0}", MyMap.ActualHeight));
            sb.AppendLine();
            sb.AppendLine(string.Format("---Map Layers ({0})---", MyMap.Layers.Count));
            sb.AppendLine();

            foreach (Layer layer in MyMap.Layers)
            {
                sb.AppendLine(string.Format("ID: {0}", layer.ID));
                sb.AppendLine(string.Format("Type: {0}", layer.GetType().ToString()));
                sb.AppendLine(string.Format("Visibilty : {0}", layer.Visible));
                sb.AppendLine(string.Format("Opacity : {0}", layer.Opacity));
                if (layer is ArcGISDynamicMapServiceLayer)
                {
                    ArcGISDynamicMapServiceLayer dynLayer = layer as ArcGISDynamicMapServiceLayer;
                    sb.AppendLine(string.Format("\t---Layers ({0})---", MyMap.Layers.Count));

                    foreach (LayerInfo layerinfo in dynLayer.Layers)
                    {
                        sb.AppendLine(string.Format("\tID: {0}", layerinfo.ID));
                        sb.AppendLine(string.Format("\tName: {0}", layerinfo.Name));
                        sb.AppendLine(string.Format("\tDefault Visibility: {0}", layerinfo.DefaultVisibility));

                        sb.AppendLine(string.Format("\tMinimum Scale: {0}", layerinfo.MinScale));
                        sb.AppendLine(string.Format("\tMaximum Scale: {0}", layerinfo.MaxScale));
                        if (layerinfo.SubLayerIds != null)
                            sb.AppendLine(string.Format("\tSubLayer IDs:{0}", layerinfo.SubLayerIds.ToString()));
                        sb.AppendLine();
                    }
                }
                if (layer is ArcGISTiledMapServiceLayer)
                {
                    ArcGISTiledMapServiceLayer tiledLayer = layer as ArcGISTiledMapServiceLayer;
                    TileInfo ti = tiledLayer.TileInfo;
                    sb.AppendLine("Levels and Resolution :");
                    for (int i = 0; i < ti.Lods.Length; i++)
                    {
                        if (i < 10)
                            sb.Append(string.Format("Level: {0}\t \t Resolution: {1}\r", i, ti.Lods[i].Resolution));
                        else
                            sb.Append(string.Format("Level: {0}\t Resolution: {1}\r", i, ti.Lods[i].Resolution));
                    }
                }
                sb.AppendLine();
            }

            PropertiesTextBlock.Text = sb.ToString();
        }
    }
}

VB.NET

Imports System.Text
Imports System.Windows.Controls
Imports ESRI.ArcGIS.Client

Namespace ArcGISWPFSDK

    Partial Public Class ShowMapProperties
        Inherits UserControl
        Public Sub New()
            InitializeComponent()

            AddHandler MyMap.Layers.LayersInitialized, AddressOf Layers_LayersInitialized
        End Sub

        Private Sub Layers_LayersInitialized(sender As Object, args As System.EventArgs)
            Dim sb As New StringBuilder()

            sb.AppendLine(String.Format("Spatial Reference: {0}", If(MyMap.SpatialReference.WKT IsNot Nothing, MyMap.SpatialReference.WKT, MyMap.SpatialReference.WKID.ToString())))
            sb.AppendLine(String.Format("Minimum Resolution: {0}", MyMap.MinimumResolution))
            sb.AppendLine(String.Format("Maximum Resolution: {0}", MyMap.MaximumResolution))
            sb.AppendLine(String.Format("Width (pixels): {0}", MyMap.ActualWidth))
            sb.AppendLine(String.Format("Height (pixels): {0}", MyMap.ActualHeight))
            sb.AppendLine()
            sb.AppendLine(String.Format("---Map Layers ({0})---", MyMap.Layers.Count))
            sb.AppendLine()

            For Each layer As Layer In MyMap.Layers
                sb.AppendLine(String.Format("ID: {0}", layer.ID))
                sb.AppendLine(String.Format("Type: {0}", layer.[GetType]().ToString()))
                sb.AppendLine(String.Format("Visibilty : {0}", layer.Visible))
                sb.AppendLine(String.Format("Opacity : {0}", layer.Opacity))
                If TypeOf layer Is ArcGISDynamicMapServiceLayer Then
                    Dim dynLayer As ArcGISDynamicMapServiceLayer = TryCast(layer, ArcGISDynamicMapServiceLayer)
                    sb.AppendLine(String.Format(vbTab & "---Layers ({0})---", MyMap.Layers.Count))

                    For Each layerinfo As LayerInfo In dynLayer.Layers
                        sb.AppendLine(String.Format(vbTab & "ID: {0}", layerinfo.ID))
                        sb.AppendLine(String.Format(vbTab & "Name: {0}", layerinfo.Name))
                        sb.AppendLine(String.Format(vbTab & "Default Visibility: {0}", layerinfo.DefaultVisibility))

                        sb.AppendLine(String.Format(vbTab & "Minimum Scale: {0}", layerinfo.MinScale))
                        sb.AppendLine(String.Format(vbTab & "Maximum Scale: {0}", layerinfo.MaxScale))
                        If layerinfo.SubLayerIds IsNot Nothing Then
                            sb.AppendLine(String.Format(vbTab & "SubLayer IDs:{0}", layerinfo.SubLayerIds.ToString()))
                        End If
                        sb.AppendLine()
                    Next
                End If
                If TypeOf layer Is ArcGISTiledMapServiceLayer Then
                    Dim tiledLayer As ArcGISTiledMapServiceLayer = TryCast(layer, ArcGISTiledMapServiceLayer)
                    Dim ti As TileInfo = tiledLayer.TileInfo
                    sb.AppendLine("Levels and Resolution :")
                    For i As Integer = 0 To ti.Lods.Length - 1
                        If i < 10 Then
                            sb.Append(String.Format("Level: {0}" & vbTab & " " & vbTab & " Resolution: {1}" & vbCr, i, ti.Lods(i).Resolution))
                        Else
                            sb.Append(String.Format("Level: {0}" & vbTab & " Resolution: {1}" & vbCr, i, ti.Lods(i).Resolution))
                        End If
                    Next
                End If
                sb.AppendLine()
            Next

            PropertiesTextBlock.Text = sb.ToString()
        End Sub
    End Class
End Namespace