banniere

Le portail francophone de la géomatique


Toujours pas inscrit ? Mot de passe oublié ?
Nom d'utilisateur    Mot de passe              Toujours pas inscrit ?   Mot de passe oublié ?

Annonce

Rencontres QGIS 2025

L'appel à participation est ouvert jusqu'au 19 janvier 2025!

#1 Fri 09 August 2002 08:02

Sebastien Roddier
Invité

VB Mapinfo pb

Bonjour a tous

Je cherche a developper un visualisateur de donnees mapinfo en VB. Pour
cela j'utilise l'INtegrated Mapping et j'ai quelques petits soucis.

Mon appli se compose simplement
- d'un espace de visualisation de carte
- d'un espace de visualisation de donnees
- d'outils tels que selection, zoom + et zoom -

Mon pb est le suivant: Les cartes s'affichent parfaitement, les selections
se font correctememnt mais leur affichage ne fonctionne pas (ou plutot si
mais a la premiere selection ensuite rien). Je joint a ce message mon bout
de code si cela inspire quelqu'un

*dans ce qui suit mi est un objet mapinfo declare dans VB

'/ Affichage de la carte F_dept dans un espace defini

mi.do Set Application Window  & fg.map_main.hWnd
mi.do Set Next Document Parent  & fg.map_main.hWnd &  Style 1
mi.do Open Table
X:referentielslibresfrancevecteurAdministratifF_dept.TAB  as toto
Map From toto
mi.do set map zoom entire layer 1
mi.do set coordsys table toto
mapWinID = mi.eval( FrontWindow() )

'/ Affichage des donnees selectionnes sur la carte dans un espace donnees

mi.do Set Application Window  & fg.map_select.hWnd
mi.do Set Next Document Parent  & fg.map_select.hWnd &  Style 1
mi.do browse * from selection

Questions :
1- y a t'il une possibilite pour que l'espace donnees se rafraichissent
automatiquement lorsque l'ensemble de selection change? Si Oui comment
proceder?
2- dois je creeer un nouveau bouton Rafraichir pour actualiser les
donnees? J'ai essaye et celaz ne marche pas beaucoup mieux.

Merci d'avance de vos reponses

 

#2 Fri 09 August 2002 14:48

Joseph Baeza
Invité

Re: VB Mapinfo pb

Ne connaissant pas INtegrated Mapping je ne suis pas en mesure de repondre directement a la question. Mais, ayant l'experience de creer des applicatifs (interactifs) entre MI et VB la question N°1 est:As-tu utilise la commande suivante ?
Mi.RunMenuCommand M_WINDOW_REDRAW  '--> ou 610
Question N°2:
Peux-tu avoir les acces des procedures evenementielles de MI ?
Je pose la question car il y en a une d'interessante elle se nomme:

Sub SelChangedHandler

Cette procedure native de MI peut s'activer ou non, suivant le besoin.
Elle intervient (si active) sur les changements sur les selections et pourrait lancer un rafraichissement automatique apres chaque selection.

 

Pied de page des forums

Powered by FluxBB