PC SOFT

PROFESSIONAL NEWSGROUPS
WINDEVWEBDEV and WINDEV Mobile

Home → WINDEV 2024 → données photos EXIF
données photos EXIF
Started by MARC CHERNET, Oct., 20 2018 7:35 PM - 2 replies
Registered member
85 messages
Posted on October, 20 2018 - 7:35 PM
Bonsoir,

Savez-vous si les versions récentes de WINDEV fournissent des accès aux donnée GPS EXIF. je ne vois pas la possibilité de chercher une commune à partir des données géodésiques collectées lors des prises de vues.

a défaut existe-t-il une méthode plus hard du genre lire l'en-tête des fichiers images ?

merci pour vos lumières.

--
Marc CHERNET Expert comptable - Développeur occasionnel pour des missions d'expertise
Registered member
940 messages
Popularité : +66 (68 votes)
Posted on October, 22 2018 - 4:11 PM
bonjour,

je pense pas qu'actuellement il existe une fonction Windev toute faite pour récupérer les infos GPS d'une image, mais vous pouvez lire les marqueurs EXIF avec la fonction ImageInfoValeur() => https://doc.pcsoft.fr/fr-FR/?3091003&name=ImageInfoValeur

du genre comme ceci : ( a améliorer , ce code récupère un json depuis OpenStreetMap )
( à tester également sur différent fichier Image .... )
_image_file est une chaîne=fSélecteurImage("", "", "Sélectionnez une image...")

_lat_ref est une chaîne=ImageInfoValeur(_image_file, 1)
_lat est une chaîne=ImageInfoValeur(_image_file, 2)
_long_ref est une chaîne=ImageInfoValeur(_image_file, 3)
_long est une chaîne=ImageInfoValeur(_image_file, 4)

_angle_lat,_angle_long sont des réel

_angle_lat=SexagésimalVersDécimal(_lat)
_angle_long=SexagésimalVersDécimal(_long)

Trace(_lat_ref+" : "+_lat)
Trace(_long_ref+" : "+_long)

Trace("Lat : "+_angle_lat)
Trace("Long : "+_angle_long)

_req_uri est une chaîne="https://nominatim.openstreetmap.org/reverse?format=json&lat=%1&lon=%2"
_http_req est une httpRequête
_http_req..URL=ChaîneConstruit(_req_uri,SansEspace(NumériqueVersChaîne(Arrondi(_angle_lat,6),"12.6f")),SansEspace(NumériqueVersChaîne(Arrondi(_angle_long,6),"12.6f")))
_http_reponse est une httpRéponse

_http_reponse=HTTPEnvoie(_http_req)
SI PAS ErreurDétectée ALORS
Trace(_http_reponse..Contenu)
SINON
Erreur(ErreurInfo())
FIN


bon dèv
Registered member
541 messages
Posted on March, 21 2019 - 12:37 AM
Bonjour Marc,

Avez-vous trouvé une solution à cette question?