Intersect

This sample demonstrates using the ArcGIS Runtime SDK for WPF to perform a geometry operation that takes an input polygon that cuts across another existing polygons in a GraphicsLayer to return the intersection between the two polygons that are filled with random colors.

To use the sample, add a polygon that intersects a portion of the parcel features. Intersecting portions of features are displayed in random colors.

XAML

<UserControl x:Class="ArcGISWPFSDK.LocalIntersect"
        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:SimpleFillSymbol x:Key="BlueFillSymbol" Fill="#990000FF" BorderBrush="Blue" />
            <esri:SimpleFillSymbol x:Key="CyanFillSymbol" Fill="#9900FFFF"  BorderBrush="Cyan"/>
            <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:GraphicsLayer ID="IntersectGraphicsLayer" x:Name="_IntersectGraphicsLayer"/>
        </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" />
            <StackPanel Orientation="Vertical" Margin="30,20,20,30">
                <TextBlock x:Name="ResponseTextBlock" Text="Add a polygon that intersects a portion of the parcel features.  Intersecting portions of  features are displayed in random colors. " 
                       Width="200" TextAlignment="Left" TextWrapping="Wrap" Foreground="Black"/>
                <Button HorizontalAlignment="Center" Width="130" Content="Reset" Click="Button_Click" Margin="5" />
            </StackPanel>
        </Grid>

    </Grid>
</UserControl>

C#

using System;
using System.Collections.Generic;
using System.Linq;
using System.Net;
using System.Windows;
using System.Windows.Controls;
using ESRI.ArcGIS.Client.Symbols;
using ESRI.ArcGIS.Client;
using ESRI.ArcGIS.Client.Tasks;
using ESRI.ArcGIS.Client.Geometry;
using ESRI.ArcGIS.Client.Local;

namespace ArcGISWPFSDK
{
    public partial class LocalIntersect : UserControl
    {
        private Draw _drawObject;
        private Random random;
        GeometryService _geometryTask;

        public LocalIntersect()
        {
            InitializeComponent();

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

                 _drawObject = new Draw(MyMap)
                 {
                    DrawMode = DrawMode.Polygon,
                    IsEnabled = false,
                    FillSymbol = LayoutRoot.Resources["CyanFillSymbol"] as ESRI.ArcGIS.Client.Symbols.FillSymbol
                };
                _drawObject.DrawComplete += DrawObject_DrawComplete;
            };

            LocalGeometryService.GetServiceAsync(lgs =>
            {                
                _geometryTask = new GeometryService();
                _geometryTask.Url = lgs.UrlGeometryService;
                _geometryTask.SimplifyCompleted += GeometryService_SimplifyCompleted;
                _geometryTask.IntersectCompleted += GeometryService_IntersectCompleted;
                _geometryTask.Failed += GeometryService_Failed;          
            });

            random = new Random();
        }

        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);
            }
            _drawObject.IsEnabled = true;
        }

        private void DrawObject_DrawComplete(object sender, DrawEventArgs args)
        {

            _drawObject.IsEnabled = false;
            ESRI.ArcGIS.Client.Geometry.Polygon intersectPolygon = args.Geometry as ESRI.ArcGIS.Client.Geometry.Polygon;
            List<Graphic> graphicList = new List<Graphic>();
            graphicList.Add(new Graphic() { Geometry = intersectPolygon });
            _geometryTask.SimplifyAsync(graphicList);
        }

        void GeometryService_SimplifyCompleted(object sender, GraphicsEventArgs e)
        {
            doIntersect(e.Results[0].Geometry);

        }

        private void doIntersect(Geometry intersectGeometry)
        {
            _geometryTask.IntersectAsync(_ParcelsGraphicsLayer.Graphics.ToList(), intersectGeometry);

        }

        void GeometryService_IntersectCompleted(object sender, GraphicsEventArgs e)
        {
            _IntersectGraphicsLayer.ClearGraphics();

            foreach (Graphic g in e.Results)
            {
                SimpleFillSymbol symbol = new SimpleFillSymbol()
                {
                    Fill = new System.Windows.Media.SolidColorBrush(
                        System.Windows.Media.Color.FromArgb(255, (byte)random.Next(0, 255), (byte)random.Next(0, 255),
                        (byte)random.Next(0, 255))),
                    BorderBrush = new System.Windows.Media.SolidColorBrush(System.Windows.Media.Colors.Black),
                    BorderThickness = 1
                };
                g.Symbol = symbol;
                _IntersectGraphicsLayer.Graphics.Add(g);
            }
        }

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

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

        private void Button_Click(object sender, RoutedEventArgs e)
        {
            _IntersectGraphicsLayer.ClearGraphics();
            _drawObject.IsEnabled = true;
        }
    }
}

