Bonjour,

J'ai effectue plusieurs tentatives pour utiliser les evenements Mappoint.

Par exemple l'evenement SelectionChange n'est pas pris en compte que ce soit en C++ (visual ou builder) ou eb VB6

Quelqu'un aurait-il une idée pour que cela fonctionne correctement ?

Voici mon dernier test en VB6, si je mais WithEvents , le code ne compile pas, si je ne le met pas, cela compile mais les evenemetn ne sont pas pris en compte

Dim WithEvents objApp As MapPoint.Application
Dim WithEvents objMap As MapPoint.Map

Private Sub Command1_Click()
Dim objPin As MapPoint.Pushpin
'Add a Pushpin, then select it
Set objPin = objMap.AddPushpin(objMap.FindResults("Seattle, WA")(1))
objPin.Select
End Sub

Private Sub Form_Load()
'Set up the application
Set objApp = CreateObject("mappoint.application")
Set objMap = objApp.ActiveMap
objApp.Visible = True
objApp.UserControl = True
End Sub

Private Sub MappointControl1_AfterViewChange()

End Sub

Private Sub objMap_SelectionChange(ByVal NewSelection As Object, ByVal OldSelection As Object)
NewSelection.Location.GoTo
End Sub