CONVERSION WORLD GEODETIC SYSTEM 1984 <-> UNIVERSAL TRANSVERSE MERCATOR WGS84

Signaler
Messages postés
384
Date d'inscription
vendredi 18 juin 2004
Statut
Membre
Dernière intervention
7 mai 2009
-
 AlanTheBeast -
Cette discussion concerne un article du site. Pour la consulter dans son contexte d'origine, cliquez sur le lien ci-dessous.

https://codes-sources.commentcamarche.net/source/49985-conversion-world-geodetic-system-1984-universal-transverse-mercator-wgs84


Merci - a few minor changes ("Result" does not work in standard Pascal) and it works perfectly. Also changed the variable "fuseau" to "zone" to match my English sensibilities.

Cheers,
Alan
Messages postés
68
Date d'inscription
jeudi 11 décembre 2008
Statut
Membre
Dernière intervention
16 juin 2019

Bonjour,
et pour utm ---> lat long comment faire :
utiliser :
PROCEDURE UTM_TO_Lat_Lon(UTM:TrecUTM; var latlon:TrecLatLon);
ou
FUNCTION STR_UTM_TO_Lat_Lon(Const UTM:TrecUTM) : string;
UTM est placé dans
TrecUTM = record
X,Y : double;
fuseau : integer

voila.
Messages postés
3
Date d'inscription
lundi 17 mars 2003
Statut
Membre
Dernière intervention
17 août 2009

Bonjour,
et pour utm ---> lat long comment faire?
très très bon prg pour moi.
Merci.
Messages postés
384
Date d'inscription
vendredi 18 juin 2004
Statut
Membre
Dernière intervention
7 mai 2009

Ca peu être très utile ...
Perso mon GPS peut afficher les coordonnées sous plusieurs formes (60 csx powa) !