How to: Create a Custom Geocode Panel

• Nov 13, 2018
• 2 minutes to read

Do this as follows:

• Create a BingGeocodeDataProvider object and assign it to the InformationLayer.DataProvider property. Specify the object’s BingMapDataProviderBase.BingKey property.
• Customize the custom geocode panel. In this example, the panel includes two text edits (for the latitude and longitude) and the Search button.
• Call the BingGeocodeDataProvider.RequestLocationInformation method to make a location information request. In this example, the method is called in the Search button click event handler.

Form1.cs

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

namespace MapControl_GeocodePanel {
    public partial class Form1 : Form {
        InformationLayer GeocodeLayer { get { return (InformationLayer)mapControl1.Layers["GeocodeLayer"]; } }
        BingGeocodeDataProvider GeocodeProvider { get { return (BingGeocodeDataProvider)GeocodeLayer.DataProvider; } }

        public Form1() {
            InitializeComponent();
        }

        private void bSearch_Click(object sender, EventArgs e) {
            if (String.IsNullOrEmpty(teLatitude.Text)) {
                MessageBox.Show("Latitude field should be filled.");
                return;
            }
            double latitude = Double.Parse(teLatitude.Text);
            if ((latitude > 90) || (latitude < -90)) {
                MessageBox.Show("Latitude must be less than or equal to 90 and greater than or equal to - 90. Correct the input value.");
                return;
            }

            if (String.IsNullOrEmpty(teLongitude.Text)) {
                MessageBox.Show("Longitude field should be filled.");
                return;
            }
            double longitude = Double.Parse(teLongitude.Text);
            if ((longitude > 180) || (longitude < -180)) {
                MessageBox.Show("Longitude must be less than or equal to 180 and greater than or equal to - 180. Correct the input value.");
                return;
            }

            GeocodeProvider.RequestLocationInformation(new GeoPoint(latitude, longitude), null);
        }
    }
}

Form1.vb

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

Namespace MapControl_GeocodePanel
    Partial Public Class Form1
        Inherits Form

        Private ReadOnly Property GeocodeLayer() As InformationLayer
            Get
                Return CType(mapControl1.Layers("GeocodeLayer"), InformationLayer)
            End Get
        End Property
        Private ReadOnly Property GeocodeProvider() As BingGeocodeDataProvider
            Get
                Return CType(GeocodeLayer.DataProvider, BingGeocodeDataProvider)
            End Get
        End Property

        Public Sub New()
            InitializeComponent()
        End Sub

        Private Sub bSearch_Click(ByVal sender As Object, ByVal e As EventArgs) Handles bSearch.Click
            If String.IsNullOrEmpty(teLatitude.Text) Then
                MessageBox.Show("Latitude field should be filled.")
                Return
            End If
            Dim latitude As Double = Double.Parse(teLatitude.Text)
            If (latitude > 90) OrElse (latitude < -90) Then
                MessageBox.Show("Latitude must be less than or equal to 90 and greater than or equal to - 90. Correct the input value.")
                Return
            End If

            If String.IsNullOrEmpty(teLongitude.Text) Then
                MessageBox.Show("Longitude field should be filled.")
                Return
            End If
            Dim longitude As Double = Double.Parse(teLongitude.Text)
            If (longitude > 180) OrElse (longitude < -180) Then
                MessageBox.Show("Longitude must be less than or equal to 180 and greater than or equal to - 180. Correct the input value.")
                Return
            End If

            GeocodeProvider.RequestLocationInformation(New GeoPoint(latitude, longitude), Nothing)
        End Sub
    End Class
End Namespace