Contour

This sample demonstrates using the Contour geoprocessing tool to creates a feature class of contours (isolines) from local raster data. To use the sample, specify a interval, then click on the generate button. The contour lines will be returned and drawn on the map. This sample demonstrates an asynchronous geoprocessing operation whereby the result is returned as a map service or added to the graphics layer depending on the number of features returned. When less than 100 features are returned the result is added to the graphics layer and when there are more than 100 features returned the results are displayed as a map service to improve performance.

XAML

<UserControl x:Class="ArcGISWPFSDK.LocalContour"
    xmlns="http://schemas.microsoft.com/winfx/2006/xaml/presentation" 
    xmlns:x="http://schemas.microsoft.com/winfx/2006/xaml" 
    xmlns:esri="http://schemas.esri.com/arcgis/client/2009">
    <Grid x:Name="LayoutRoot" Background="White">
        <Grid.Resources>
            <BooleanToVisibilityConverter x:Key="BooleanToVisibilityConverter"/>
            <esri:SimpleLineSymbol x:Key="ResultsLineSymbol" Color="Red" Width="2" />
            <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>
        <esri:Map x:Name="MyMap" Background="Gray" Extent="471060.082572495,231352.353396819,494700.082572495,208312.353396819">
            <esri:ArcGISLocalTiledLayer ID="arcGISLocalTiledLayer" Path="..\\Data\\TPKs\\RasterHillshade.tpk"/>
            <esri:GraphicsLayer ID="MyResultGraphicsLayer" />
        </esri:Map>
        <Grid HorizontalAlignment="Right" VerticalAlignment="Top" Margin="0,15,15,0" >
            <Rectangle Fill="{StaticResource PanelGradient}" Stroke="Gray"  RadiusX="10" RadiusY="10" Margin="0,0,0,5">
                <Rectangle.Effect>
                    <DropShadowEffect/>
                </Rectangle.Effect>
            </Rectangle>
            <Rectangle Fill="#FFFFFFFF" Stroke="DarkGray" RadiusX="5" RadiusY="5" Margin="5,5,5,10" />
            <StackPanel Orientation="Vertical" Margin="10,10,10,10" HorizontalAlignment="Left" >
                <TextBlock Text="Spatial Analyst Contour tool" HorizontalAlignment="Center" FontWeight="Bold" Foreground="Black"
                           Margin="5,5,5,5" Height="17" Width="251" />
                <TextBlock x:Name="InformationTextBlock" Text="Specify the interval, or distance, between contour lines and click the Generate Contours button."
                    Width="253" TextWrapping="Wrap" Foreground="Black" Height="50" />
                <StackPanel Orientation="Horizontal" HorizontalAlignment="Center" Margin="5,5,5,10">
                    <TextBlock Text="Interval: " VerticalAlignment="Center" Foreground="Black" />
                    <TextBox x:Name="IntervalTextBox" Text="500" Width="35" TextAlignment="Right" Margin="0,0,5,0" />
                    <Button x:Name="GenerateButton" Content="Generate Results" Click="GenerateButton_Click" IsEnabled="False" />
                    <Button x:Name="ClearButton" Content="Clear Results" Click="ClearButton_Click" IsEnabled="false" Margin="5,0,0,0"/>
                </StackPanel>
                <TextBlock x:Name="ProcessingTextBlock" MaxWidth="150" Margin="0,0,0,5" Visibility="Collapsed" 
                           HorizontalAlignment="Center" Text="Processing." TextWrapping="Wrap" Foreground="Black" />
            </StackPanel>
        </Grid>
        <ProgressBar x:Name="MyProgressBar" IsIndeterminate="True" VerticalAlignment="Bottom" Width="200" Height="20" Margin="10" Visibility="{Binding Path=IsBusy, Converter={StaticResource BooleanToVisibilityConverter}}"></ProgressBar>
    </Grid>
</UserControl>

C#

