BingRouteIsochroneDataProvider.CalculateIsochroneByTimeWithTraffic(RouteWaypoint, Int32, DateTime) Method

Calculates a time-based isochrone based on traffic information for the specified point in time.

Namespace: DevExpress.XtraMap

Assembly: DevExpress.XtraMap.v24.2.dll

Declaration

C#

public void CalculateIsochroneByTimeWithTraffic(
    RouteWaypoint waypoint,
    int maxTime,
    DateTime dateTime
)

VB.NET

Public Sub CalculateIsochroneByTimeWithTraffic(
    waypoint As RouteWaypoint,
    maxTime As Integer,
    dateTime As Date
)

Parameters

Name	Type	Description
waypoint	RouteWaypoint	Specifies an origin point’s coordinates.
maxTime	Int32	Specifies the maximum travel time in which the isochrone polygon is calculated. The default measurement unit is second. Use the BingRouteIsochroneOptions.TimeUnit property to define the measurement unit.
dateTime	DateTime	Specifies a point in time used to obtain the current or predictive traffic information.

Remarks

You can specify the following parameters to calculate a time-based isochrone:

• Travel mode
• Time measurement unit

Example

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 CalculateIsochroneByTimeWithTraffic method to calculate an isochrone.

C#

using DevExpress.XtraMap;
using System;
using System.Windows.Forms;

namespace IsochroneSample {
    public partial class Form1 : Form {

        private void Form1_Load(object sender, EventArgs e) {
            ImageLayer imageLayer = new ImageLayer();
            mapControl1.Layers.Add(imageLayer);
            BingMapDataProvider provider = new BingMapDataProvider();
            provider.BingKey = "Insert your Bing key.";
            provider.Kind = BingMapKind.RoadLight;
            imageLayer.DataProvider = provider;

            InformationLayer infoLayer = new InformationLayer();
            mapControl1.Layers.Add(infoLayer);

            BingRouteIsochroneDataProvider isochroneDataProvider = new BingRouteIsochroneDataProvider();
            isochroneDataProvider.BingKey = "Insert your Bing key.";
            GeoPoint origin = new GeoPoint(36.1532403246368, -86.7701703811725);
            mapControl1.CenterPoint = origin;
            isochroneDataProvider.IsochroneOptions.TimeUnit = TimeMeasureUnit.Minute;
            isochroneDataProvider.IsochroneOptions.Mode = BingTravelMode.Driving;
            isochroneDataProvider.CalculateIsochroneByTimeWithTraffic(new RouteWaypoint("", origin), 10, new DateTime(2021, 05, 05, 15, 0, 0));
            infoLayer.DataProvider = isochroneDataProvider;

            infoLayer.DataRequestCompleted += OnDataRequestCompleted;
        }

        private void OnDataRequestCompleted(object sender, RequestCompletedEventArgs e) {
            // Call the ZoomToFitLayerItems method to zoom the map so that it displays the created isochrone.
            mapControl1.ZoomToFitLayerItems();
        }
    }
}

VB.NET

Imports DevExpress.XtraMap
Imports System
Imports System.Windows.Forms

Namespace IsochroneSample
    Public Partial Class Form1
        Inherits Form

        Private Sub Form1_Load(ByVal sender As Object, ByVal e As EventArgs)
            Dim imageLayer As ImageLayer = New ImageLayer()
            mapControl1.Layers.Add(imageLayer)

            Dim provider As BingMapDataProvider = New BingMapDataProvider()
            provider.BingKey = "Insert your Bing key."
            provider.Kind = BingMapKind.RoadLight
            imageLayer.DataProvider = provider

            Dim infoLayer As InformationLayer = New InformationLayer()
            mapControl1.Layers.Add(infoLayer)

            Dim isochroneDataProvider As BingRouteIsochroneDataProvider = New BingRouteIsochroneDataProvider()
            isochroneDataProvider.BingKey = "Insert your Bing key."
            Dim origin As GeoPoint = New GeoPoint(36.1532403246368, -86.7701703811725)
            mapControl1.CenterPoint = origin
            isochroneDataProvider.IsochroneOptions.TimeUnit = TimeMeasureUnit.Minute
            isochroneDataProvider.IsochroneOptions.Mode = BingTravelMode.Driving
            isochroneDataProvider.CalculateIsochroneByTimeWithTraffic(New RouteWaypoint("", origin), 10, New DateTime(2021, 05, 05, 15, 0, 0))
            infoLayer.DataProvider = isochroneDataProvider

            infoLayer.DataRequestCompleted += AddressOf OnDataRequestCompleted
        End Sub

        Private Sub OnDataRequestCompleted(ByVal sender As Object, ByVal e As RequestCompletedEventArgs)
            ' Call the ZoomToFitLayerItems method to zoom the map so that it displays the created isochrone.
            mapControl1.ZoomToFitLayerItems()
        End Sub
    End Class
End Namespace