Le portail francophone de la géomatique

Bonjour Mag,

Alors pour une sélection par buffer, il s'agit d'une requête spatiale. Nous avons trouvé une jolie fonction sur EDN, gardons-là.

Nous avons quatre arguments pour cette fonction :
- WhereClause ? Peut-être, mais enfin non, il n'y a pas de sql spatial avec ArcGIS.
- pFeatureClassIN ? Pas vraiment.
- spatialRelation ? On peut chercher pour voir les possibilités, mais rien ne concernant les zones tampons.

Ne reste plus que searchGeometry. Et comme Magalie tu as eu ton TOEIC, tu sais que la zone tampon se traduit par buffer. Sur EDN, pas moyen de trouver quelque chose, mais l'index de  l'aide du développer (même données que sur edn, mais sur le disque dur, au format aide Windows) donne une méthode Buffer dans une interface ITopologicalOperator

Il suffit donc de mettre tout ça en place :

Dim pTransZoneTampon as ITopologicalOperator
Dim pTampon_geom as IGeometry
Set pTransZoneTampon  = pElement_geom
Set pTampon_geom = pTransZoneTampon.Buffer(distance)

Et tu as alors un élément géométrique correspondant à ta zone tampon. Utilise-le dans ta requête spatiale.

Pour récupérer l'élément sélectionné, je crois que c'est bon maintenant.


Pour afficher (ou pas) les couches, l'objet carte (IMap) contient les différentes couches. Et la propriété de l'interface de la couche (ILayer) nommé Visible doit être ce qu'il faut :

ThisDocument.m_pCarte.Layer(0).Visible = True
ThisDocument.m_pCarte.Layer(4).Visible = False

Dans le cas où le résultat de la sélection est vide, il suffit de faire un test de nullitude :

If requête_résultat is Nothing Then

Et voilà !

Décidemment B.A. ne changera jamais, un petit cours avant, ça n'aurait pas fait de mal.