using System;
using System.Collections.Generic;
using System.Windows;
using System.Windows.Controls;
using System.Windows.Threading;
using ESRI.ArcGIS.Client;
using ESRI.ArcGIS.Client.Tasks;
using ESRI.ArcGIS.Client.Local;
using System.ComponentModel;

namespace ArcGISWPFSDK
{
    public partial class LocalContour : UserControl, INotifyPropertyChanged
    {
        public event PropertyChangedEventHandler PropertyChanged;

        private bool _isBusy = true;

        public bool IsBusy
        {
            get
            {
                return _isBusy;
            }
            set
            {
                _isBusy = value;

                if (PropertyChanged != null)
                {

                    PropertyChanged(this, new PropertyChangedEventArgs("IsBusy"));
                }
            }
        }    
        DispatcherTimer _processingTimer;
        Geoprocessor gpTask;
        GPResultImageLayer gpImageLayer;
        LocalGeoprocessingService _gpService;

        public LocalContour()
        {
            InitializeComponent();

            _processingTimer = new System.Windows.Threading.DispatcherTimer();
            _processingTimer.Interval = new TimeSpan(0, 0, 0, 0, 800);
            _processingTimer.Tick += ProcessingTimer_Tick;

            LocalGeoprocessingService.GetServiceAsync(@"..\\Data\\GPKs\\Contour\\Contour.gpk", GPServiceType.SubmitJobWithMapServerResult, (gpService) =>
            {
                if (gpService.Error != null)
                {
                    MessageBox.Show(gpService.Error.Message);
                }
                _gpService = gpService;
                gpTask = new Geoprocessor(gpService.UrlGeoprocessingService + "/" +
               "Contour");
                GenerateButton.IsEnabled = true;
                DataContext = this;
                IsBusy = false;
            });
        }

        private void GeoprocessorTask_JobCompleted(object sender, JobInfoEventArgs e)
        {
            Geoprocessor geoprocessorTask = sender as Geoprocessor;

            geoprocessorTask.GetResultDataCompleted += (s1, e1) =>
            {
                GraphicsLayer graphicsLayer = MyMap.Layers["MyResultGraphicsLayer"] as GraphicsLayer;
                if (e1.Parameter is GPFeatureRecordSetLayer)
                {
                    GPFeatureRecordSetLayer gpLayer = e1.Parameter as GPFeatureRecordSetLayer;
                    if (gpLayer.FeatureSet.Features.Count > 100)
                    {
                        geoprocessorTask.GetResultImageLayerCompleted += (s2, e2) =>
                        {
                            gpImageLayer = e2.GPResultImageLayer;
                            gpImageLayer.Visible = true;
                            MyMap.Layers.Add(gpImageLayer);

                            _processingTimer.Stop();
                            ProcessingTextBlock.Text = "Greater than 100 features returned.  Results drawn using map service.";
                            ClearButton.IsEnabled = true;
                            GenerateButton.IsEnabled = false;
                            geoprocessorTask.CancelAsync();
                        };

                        geoprocessorTask.GetResultImageLayerAsync(e.JobInfo.JobId, "Contour_Result");
                        return;
                    }

                    foreach (Graphic graphic in gpLayer.FeatureSet.Features)
                    {
                        graphic.Symbol = LayoutRoot.Resources["ResultsLineSymbol"] as ESRI.ArcGIS.Client.Symbols.Symbol;
                        graphicsLayer.Graphics.Add(graphic);
                    }
                }

                _processingTimer.Stop();
                ProcessingTextBlock.Text = "Less than 100 features returned.  Results drawn using graphics layer.";
                ClearButton.IsEnabled = true;
                GenerateButton.IsEnabled = false;
                geoprocessorTask.CancelAsync();
            };

            geoprocessorTask.GetResultDataAsync(e.JobInfo.JobId, "Contour_Result");
        }

