DOCUMENTATION EN LIGNE
DE WINDEV, WEBDEV ET WINDEV MOBILE
Aide / WLangage / Fonctions WLangage / Fonctions standard / Fonctions de géolocalisation
WINDEV
WindowsLinuxJavaEtats et RequêtesCode Utilisateur (MCU)
WEBDEV
WindowsLinuxPHPWEBDEV - Code Navigateur
WINDEV Mobile
AndroidWidget AndroidiPhone/iPadWidget IOSApple WatchMac Catalyst
Autres
Procédures stockées
Retourne la distance séparant deux positions. Cette distance est exprimée par défaut en mètres.
Exemple
pos1 est une géoPosition
pos1.Latitude = 1.442951
pos1.Longitude = 43.604363

pos2 est une géoPosition
pos2.Latitude = 2.505874
pos2.Longitude = 50.458744

InfoConstruit("La distance séparant les deux positions est de %1 mètres.", géoDistance(pos1, pos2))
Syntaxe
<Résultat> = géoDistance(<Position 1> , <Position 2> [, <Unité>])
<Résultat> : Réel
Distance approximative exprimée séparant les deux positions. Cette distance est exprimée dans l'unité sélectionnée (par défaut en mètres).
<Position 1> : Variable de type géoPosition
Nom de la variable de type géoPosition correspondant à la première position à comparer.
<Position 2> : Variable de type géoPosition
Nom de la variable de type géoPosition correspondant à la seconde position à comparer.
<Unité> : Constante de type Entier
Unité dans laquelle la distance doit être retournée :
géoKilomètreDistance en kilomètres.
géoMètre
(valeur par défaut)		Distance en mètres.
géoMileDistance en miles terrestres internationales.
Remarques
Le calcul de la distance séparant les deux positions est basé sur l'ellipsoïde WGS84 (Système Géodésique Mondiale, révision 1984).
Classification Métier / UI : Code métier
Composante : wd300device.dll
Voir Aussi
Version minimum requise
  • Version 15
Documentation également disponible pour…
Commentaires
Autre solution mathématique
Merci à FrancisMOREL (forum)
https://forum.pcsoft.fr/fr-FR/pcsoft.fr.windev/114990-wd14-calcul-distance-entre-deux-points-gps/read.awp

VarLat1 est un réel = paramLat1
VarLat2 est un réel = paramLat2
VarRadiusTerre est un réel = 6372.795477598
VarDeltaLo est un réel = paramLong1-paramLong2
VarDistance est réel = Conversion(ArcCosinus( Sinus(VarLat1)*Sinus(VarLat2) + Cosinus(VarLat1)*Cosinus(VarLat2)*Cosinus(VarDeltaLo) ),"degré","radian")*VarRadiusTerre
Gilles GUICHARD
04 oct. 2019

Dernière modification : 19/09/2024

Signaler une erreur ou faire une suggestion | Aide en ligne locale