Kent er iemand een manier (liefst geen API) om Long Lat decimals om te zetten naar DMS?
Dus van decimalen naar graden minuten seconden...
Thanks!
Kent er iemand een manier (liefst geen API) om Long Lat decimals om te zetten naar DMS?
Dus van decimalen naar graden minuten seconden...
Thanks!
In het commentaar op deze online calculator staat dit rekenvoorbeeld:
Dus eigenlijk een aantal keer truncaten (afronden richting 0) en het restant vermenigvuldigen.Originally Posted by FJmama1
Op deze pagina vind je nog wat meer uitleg en een code-voorbeeldje in JavaScript. Wellicht kan je dat vertalen naar Delphi en misschien het resultaat weer hier posten?
Last edited by GolezTrol; 04-Apr-18 at 17:13.
1+1=b
En dan in code:
https://stackoverflow.com/a/23545950/1037511
Delphi Code:
Degrees := Trunc(x); x := (x - Degrees) * 60; Minutes := Trunc(x); x := (x - Minutes) * 60 Seconds := Round(x);
En omdat je alles kan overengineeren, bijgevoegd een unit die je bijvoorbeeld zo kan gebruiken:
Delphi Code:
ShowMessage( TDeg.Create(dLat, 4.5123421).ToString + ' en ' + TDeg.Create(dLong, -50.231233).ToString);
Met dit als output:
Behalve de stringconversie geeft het record ook toegang tot de individuele degrees, minutes en seconds en het halfrond.4°30'44"N en 50°13'52"W
1+1=b
Thanks, problem solved!!
There are currently 1 users browsing this thread. (0 members and 1 guests)
Bookmarks