Buffer

This sample demonstrates use of a Local Geoprocessing Service to calculate a buffer. To use the sample, simply enter the buffer distance(kilometers) and click a point on the map. The click point and a buffer of the specified distance around the point will be shown. In the code-behind, a Local Geoprocessing Service is used to buffer the point.

XAML

<UserControl x:Class="ArcGISWPFSDK.LocalBuffer"
               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:PictureMarkerSymbol x:Key="DefaultClickSymbol" OffsetX="11" OffsetY="39" Source="/Assets/Images/i_pushpin.png" />
            <esri:FillSymbol x:Key="DefaultFillSymbol" >
                <esri:FillSymbol.ControlTemplate>
                    <ControlTemplate>
                        <Path x:Name="Element" IsHitTestVisible="False" Fill="#66FF0000" 
                            Stroke="Red" StrokeThickness="1"/>
                    </ControlTemplate>
                </esri:FillSymbol.ControlTemplate>
            </esri:FillSymbol>
            <esri:FillSymbol x:Key="ResultsFillSymbol">
                <esri:FillSymbol.ControlTemplate>
                    <ControlTemplate x:Name="CustomPolygonTemplate">
                        <Grid>
                            <VisualStateManager.VisualStateGroups>
                                <VisualStateGroup x:Name="CommonStates">
                                    <VisualState x:Name="Normal">
                                        <Storyboard>
                                            <ColorAnimation Storyboard.TargetName="Element"
                                                Storyboard.TargetProperty="(Fill).(Color)"
                                                To="#880000FF" Duration="0:0:0.1" />
                                        </Storyboard>
                                    </VisualState>
                                    <VisualState x:Name="MouseOver">
                                        <Storyboard>
                                            <ColorAnimation Storyboard.TargetName="Element"
                                                Storyboard.TargetProperty="(Fill).(Color)"
                                                To="#8800FFFF" Duration="0:0:0.1" />
                                        </Storyboard>
                                    </VisualState>
                                    <VisualState x:Name="Selected">
                                        <Storyboard>
                                            <ColorAnimation Storyboard.TargetName="Element"
                                                Storyboard.TargetProperty="(Fill).(Color)"
                                                To="#8800FFFF" Duration="0:0:0.1" />
                                        </Storyboard>
                                    </VisualState>
                                </VisualStateGroup>
                            </VisualStateManager.VisualStateGroups>
                            <Path x:Name="Element" Stroke="Blue" Fill="#880000FF"
                                StrokeStartLineCap="Round" StrokeThickness="2" 
                                StrokeLineJoin="Round" StrokeEndLineCap="Round" />
                        </Grid>
                    </ControlTemplate>
                </esri:FillSymbol.ControlTemplate>
            </esri:FillSymbol>
            <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" Extent="-15000000,2000000,-7000000,8000000" Background="#FFE3E3E3" MinimumResolution="2445.98490512499">
            <esri:ArcGISLocalTiledLayer ID="BaseMap" Path="..\\Data\\TPKs\\Topographic.tpk"/>
            <esri:GraphicsLayer ID="MyGraphicsLayer"/>
        </esri:Map>
        <Grid HorizontalAlignment="Right" VerticalAlignment="Top" Margin="0,15,15,0" Width="350" >
            <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="10,10,10,15" />
            <TextBlock x:Name="InformationText" Foreground="Black" Text="Enter a buffer distance" 
                HorizontalAlignment="Center" VerticalAlignment="Top" TextAlignment="Left" Margin="30,20,20,30" TextWrapping="Wrap" />
            <TextBox Height="23" Margin="246,17,0,42" Name="txtBoxDist" Text="500" Width="37" HorizontalAlignment="Left" />
            <TextBlock x:Name="InformationText2" Foreground="Black" Text="Km" HorizontalAlignment="Center" VerticalAlignment="Top" TextAlignment="Left" Margin="289,20,43,0" TextWrapping="Wrap" ></TextBlock>
            <TextBlock x:Name="InformationText3" Foreground="Black" Text="Click on the map to specify the location"   HorizontalAlignment="Center" VerticalAlignment="Top" TextAlignment="Left" Margin="75,42,43,0"></TextBlock>
        </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.Collections.Generic;
using System.Windows;
using System.Windows.Controls;
using System.Windows.Documents;
using ESRI.ArcGIS.Client;
using ESRI.ArcGIS.Client.Tasks;
using ESRI.ArcGIS.Client.Local;
using System.ComponentModel;