VB.NET

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

Namespace ArcGISWPFSDK
    Partial Public Class LocalIntersect
        Inherits UserControl
        Private MyDrawObject As Draw
        Private parcelGraphicsLayer As GraphicsLayer
        Private intersectGraphicsLayer As GraphicsLayer
        Private random As Random
        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.Where = """STATE_NAME"" = 'Montana'"
                                                                                   query.ReturnGeometry = True
                                                                                   query.OutSpatialReference = New ESRI.ArcGIS.Client.Geometry.SpatialReference(102100)
                                                                                   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
                                                                MyMap.IsEnabled = True

                                                                AddHandler _geometryService.SimplifyCompleted, AddressOf GeometryService_SimplifyCompleted
                                                                AddHandler _geometryService.IntersectCompleted, AddressOf GeometryService_IntersectCompleted
                                                                AddHandler _geometryService.Failed, AddressOf GeometryService_Failed

                                                                MyDrawObject = New Draw(MyMap) With { _
                                                                 .DrawMode = DrawMode.Polygon, _
                                                                 .IsEnabled = False, _
                                                                 .FillSymbol = TryCast(LayoutRoot.Resources("CyanFillSymbol"), ESRI.ArcGIS.Client.Symbols.FillSymbol) _
                                                                }
                                                                AddHandler MyDrawObject.DrawComplete, AddressOf MyDrawObject_DrawComplete
                                                                parcelGraphicsLayer = TryCast(MyMap.Layers("ParcelsGraphicsLayer"), GraphicsLayer)
                                                                intersectGraphicsLayer = TryCast(MyMap.Layers("IntersectGraphicsLayer"), GraphicsLayer)
                                                                random = New Random()

                                                            End Function


            localGeometryService.StartAsync()
        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)
                parcelGraphicsLayer.Graphics.Add(g)
            Next
            MyDrawObject.IsEnabled = True
        End Sub

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

            MyDrawObject.IsEnabled = False
            Dim intersectPolygon As ESRI.ArcGIS.Client.Geometry.Polygon = TryCast(args.Geometry, ESRI.ArcGIS.Client.Geometry.Polygon)
            Dim graphicList As New List(Of Graphic)()
            graphicList.Add(New Graphic() With { _
             .Geometry = intersectPolygon _
            })
            _geometryService.SimplifyAsync(graphicList)
        End Sub

        Private Sub GeometryService_SimplifyCompleted(sender As Object, e As GraphicsEventArgs)
            doIntersect(e.Results(0).Geometry)

        End Sub

        Private Sub doIntersect(intersectGeometry As Geometry)
            _geometryService.IntersectAsync(parcelGraphicsLayer.Graphics.ToList(), intersectGeometry)

        End Sub

        Private Sub GeometryService_IntersectCompleted(sender As Object, e As GraphicsEventArgs)
            intersectGraphicsLayer.ClearGraphics()

            For Each g As Graphic In e.Results
                Dim symbol As New SimpleFillSymbol() With { _
                 .Fill = New System.Windows.Media.SolidColorBrush(System.Windows.Media.Color.FromArgb(255, CByte(random.[Next](0, 255)), CByte(random.[Next](0, 255)), CByte(random.[Next](0, 255)))), _
                 .BorderBrush = New System.Windows.Media.SolidColorBrush(System.Windows.Media.Colors.Black), _
                 .BorderThickness = 1 _
                }
                g.Symbol = symbol
                intersectGraphicsLayer.Graphics.Add(g)
            Next
        End Sub

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

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

        Private Sub Button_Click(sender As Object, e As RoutedEventArgs)
            intersectGraphicsLayer.ClearGraphics()
            MyDrawObject.IsEnabled = True
        End Sub
    End Class
End Namespace