Auto Complete

This sample demonstrates using the ArcGIS Runtime SDK for WPF to perform a geometry operation that takes an input polyline graphic and makes a redline polygon graphic output.

To use the sample, connect the dots to create a polyline which defines a boundary for a new polygon. Double click the final dot (#3) to auto complete the polygon boundary.

In the code-behind, a LocalGeometryService is started. The url is passed into a GeometryService, which is used to takes the input polyline to attempt to make a closed polygon and if successful the output redline polygon graphic is returned.

XAML

<UserControl x:Class="ArcGISWPFSDK.LocalAutoComplete"
    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">

        <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>
            <esri:SimpleMarkerSymbol x:Key="BlackMarkerSymbol" Color="Black" Size="10" />
            <esri:SimpleLineSymbol x:Key="RedLineSymbol" Color="Red" Width="4" Style="Solid" />
            <esri:SimpleFillSymbol x:Key="BlueFillSymbol" Fill="#660000FF" BorderBrush="Blue" BorderThickness="2" />
            <esri:SimpleFillSymbol x:Key="RedFillSymbol" Fill="#66FF0000" BorderBrush="Red" BorderThickness="2" />
        </Grid.Resources>

        <esri:Map x:Name="MyMap" Extent="-15000000,2000000,-7000000,8000000" Background="#FFE3E3E3" IsEnabled="False">
            <esri:ArcGISLocalTiledLayer ID="BaseMap" Path="..\\Data\\TPKs\\Topographic.tpk"/>
            <esri:GraphicsLayer ID="ParcelsGraphicsLayer" x:Name="_parcelsGraphicsLayer"/>
            <esri:GraphicsLayer ID="CompletedGraphicsLayer" x:Name="_completedGraphicsLayer"/>
            <esri:GraphicsLayer ID="ConnectDotsGraphicsLayer">
                <esri:Graphic Symbol="{StaticResource BlackMarkerSymbol}">
                    <esri:MapPoint X="-12944384" Y="6804466" />
                    <esri:Graphic.MapTip>
                        <TextBlock Text="Click" FontSize="12" Foreground="White" >
                            <TextBlock.Effect>
                                 <DropShadowEffect Opacity="1" ShadowDepth="2"/>
                            </TextBlock.Effect>
                        </TextBlock>
                    </esri:Graphic.MapTip>
                </esri:Graphic>
                <esri:Graphic>
                    <esri:Graphic.Symbol>
                        <esri:TextSymbol FontFamily="Arial" FontSize="16" Foreground="Black" 
                                                Text="2" OffsetX="-5" OffsetY="15"/>
                    </esri:Graphic.Symbol>
                    <esri:MapPoint X="-12944384" Y="6804466"/>
                </esri:Graphic>
                <esri:Graphic Symbol="{StaticResource BlackMarkerSymbol}">
                    <esri:MapPoint X="-12834399" Y="6207201" />
                    <esri:Graphic.MapTip>
                        <TextBlock Text="Click" FontSize="12" Foreground="White" >
                            <TextBlock.Effect>
                                 <DropShadowEffect Opacity="1" ShadowDepth="2"/>
                            </TextBlock.Effect>
                        </TextBlock>
                    </esri:Graphic.MapTip>
                </esri:Graphic>
                <esri:Graphic>
                    <esri:Graphic.Symbol>
                        <esri:TextSymbol FontFamily="Arial" FontSize="16" Foreground="Black" 
                                                Text="1" OffsetX="-5" OffsetY="15" />
                    </esri:Graphic.Symbol>
                    <esri:MapPoint X="-12834399" Y="6207201" />
                </esri:Graphic>

                <esri:Graphic Symbol="{StaticResource BlackMarkerSymbol}">
                    <esri:MapPoint X="-11690605" Y="6154733" />
                    <esri:Graphic.MapTip>
                        <TextBlock Text="Double click" FontSize="12" Foreground="White" >
                            <TextBlock.Effect>
                                 <DropShadowEffect Opacity="1" ShadowDepth="2"/>
                            </TextBlock.Effect>
                        </TextBlock>
                    </esri:Graphic.MapTip>
                </esri:Graphic>
                <esri:Graphic>
                    <esri:Graphic.Symbol>
                        <esri:TextSymbol FontFamily="Arial" FontSize="16" Foreground="Black" 
                                                Text="3" OffsetX="-5" OffsetY="15" />
                    </esri:Graphic.Symbol>
                    <esri:MapPoint X="-11690605" Y="6154733" />
                </esri:Graphic>
            </esri:GraphicsLayer>
        </esri:Map>

        <Grid HorizontalAlignment="Right" VerticalAlignment="Top" Margin="0,10,10,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="10,10,10,15" />
            <TextBlock x:Name="ResponseTextBlock" Foreground="Black" Text="Connect the dots to create a polyline which defines a boundary for a new polygon.  Double click the final dot (#3) to auto complete the polygon boundary." 
                       Width="200" TextAlignment="Left" Margin="30,20,20,30" TextWrapping="Wrap" />
        </Grid>
    </Grid>
</UserControl>

C#

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

namespace ArcGISWPFSDK
{
    public partial class LocalAutoComplete : UserControl
    {
        private Draw _drawObject;
        GeometryService _geometryTask;
        QueryTask _queryTask;

        public LocalAutoComplete()
        {
            InitializeComponent();

            MyMap.Layers.LayersInitialized += (s,e)=>
            {
                LocalMapService.GetServiceAsync("..\\Data\\MPKS\\USCitiesStates.mpk", (localMapService) =>
                {
                    _queryTask = new QueryTask();
                    _queryTask.Url = localMapService.UrlMapService + "/2";
                    Query query = new Query();
                    query.Geometry = MyMap.Extent;
                    query.ReturnGeometry = true;
                    query.Where = "\"STATE_NAME\" = 'Montana'";
                    _queryTask.ExecuteCompleted += queryTask_ExecuteCompleted;
                    _queryTask.Failed += queryTask_Failed;
                    _queryTask.ExecuteAsync(query);
                });

                _drawObject = new Draw(MyMap)
                {
                    DrawMode = DrawMode.Polyline,
                    IsEnabled = true,
                    LineSymbol = LayoutRoot.Resources["RedLineSymbol"] as ESRI.ArcGIS.Client.Symbols.LineSymbol
                };
                _drawObject.DrawComplete += DrawObject_DrawComplete;
                MyMap.MinimumResolution = double.Epsilon;
            };

            LocalGeometryService.GetServiceAsync(localGeometryService => 
            {
                _geometryTask = new GeometryService();
                _geometryTask.Url = localGeometryService.UrlGeometryService;
                _geometryTask.AutoCompleteCompleted += GeometryService_AutoCompleteCompleted;
                _geometryTask.Failed += GeometryService_Failed;
            });
        }
        
        void queryTask_Failed(object sender, TaskFailedEventArgs e)
        {
            MessageBox.Show("Query error: " + e.Error);
        }

        void queryTask_ExecuteCompleted(object sender, QueryEventArgs e)
        {
            foreach (Graphic g in e.FeatureSet.Features)
            {
                g.Symbol = LayoutRoot.Resources["BlueFillSymbol"] as ESRI.ArcGIS.Client.Symbols.Symbol;
                _parcelsGraphicsLayer.Graphics.Add(g);
            }

            MyMap.IsEnabled = true;
        }

        private void DrawObject_DrawComplete(object sender, DrawEventArgs args)
        {
            ESRI.ArcGIS.Client.Geometry.Polyline polyline = args.Geometry as ESRI.ArcGIS.Client.Geometry.Polyline;
            Graphic polylineGraphic = new Graphic()
            {
                Geometry = polyline
            };
            List<Graphic> polylineList = new List<Graphic>();
            polylineList.Add(polylineGraphic);

            GraphicsLayer graphicsLayer = MyMap.Layers["ParcelsGraphicsLayer"] as GraphicsLayer;
            List<Graphic> polygonList = new List<Graphic>();
            foreach (Graphic g in graphicsLayer.Graphics)
            {
                g.Geometry.SpatialReference = MyMap.SpatialReference;
                polygonList.Add(g);
            }

            _geometryTask.AutoCompleteAsync(polygonList, polylineList);
        }

        void GeometryService_AutoCompleteCompleted(object sender, GraphicsEventArgs e)
        {
            _completedGraphicsLayer.ClearGraphics();

            foreach (Graphic g in e.Results)
            {
                g.Symbol = LayoutRoot.Resources["RedFillSymbol"] as ESRI.ArcGIS.Client.Symbols.Symbol;
                _completedGraphicsLayer.Graphics.Add(g);
            }

            if (e.Results.Count > 0)
                (MyMap.Layers["ConnectDotsGraphicsLayer"] as GraphicsLayer).ClearGraphics();

        }

        private void GeometryService_Failed(object sender, TaskFailedEventArgs e)
        {
            MessageBox.Show("Geometry Service error: " + e.Error);
        }
    }
}

VB.NET

Imports System.Collections.Generic
Imports System.Linq
Imports System.Net
Imports System.Windows
Imports System.Windows.Controls
Imports ESRI.ArcGIS.Client
Imports ESRI.ArcGIS.Client.Tasks
Imports ESRI.ArcGIS.Client.Local

Namespace ArcGISWPFSDK
    Partial Public Class LocalAutoComplete
        Inherits UserControl
        Private MyDrawObject As Draw
        Private outputGraphicsLayer As GraphicsLayer
        Private _geometryService As GeometryService
        Private _queryTask As QueryTask
        Private _mapService As LocalMapService

        Public Sub New()
            InitializeComponent()

            LocalMapService.GetServiceAsync("..\Data\MPKS\USCitiesStates.mpk", Function(localMapService__1)
                                                                                   _mapService = localMapService__1
                                                                                   _queryTask = New QueryTask()
                                                                                   _queryTask.Url = _mapService.UrlMapService & "/2"
                                                                                   Dim query As New Query()
                                                                                   query.Geometry = MyMap.Extent
                                                                                   query.ReturnGeometry = True
                                                                                   query.Where = """STATE_NAME"" = 'Montana'"
                                                                                   AddHandler _queryTask.ExecuteCompleted, AddressOf queryTask_ExecuteCompleted
                                                                                   AddHandler _queryTask.Failed, AddressOf queryTask_Failed
                                                                                   _queryTask.ExecuteAsync(query)

                                                                               End Function)

            Dim localGeometryService As New LocalGeometryService()
            AddHandler localGeometryService.StartCompleted, Function(sender, eventargs)
                                                                Dim lgs As LocalGeometryService = TryCast(sender, LocalGeometryService)
                                                                _geometryService = New GeometryService()
                                                                _geometryService.Url = lgs.UrlGeometryService
                                                                AddHandler _geometryService.AutoCompleteCompleted, AddressOf GeometryService_AutoCompleteCompleted
                                                                AddHandler _geometryService.Failed, AddressOf GeometryService_Failed
                                                                MyMap.IsEnabled = True

                                                                MyMap.MinimumResolution = Double.Epsilon

                                                                MyDrawObject = New Draw(MyMap) With { _
                                                                 .DrawMode = DrawMode.Polyline, _
                                                                 .IsEnabled = True, _
                                                                 .LineSymbol = TryCast(LayoutRoot.Resources("RedLineSymbol"), ESRI.ArcGIS.Client.Symbols.LineSymbol) _
                                                                }

                                                                AddHandler MyDrawObject.DrawComplete, AddressOf MyDrawObject_DrawComplete

                                                                outputGraphicsLayer = TryCast(MyMap.Layers("CompletedGraphicsLayer"), GraphicsLayer)

                                                            End Function

            localGeometryService.StartAsync()
        End Sub

        Private Sub queryTask_Failed(sender As Object, e As TaskFailedEventArgs)
            MessageBox.Show("Query error: " & Convert.ToString(e.[Error]))
        End Sub

        Private Sub queryTask_ExecuteCompleted(sender As Object, e As QueryEventArgs)
            Dim parcelGraphicsLayer As GraphicsLayer = TryCast(MyMap.Layers("ParcelsGraphicsLayer"), GraphicsLayer)
            For Each g As Graphic In e.FeatureSet.Features
                g.Symbol = TryCast(LayoutRoot.Resources("BlueFillSymbol"), ESRI.ArcGIS.Client.Symbols.Symbol)
                parcelGraphicsLayer.Graphics.Add(g)
            Next
        End Sub

        Private Sub MyDrawObject_DrawComplete(sender As Object, args As DrawEventArgs)

            Dim polyline As ESRI.ArcGIS.Client.Geometry.Polyline = TryCast(args.Geometry, ESRI.ArcGIS.Client.Geometry.Polyline)
            Dim polylineGraphic As New Graphic() With { _
             .Geometry = polyline _
            }
            Dim polylineList As New List(Of Graphic)()
            polylineList.Add(polylineGraphic)

            Dim graphicsLayer As GraphicsLayer = TryCast(MyMap.Layers("ParcelsGraphicsLayer"), GraphicsLayer)
            Dim polygonList As New List(Of Graphic)()
            For Each g As Graphic In graphicsLayer.Graphics
                g.Geometry.SpatialReference = MyMap.SpatialReference
                polygonList.Add(g)
            Next

            _geometryService.AutoCompleteAsync(polygonList, polylineList)

        End Sub

        Private Sub GeometryService_AutoCompleteCompleted(sender As Object, e As GraphicsEventArgs)
            outputGraphicsLayer.ClearGraphics()

            For Each g As Graphic In e.Results
                g.Symbol = TryCast(LayoutRoot.Resources("RedFillSymbol"), ESRI.ArcGIS.Client.Symbols.Symbol)
                outputGraphicsLayer.Graphics.Add(g)
            Next

            If e.Results.Count > 0 Then
                TryCast(MyMap.Layers("ConnectDotsGraphicsLayer"), GraphicsLayer).ClearGraphics()
            End If

        End Sub

        Private Sub GeometryService_Failed(sender As Object, e As TaskFailedEventArgs)
            MessageBox.Show("Geometry Service error: " & Convert.ToString(e.[Error]))
        End Sub
    End Class
End Namespace