BingRouteIsochroneResult.Polygons Property

Returns a list of isochrone polygons.

Namespace: DevExpress.Xpf.Map

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

NuGet Package: DevExpress.Wpf.Map

Declaration

C#

public List<BingRouteIsochronePolygonResult> Polygons { get; }

VB.NET

Public ReadOnly Property Polygons As List(Of BingRouteIsochronePolygonResult)

Property Value

Type	Description
List<BingRouteIsochronePolygonResult>	A list of polygons that specify the isochrone calculation result.

Remarks

The following code plots a polygon that shows the area that is accessible from the specified point. The size of the area depends on a given travel time (the time is equal to 10 minutes in the example below):

• Create an InformationLayer object and add it to the MapControl.Layers collection.

• Initialize the layer’s InformationLayer.DataProvider property with a BingRouteIsochroneDataProvider object.

• Specify the provider’s BingKey property.

• Define the Mode and TimeUnit parameters.

• Call the provider’s CalculateIsochroneByTimeWithTraffic method to calculate an isochrone.

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>
            <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" 
                                                    TimeUnit="Minute"/>
                    </dxm:BingRouteIsochroneDataProvider.IsochroneOptions>
                </dxm:BingRouteIsochroneDataProvider>
            </dxm:InformationLayer>
        </dxm:MapControl>
    </Grid>
</Window>

C#

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

namespace IsochroneMap {
    public partial class MainWindow : Window {
        private void Window_Loaded(object sender, RoutedEventArgs e) {
            GeoPoint origin = new GeoPoint(42.3589935302734, -71.0586318969727);
            isochroneProvider.CalculateIsochroneByTimeWithTraffic(new RouteWaypoint("Origin", origin), 10, new DateTime(2021, 05, 05, 15, 0, 0));
        }

        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 = 2 };
                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
Imports System.Windows.Media

Namespace IsochroneMap
    Public Partial Class MainWindow
        Inherits Window

        Private Sub Window_Loaded(ByVal sender As Object, ByVal e As RoutedEventArgs)
            Dim origin As GeoPoint = New GeoPoint(42.3589935302734, -71.0586318969727)
            isochroneProvider.CalculateIsochroneByTimeWithTraffic(New RouteWaypoint("Origin", origin), 10, New DateTime(2021, 05, 05, 15, 0, 0))
        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 = 2
                }
                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