Le portail francophone de la géomatique

Bonjour
Au départ, la table "nomTab" est une table graphique ou pas ??
Si elle ne l'est pas, il faut avant tout la rendre graphique par un Create Map For nomTab CoordSys...

Je ne sais pas dans quelle projection sont exprimés vos X,Y qui sont a priori en mètres. A vous de le savoir...
Supposons (pure hypothèse) que ce soit "UTM Zone 31, Northern Hemisphere (WGS 84)"
La ligne correspondante dans le fichier C:\Program Files\MapInfo\Professional\mapinfow.prj dit:
"UTM Zone 31, Northern Hemisphere (WGS 84)\p32631", 8, 104, 7, 3, 0, 0.9996, 500000, 0
La clause CoordSys du Create Map sera alors:
Create Map For nomTab CoordSys Earth Projection 8, 104, 7, 3, 0, 0.9996, 500000, 0
Autre solution: vous avez une table dans la même projection que celle des points de nomtab (disons tableRef)
Ouvrez là avant d'utiliser dans le code:
Set CoordSys Table tableRef
Create Map For nomTab
Pas besoin de CoordSys, la première ligne force l'utilisation de la même projection que tableRef

C'est quasi bon...je dirais en fin de première ligne  ..... File "C:\TOWNS"
et surtout j'ajouterais (les 3 premières lignes sont facultatives)
set map redraw off
Set Map Layer 1 Global Line (1,2,0)     'au cas où le style de ligne par défaut serait invisible
set map redraw on
Set Map Window FrontWindow() Zoom Entire Layer 1   'pour centrer la carte sur l'objet ligne créé
Un commit table towns, pour enregistrer la table, sera nécessaire à un moment donné ...

Bonjour

J'utiliserais plutôt la commande suivant

upadte town set obj=createline(x1,y1,x2,y2)

browse town

Bonjour Mr. Maurice;

je suis désolé; mais j'ai u une fenêtre Map qui est toute blanche; aucun changement;

voici le code exécuté; et vous pouvez voir aussi une impécran de résultat de l'exécution comme pièce jointe

Create Table Towns ( townname Char(30), population SmallInt, median_income Decimal(9,2) ) file "c:\map\towns"

Create Map For towns CoordSys Earth Projection 8, 104, 7, 9, 0, 0.9996, 500000, 0

dim x1 as float
dim x2 as float
dim y1 as float
dim y2 as float


x1= 666800
x2= 667500
y1= 3960350
y2= 3960380

Insert Into towns (obj) Values (CreateLine( x1, y1, x2, y2))
commit table towns

    browse * from towns     
    map from towns

set map redraw off
Set Map Layer 1 Global Line (1,2,0)
set map redraw on
Set Map Window FrontWindow() Zoom Entire Layer 1

c vraiment bizarre mais je ne sais pas quoi faire; et j'ai vraiment besoin de votre aide;


en outre, l'objet se sélectionne; c'est à dire quand je sélectionne sa région dans la fenêtre Map il se sélectionne dans le tableau (la ligne correspondante); mais je ne le vois pas !!! comme si il est en blanc;

merci de votre suivi

Dernière modification par kharbeche (Thu 11 September 2008 11:56)

Bonsoir Mr.Maurice;

Oui vous avez raison pour la couleur de la ligne; mais en faite le problème n'est pas là;
parce qu'après le changement du programme comme vous avez m'indiquer; malheureusement j'ai obtenu les même résultats que précédemment; (aussi une Map toute en blanche)

Mais après un essai pour savoir des informations sur la ligne (après exécutions et en sélectionnant la région de la ligne sur la Map); j'ai bien contourné le problème;

C'est tout simplement les coordonnées ne sont pas ceux exigés dans le programme; j'ai obtenu des autres cordonnées pour les extrémités de la ligne avec une longueur égal à zéros mètres (dont vous pouvez voir l'impécran sur les résultats obtenus que j'ai eu lors de l'exécution; pour une meilleur clarté et compréhension du problème)

La figure ci jointe vous montre;

Une autre fois je vous remercie fortement pour votre suivi;

Cordialement; SOFIENE

waaaaaaaaaaaaaaaaw, Mr.Maurice; enfin j'ai réussi; c'est vraiment génial de vous;

milles mercis pour votre effort et de votre aide; juste je voudrais vous dire que dans le cadre de mon PFE c'est la première fois que je connais MapBasic/MapInfo;

au revoir, (au prochain problème )

"très" Cordialement de SOFIENE