BingRouteIsochroneCalculatedEventArgs.CalculationResult Property

Returns the result of an isochrone calculation (isoline polygon points and origin waypoint coordinates).

Namespace: DevExpress.Xpf.Map

Assembly: DevExpress.Xpf.Map.v23.2.dll

NuGet Package: DevExpress.Wpf.Map

Declaration

C#

public RouteIsochroneCalculationResult CalculationResult { get; }

VB.NET

Public ReadOnly Property CalculationResult As RouteIsochroneCalculationResult

Property Value

Type	Description
RouteIsochroneCalculationResult	Contains the result of the isochrone calculation.

Remarks

The following code plots a polygon that shows an area accessible from the specified point:

XAML

<Window
        xmlns="http://schemas.microsoft.com/winfx/2006/xaml/presentation"
        xmlns:x="http://schemas.microsoft.com/winfx/2006/xaml"
        xmlns:d="http://schemas.microsoft.com/expression/blend/2008"
        xmlns:mc="http://schemas.openxmlformats.org/markup-compatibility/2006"
        xmlns:local="clr-namespace:IsochroneMap"
        xmlns:dxm="http://schemas.devexpress.com/winfx/2008/xaml/map" 
        x:Class="IsochroneMap.MainWindow"
        mc:Ignorable="d"
        Title="MainWindow" Height="450" Width="800" Loaded="Window_Loaded">
    <Grid>
        <dxm:MapControl x:Name="mapControl">
            <dxm:ImageLayer>
                <dxm:BingMapDataProvider BingKey="Insert your Bing key." 
                                            Kind="RoadLight" />
            </dxm:ImageLayer>
            <dxm:InformationLayer x:Name="infoLayer">
                <dxm:BingRouteIsochroneDataProvider x:Name="isochroneProvider" 
                                                    BingKey="Insert your Bing key."
                                                    GenerateLayerItems="False"
                                                    IsochroneCalculated="OnIsochroneCalculated">
                    <dxm:BingRouteIsochroneDataProvider.IsochroneOptions>
                        <dxm:BingRouteIsochroneOptions Mode="Driving" 
                                                    DistanceUnit="Kilometer"/>
                    </dxm:BingRouteIsochroneDataProvider.IsochroneOptions>
                </dxm:BingRouteIsochroneDataProvider>
            </dxm:InformationLayer>
        </dxm:MapControl>
    </Grid>
</Window>

C#

using DevExpress.Xpf.Map;
using System.Windows;
using System.Windows.Media;

namespace IsochroneMap {
    public partial class MainWindow : Window {
        public MainWindow() {
            InitializeComponent();
        }

        private void Window_Loaded(object sender, RoutedEventArgs e) {
            GeoPoint origin = new GeoPoint(42.3589935302734, -71.0586318969727);
            isochroneProvider.CalculateIsochroneByDistance(new RouteWaypoint("Origin", origin), 10);
        }

        private void OnIsochroneCalculated(object sender, BingRouteIsochroneCalculatedEventArgs e) {
            foreach (var polygon in e.CalculationResult.IsochroneResult.Polygons) {
                MapPolyline item = new MapPolyline();
                foreach (var points in polygon.Coordinates)
                    item.Points.Add(points);
                item.StrokeStyle = new StrokeStyle { Thickness = 4 };
                item.Stroke = Brushes.Red;

                MapPushpin pushpin = new MapPushpin { Location = e.CalculationResult.IsochroneResult.Origin, Brush = Brushes.Red };

                VectorLayer vectorLayer = new VectorLayer();
                mapControl.Layers.Add(vectorLayer);
                MapItemStorage storage = new MapItemStorage();
                vectorLayer.Data = storage;
                storage.Items.Add(item);
                storage.Items.Add(pushpin);
            }
            mapControl.ZoomToFitLayerItems();
        }
    }
}

VB.NET

Imports DevExpress.Xpf.Map
Imports System.Windows.Media

Namespace IsochroneMap
    Public Partial Class MainWindow
        Inherits Window

        Public Sub New()
            InitializeComponent()
        End Sub

        Private Sub Window_Loaded(ByVal sender As Object, ByVal e As RoutedEventArgs)
            Dim origin As GeoPoint = New GeoPoint(42.3589935302734, -71.0586318969727)
            isochroneProvider.CalculateIsochroneByDistance(New RouteWaypoint("Origin", origin), 10)
        End Sub

        Private Sub OnIsochroneCalculated(ByVal sender As Object, ByVal e As BingRouteIsochroneCalculatedEventArgs)
            For Each polygon In e.CalculationResult.IsochroneResult.Polygons
                Dim item As MapPolyline = New MapPolyline()

                For Each points In polygon.Coordinates
                    item.Points.Add(points)
                Next

                item.StrokeStyle = New StrokeStyle With {
                    .Thickness = 4
                }
                item.Stroke = Brushes.Red
                Dim pushpin As MapPushpin = New MapPushpin With {
                    .Location = e.CalculationResult.IsochroneResult.Origin,
                    .Brush = Brushes.Red
                }
                Dim vectorLayer As VectorLayer = New VectorLayer()
                mapControl.Layers.Add(vectorLayer)
                Dim storage As MapItemStorage = New MapItemStorage()
                vectorLayer.Data = storage
                storage.Items.Add(item)
                storage.Items.Add(pushpin)
            Next

            mapControl.ZoomToFitLayerItems()
        End Sub
    End Class
End Namespace