        private void GenerateButton_Click(object sender, RoutedEventArgs e)
        {
            gpTask = new Geoprocessor(_gpService.UrlGeoprocessingService + "/" +
              "Contour");

            ProcessingTextBlock.Visibility = Visibility.Visible;
            _processingTimer.Start();

            gpTask.UpdateDelay = 5000;
            gpTask.JobCompleted += GeoprocessorTask_JobCompleted;

            double interval = Convert.ToDouble(IntervalTextBox.Text);
            List<GPParameter> gpParams = new List<GPParameter>();
            gpParams.Add(new GPDouble("Interval", interval));
            gpTask.SubmitJobAsync(gpParams);
        }

        private void ClearButton_Click(object sender, RoutedEventArgs e)
        {
            List<Layer> gpResultImageLayers = new List<Layer>();
            foreach (Layer layer in MyMap.Layers)
                if (layer is GraphicsLayer)
                    (layer as GraphicsLayer).ClearGraphics();
                else if (layer is GPResultImageLayer)
                    gpResultImageLayers.Add(layer);
            for (int i = 0; i < gpResultImageLayers.Count; i++)
                MyMap.Layers.Remove(gpResultImageLayers[i]);

            ProcessingTextBlock.Text = "";
            ProcessingTextBlock.Visibility = Visibility.Collapsed;

            ClearButton.IsEnabled = false;
            GenerateButton.IsEnabled = true;
        }

        void ProcessingTimer_Tick(object sender, EventArgs e)
        {
            if (ProcessingTextBlock.Text.Length > 20 || !ProcessingTextBlock.Text.StartsWith("Processing"))
                ProcessingTextBlock.Text = "Processing.";
            else
                ProcessingTextBlock.Text = ProcessingTextBlock.Text + ".";
        }
    }
}

VB.NET

Imports System.Collections.Generic
Imports System.Windows
Imports System.Windows.Controls
Imports System.Windows.Threading
Imports ESRI.ArcGIS.Client
Imports ESRI.ArcGIS.Client.Tasks
Imports ESRI.ArcGIS.Client.Local
Imports System.ComponentModel