namespace ArcGISWPFSDK
{
    public partial class LocalBuffer : 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"));
                }
            }
        }
        Geoprocessor _gpTask;

        public LocalBuffer()
        {
            InitializeComponent();

            LocalGeoprocessingService.GetServiceAsync(@"..\\Data\\GPKs\\SimpleBuffer\\SimpleBuffer.gpk", GPServiceType.Execute, (gpService) =>
            {
                if (gpService.Error != null)
                {
                    MessageBox.Show(gpService.Error.Message);
                }
                _gpTask = new Geoprocessor(gpService.Tasks[0].Url);
                MyMap.MouseClick += MyMap_MouseClick;
                DataContext = this;
                IsBusy = false;
            });
        }

        private void MyMap_MouseClick(object sender, ESRI.ArcGIS.Client.Map.MouseEventArgs e)
        {
            IsBusy = true;
            _gpTask.CancelAsync();
            GraphicsLayer graphicsLayer = MyMap.Layers["MyGraphicsLayer"] as GraphicsLayer;
            graphicsLayer.ClearGraphics();
            e.MapPoint.SpatialReference = MyMap.SpatialReference;
            Graphic graphic = new ESRI.ArcGIS.Client.Graphic()
            {
                Geometry = e.MapPoint,
                Symbol = LayoutRoot.Resources["DefaultClickSymbol"] as ESRI.ArcGIS.Client.Symbols.Symbol
            };
            graphic.SetZIndex(1);
            graphicsLayer.Graphics.Add(graphic);
            List<GPParameter> gpParams = new List<GPParameter>();
            double dist = System.Convert.ToDouble(txtBoxDist.Text);
            var g = new Graphic { Geometry = e.MapPoint };
            var fs = new FeatureSet(new List<Graphic> { g });
            gpParams.Add(new GPFeatureRecordSetLayer("InputFeatures", fs));
            gpParams.Add(new GPLinearUnit("Distance", esriUnits.esriKilometers, dist));

            _gpTask.ExecuteCompleted += (s, e1) =>
            {
                GPExecuteResults results = e1.Results;
                GPFeatureRecordSetLayer rs = results.OutParameters[0] as GPFeatureRecordSetLayer;
                Graphic graphicBuff = new ESRI.ArcGIS.Client.Graphic()
                {
                    Geometry = rs.FeatureSet.Features[0].Geometry,
                    Symbol = LayoutRoot.Resources["ResultsFillSymbol"] as ESRI.ArcGIS.Client.Symbols.Symbol
                };
                graphicsLayer.Graphics.Add(graphicBuff);
                IsBusy = false;
            };
            _gpTask.Failed += (s2, e2) =>
            {
                MessageBox.Show(e2.Error.Message);
                IsBusy = false;
            };
            _gpTask.ExecuteAsync(gpParams);
        }

    }
}

VB.NET

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

Namespace ArcGISWPFSDK
    Partial Public Class LocalBuffer
        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 _gpTask As Geoprocessor
        Dim graphicsLayer As GraphicsLayer

        Public Sub New()
            InitializeComponent()

            LocalGeoprocessingService.GetServiceAsync("..\\Data\\GPKs\\SimpleBuffer\\SimpleBuffer.gpk", GPServiceType.Execute, Function(gpService)
                                                                                                                                   If gpService.[Error] IsNot Nothing Then
                                                                                                                                       MessageBox.Show(gpService.[Error].Message)
                                                                                                                                   End If
                                                                                                                                   _gpTask = New Geoprocessor(gpService.UrlGeoprocessingService & "/" & "SimpleBuffer")
                                                                                                                                   AddHandler MyMap.MouseClick, AddressOf MyMap_MouseClick
                                                                                                                                   DataContext = Me
                                                                                                                                   IsBusy = False
                                                                                                                               End Function)
        End Sub

        Private Sub MyMap_MouseClick(sender As Object, e As ESRI.ArcGIS.Client.Map.MouseEventArgs)
            IsBusy = True
            _gpTask.CancelAsync()
            graphicsLayer = TryCast(MyMap.Layers("MyGraphicsLayer"), GraphicsLayer)
            graphicsLayer.ClearGraphics()
            e.MapPoint.SpatialReference = MyMap.SpatialReference
            Dim graphic As Graphic = New ESRI.ArcGIS.Client.Graphic() With { _
             .Geometry = e.MapPoint, _
             .Symbol = TryCast(LayoutRoot.Resources("DefaultClickSymbol"), ESRI.ArcGIS.Client.Symbols.Symbol) _
            }
            graphic.SetZIndex(1)
            graphicsLayer.Graphics.Add(graphic)
            Dim gpParams As New List(Of GPParameter)()
            Dim dist As Double = System.Convert.ToDouble(txtBoxDist.Text)
            Dim g As New Graphic() With { _
             .Geometry = e.MapPoint _
            }
            Dim fs As New FeatureSet(New List(Of Graphic)() From { _
             g _
            })
            gpParams.Add(New GPFeatureRecordSetLayer("InputFeatures", fs))
            gpParams.Add(New GPLinearUnit("Distance", esriUnits.esriKilometers, dist))

            AddHandler _gpTask.ExecuteCompleted, AddressOf GpExecuteCompleted
            AddHandler _gpTask.Failed, AddressOf GpTaskFailed
            _gpTask.ExecuteAsync(gpParams)
        End Sub


        Private Sub GpExecuteCompleted(sender As Object, e As GPExecuteCompleteEventArgs)

            Dim results As GPExecuteResults = e.Results
            Dim rs As GPFeatureRecordSetLayer = TryCast(results.OutParameters(0), GPFeatureRecordSetLayer)
            Dim graphicBuff As Graphic = New ESRI.ArcGIS.Client.Graphic() With { _
             .Geometry = rs.FeatureSet.Features(0).Geometry, _
             .Symbol = TryCast(LayoutRoot.Resources("ResultsFillSymbol"), ESRI.ArcGIS.Client.Symbols.Symbol) _
            }
            graphicsLayer.Graphics.Add(graphicBuff)
            IsBusy = False
        End Sub

        Private Sub GpTaskFailed(sender As Object, e As TaskFailedEventArgs)
            MessageBox.Show(e.[Error].Message)
            IsBusy = False
        End Sub
    End Class
End Namespace