#1 Tue 22 May 2012 13:01
- hedda
- Juste Inscrit !
- Date d'inscription: 19 May 2012
- Messages: 8
ArcGis 9.3 - Affichage des coordonnées de point en VBA
bonjour à tous
j'aimerai récupérer les coordonnés d'un point spécifié par l'utilisateur sur écran par un Click , j'ai établi le code suivant:
Code:
Dim pMxDoc As IMxDocument Dim pActiveView As IActiveView Dim m_blnMouseDown As Boolean Dim pPoint As IPoint Set pMxDoc = ThisDocument Set pActiveView = pMxDoc.FocusMap Set pPoint = pActiveView.ScreenDisplay.DisplayTransformation.ToMapPoint(x, y) MsgBox " the coordinate of point is :" & x & " " & y
mais lorsque j'exécute le programme j'obtient des résultats éronnés , c'est des cordonnés dont l'origine est le point supérieur gauche de la fenêtre view de arcmap, je pense qu'il s'agit des coordonnées de l'écran.
est ce qu'il ya moyen de les convertir en coordonnées géographiques , sachant que mes couches sont toutes géoréférenciées.
merci pour votre aide
Hors ligne