Cut

This sample demonstrates using the ArcGIS Runtime SDK for WPF to perform a geometry operation that takes an input polyline graphic and cuts across the polygon graphics layer to subdivide the polygons.

To use the sample, add a polyline to cut and thus subdivide intersecting parcel polygons.

XAML

<UserControl x:Class="ArcGISWPFSDK.LocalCut"
    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>
            <esri:SimpleLineSymbol x:Key="RedLineSymbol" Color="Red" Width="4" Style="Solid" />
            <esri:FillSymbol x:Key="BlueFillSymbol">
                <esri:FillSymbol.ControlTemplate>
                    <ControlTemplate x:Name="CustomPolygonTemplate">
                        <Grid>
                            <VisualStateManager.VisualStateGroups>
                                <VisualStateGroup x:Name="CommonStates">
                                    <VisualState x:Name="Normal" />
                                    <VisualState x:Name="MouseOver">
                                        <Storyboard>
                                            <ColorAnimation Storyboard.TargetName="Element"
                                                Storyboard.TargetProperty="(Fill).(Color)"
                                                To="#6600FFFF" Duration="0:0:0.1" />
                                        </Storyboard>
                                    </VisualState>
                                </VisualStateGroup>
                            </VisualStateManager.VisualStateGroups>
                            <Path x:Name="Element" Stroke="Red" Fill="#660000FF"
                                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">
            <esri:ArcGISLocalTiledLayer ID="BaseMap" Path="..\\Data\\TPKs\\Topographic.tpk"/>
            <esri:GraphicsLayer ID="ParcelsGraphicsLayer" x:Name="_parcelsGraphicsLayer"/>
        </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" Text="Add a polyline to cut and thus subdivide intersecting parcel polygons." 
                       Width="200" TextAlignment="Left" Margin="30,20,20,30" TextWrapping="Wrap" Foreground="Black" />
        </Grid>

    </Grid>
</UserControl>

C#

using System;
using System.Linq;
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 LocalCut : UserControl
    {
        private Draw _drawObject;
        GeometryService _geometryTask;
        QueryTask _queryTask;
        LocalMapService _mapService;

        public LocalCut()
        {
            InitializeComponent();

            MyMap.Layers.LayersInitialized += (s, e) =>
            {
                LocalMapService.GetServiceAsync("..\\Data\\MPKS\\USCitiesStates.mpk", (localMapService) =>
                {
                    _mapService = localMapService;
                    _queryTask = new QueryTask();
                    _queryTask.Url = _mapService.UrlMapService + "/2";
                    Query query = new Query();
                    query.Geometry = MyMap.Extent;
                    query.Where = "\"STATE_NAME\" = 'Montana'";
                    query.ReturnGeometry = true;
                    _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;
            };

            LocalGeometryService.GetServiceAsync(localGeometryService =>
            {
                _geometryTask = new GeometryService();
                _geometryTask.Url = localGeometryService.UrlGeometryService;

                _geometryTask.CutCompleted += GeometryService_CutCompleted;
                _geometryTask.Failed += GeometryService_Failed;
            });
        }

        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;
                g.Geometry.SpatialReference = MyMap.SpatialReference;
                _parcelsGraphicsLayer.Graphics.Add(g);
            }
        }

        void queryTask_Failed(object sender, TaskFailedEventArgs e)
        {
            MessageBox.Show("Query error: " + e.Error);
        }

        private void DrawObject_DrawComplete(object sender, DrawEventArgs args)
        {
            _drawObject.IsEnabled = false;
            ESRI.ArcGIS.Client.Geometry.Polyline polyline = args.Geometry as ESRI.ArcGIS.Client.Geometry.Polyline;

            _geometryTask.CutAsync(_parcelsGraphicsLayer.Graphics.ToList(), polyline);
        }

        void GeometryService_CutCompleted(object sender, CutEventArgs e)
        {
            _parcelsGraphicsLayer.ClearGraphics();

            foreach (Graphic g in e.Results)
            {
                g.Symbol = LayoutRoot.Resources["BlueFillSymbol"] as ESRI.ArcGIS.Client.Symbols.Symbol;
                _parcelsGraphicsLayer.Graphics.Add(g);
            }
            _drawObject.IsEnabled = true;
        }

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

VB.NET

Imports System.Linq
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 LocalCut
        Inherits UserControl
        Private MyDrawObject As Draw
        Private parcelGraphicsLayer As GraphicsLayer
        Private _geometryService As GeometryService
        Private _queryTask As QueryTask
        Private _mapService As LocalMapService

        Public Sub New()
            InitializeComponent()


            LocalMapService.GetServiceAsync("..\Data\MPKS\USCitiesStatesEdit.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.Where = """STATE_NAME"" = 'Montana'"
                                                                                       query.ReturnGeometry = True
                                                                                       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.CutCompleted, AddressOf GeometryService_CutCompleted
                                                                AddHandler _geometryService.Failed, AddressOf GeometryService_Failed


                                                                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

                                                            End Function

            localGeometryService.StartAsync()

            parcelGraphicsLayer = TryCast(MyMap.Layers("ParcelsGraphicsLayer"), GraphicsLayer)
        End Sub

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

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

        Private Sub MyDrawObject_DrawComplete(sender As Object, args As DrawEventArgs)
            MyDrawObject.IsEnabled = False
            Dim polyline As ESRI.ArcGIS.Client.Geometry.Polyline = TryCast(args.Geometry, ESRI.ArcGIS.Client.Geometry.Polyline)

            _geometryService.CutAsync(parcelGraphicsLayer.Graphics.ToList(), polyline)
        End Sub

        Private Sub GeometryService_CutCompleted(sender As Object, e As CutEventArgs)
            parcelGraphicsLayer.ClearGraphics()

            For Each g As Graphic In e.Results
                g.Symbol = TryCast(LayoutRoot.Resources("BlueFillSymbol"), ESRI.ArcGIS.Client.Symbols.Symbol)
                parcelGraphicsLayer.Graphics.Add(g)
            Next
            MyDrawObject.IsEnabled = True
        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