Namespace ArcGISWPFSDK
    Partial Public Class LocalContour
        Inherits UserControl
        Implements INotifyPropertyChanged
        Public Event PropertyChanged As PropertyChangedEventHandler Implements INotifyPropertyChanged.PropertyChanged
        Private _isBusy As Boolean = True
        Public Property IsBusy() As Boolean
            Get
                Return _isBusy
            End Get
            Set(value As Boolean)
                _isBusy = value

                RaiseEvent PropertyChanged(Me, New PropertyChangedEventArgs("IsBusy"))
            End Set
        End Property
        Private _processingTimer As DispatcherTimer
        Private gpTask As Geoprocessor
        Private gpImageLayer As GPResultImageLayer
        Private _gpService As LocalGeoprocessingService

        Public Sub New()
            InitializeComponent()

            _processingTimer = New System.Windows.Threading.DispatcherTimer()
            _processingTimer.Interval = New TimeSpan(0, 0, 0, 0, 800)
            AddHandler _processingTimer.Tick, AddressOf ProcessingTimer_Tick

            LocalGeoprocessingService.GetServiceAsync("..\\Data\\GPKs\\Contour\\Contour.gpk", GPServiceType.SubmitJobWithMapServerResult, Function(gpService)
                                                                                                                                              If gpService.[Error] IsNot Nothing Then
                                                                                                                                                  MessageBox.Show(gpService.[Error].Message)
                                                                                                                                              End If
                                                                                                                                              _gpService = gpService
                                                                                                                                              gpTask = New Geoprocessor(gpService.UrlGeoprocessingService & "/" & "Contour")
                                                                                                                                              GenerateButton.IsEnabled = True
                                                                                                                                              DataContext = Me
                                                                                                                                              IsBusy = False
                                                                                                                                          End Function)
        End Sub

        Private Sub GeoprocessorTask_JobCompleted(sender As Object, e As JobInfoEventArgs)
            Dim geoprocessorTask As Geoprocessor = TryCast(sender, Geoprocessor)

            AddHandler geoprocessorTask.GetResultDataCompleted, Function(s1, e1)
                                                                    Dim graphicsLayer As GraphicsLayer = TryCast(MyMap.Layers("MyResultGraphicsLayer"), GraphicsLayer)
                                                                    If TypeOf e1.Parameter Is GPFeatureRecordSetLayer Then
                                                                        Dim gpLayer As GPFeatureRecordSetLayer = TryCast(e1.Parameter, GPFeatureRecordSetLayer)
                                                                        If gpLayer.FeatureSet.Features.Count > 100 Then
                                                                            AddHandler geoprocessorTask.GetResultImageLayerCompleted, Function(s2, e2)
                                                                                                                                          gpImageLayer = e2.GPResultImageLayer
                                                                                                                                          gpImageLayer.Visible = True
                                                                                                                                          MyMap.Layers.Add(gpImageLayer)

                                                                                                                                          _processingTimer.[Stop]()
                                                                                                                                          ProcessingTextBlock.Text = "Greater than 100 features returned.  Results drawn using map service."
                                                                                                                                          ClearButton.IsEnabled = True
                                                                                                                                          GenerateButton.IsEnabled = False
                                                                                                                                          geoprocessorTask.CancelAsync()

                                                                                                                                      End Function

                                                                            geoprocessorTask.GetResultImageLayerAsync(e.JobInfo.JobId, "Contour_Result")
                                                                        End If

                                                                        For Each graphic As Graphic In gpLayer.FeatureSet.Features
                                                                            graphic.Symbol = TryCast(LayoutRoot.Resources("ResultsLineSymbol"), ESRI.ArcGIS.Client.Symbols.Symbol)
                                                                            graphicsLayer.Graphics.Add(graphic)
                                                                        Next
                                                                    End If

                                                                    _processingTimer.[Stop]()
                                                                    ProcessingTextBlock.Text = "Less than 100 features returned.  Results drawn using graphics layer."
                                                                    ClearButton.IsEnabled = True
                                                                    GenerateButton.IsEnabled = False
                                                                    geoprocessorTask.CancelAsync()

                                                                End Function

            geoprocessorTask.GetResultDataAsync(e.JobInfo.JobId, "Contour_Result")
        End Sub

        Private Sub GenerateButton_Click(sender As Object, e As RoutedEventArgs)
            gpTask = New Geoprocessor(_gpService.UrlGeoprocessingService & "/" & "Contour")

            ProcessingTextBlock.Visibility = Visibility.Visible
            _processingTimer.Start()

            gpTask.UpdateDelay = 5000
            AddHandler gpTask.JobCompleted, AddressOf GeoprocessorTask_JobCompleted

            Dim interval As Double = Convert.ToDouble(IntervalTextBox.Text)
            Dim gpParams As New List(Of GPParameter)()
            gpParams.Add(New GPDouble("Interval", interval))
            gpTask.SubmitJobAsync(gpParams)
        End Sub

        Private Sub ClearButton_Click(sender As Object, e As RoutedEventArgs)
            Dim gpResultImageLayers As New List(Of Layer)()
            For Each layer As Layer In MyMap.Layers
                If TypeOf layer Is GraphicsLayer Then
                    TryCast(layer, GraphicsLayer).ClearGraphics()
                ElseIf TypeOf layer Is GPResultImageLayer Then
                    gpResultImageLayers.Add(layer)
                End If
            Next
            For i As Integer = 0 To gpResultImageLayers.Count - 1
                MyMap.Layers.Remove(gpResultImageLayers(i))
            Next

            ProcessingTextBlock.Text = ""
            ProcessingTextBlock.Visibility = Visibility.Collapsed

            ClearButton.IsEnabled = False
            GenerateButton.IsEnabled = True
        End Sub

        Private Sub ProcessingTimer_Tick(sender As Object, e As EventArgs)
            If ProcessingTextBlock.Text.Length > 20 OrElse Not ProcessingTextBlock.Text.StartsWith("Processing") Then
                ProcessingTextBlock.Text = "Processing."
            Else
                ProcessingTextBlock.Text = ProcessingTextBlock.Text & "."
            End If
        End Sub
    End Class

End Namespace