Le portail francophone de la géomatique

Vraiment personne

Bonjour,

Le but est de produire un rectangle avec Mapinfo. La table est produite au format .tab  avec Mapbasic et l'utilisateur entre les coordonnées d'un point  qui est au-dessus du rectangle  ensuite il va se baser sur les coordonnées de ce point pour déduire le rectangle qui est à X distance de ce point. ( L'utilisateur indique les dimensions de ce rectangle au début.

Create Table "Pre_plan" (nom char(80)) file s_chemin + "pre_plan" 'creation d'une table pour les éoliennes et la platforme
Create Map For "Pre_plan"
CoordSys Earth Projection 3, 33, "m", 3, 46.5, 44, 49, 700000, 6600000

insert into Pre_plan (obj)  Values (createpoint(XL93,YL93))
Map From Pre_plan
Commit Table Pre_plan interactive

Create Object As Buffer From Pre_plan Width v_fondation Units "m" Type Spherical Resolution 50 Into Table Pre_plan 'création d'une fondation dans la table pre_plan
Create Object As Buffer From Pre_plan Width v_survol Units "m" Type Spherical Resolution 50 Into Table Pre_plan    'création d'une fondation dans la table pre_plan

Commit Table Pre_plan interactive

Dim Xmp,Ymp,XCH,YCH,XCB,YCB as float
Dim W as integer

Xmp=XL93
Ymp=YL93-v_ecart

XCH= Xmp-(v_largeur/2)
YCH= Ymp

XCB= XCB + (v_largeur/2)
YCB= YCB-(v_longueur) 

W=FrontWindow()

set table Pre_plan useredit on

Create rect into window (W)((XCH), (YCH)) ((XCB), (YCB))

Commit Table Pre_plan Interactive

puis il indique les dimensions. Ensuite le programme détermine  les points en fonction de X et Y ensuite passe à la commande Creat rect



Le problème est que j'ai une erreurs  quand le programme arrive sur la commande "create rect" il m'indique qu'elle est en lecture...

Dernière modification par Nosxo (Mon 26 December 2016 11:48)

Bonjour,

As-tu pu faire ton programme, parce que je cherche a faire un programme similaire, c'est a dire de crée une table mapinfo a partir de ma fenêtre carte , dans ma fenetre carte  j'aurais les contours des communes, un point de vente et sa zone isochrone, le but c'est de faire un zoom sur la zone isochrone et récupérer l'ensemble des communes qui dans la zone isochrone et autour pour crée une nouvelle table que je nomme emprise.

Dernière modification par Soucré (Tue 20 June 2017 09:46)