Question

我添加了一个上下文菜单，可让您更改地图上的标记。问题是您必须关闭并重新打开对话框才能看到更改。我做错了什么？

Private Sub gmapCMS_Add()
    gmapCtrl.UpdateMarkerLocalPosition(mrk)
End Sub

Private Sub Location_Load(sender As Object, e As EventArgs) Handles MyBase.Load
Dim longlat As PointLatLng = New PointLatLng(Latitude, Longitude)
            gmapCtrl.Position = longlat
            mrk = New Markers.GMarkerGoogle(longlat, Markers.GMarkerGoogleType.green)
            gmOverlay.Markers.Add(mrk)
            gmapCtrl.Overlays.Add(gmOverlay)
End Sub

Answer 1

Private Sub gmapCMS_Add()
    gmOverlay.Markers.Remove(mrk)
    mrk = New Markers.GMarkerGoogle(gmapCtrl.Position, Markers.GMarkerGoogleType.green)
    gmOverlay.Markers.Add(mrk)
End Sub

想出来。我在GMAP论坛上的帖子如下。

https://greatmaps.codeplex.com/discussions/655105

标记更改后刷新地图

1 个答案: