Forum: Software-Projekte der Mitglieder
by wurzelzwerg,
2. Aug 2014
DecimalLon, DecimalLat haben einen Fehler.
Man muss bei W und S das Ergebnis negieren. So wie das jetzt ist wird nur der Anfang(Grad) negiert.
8°28''58.3"W ergibt jetzt -7,48286151885986. Das sollte aber -8,48286151885986 sein.
//if (Pos('°W', Longitude) > 0) or (Longitude = 'W') then
// Longitude := '-' + Longitude;
....
Forum: Software-Projekte der Mitglieder
by wurzelzwerg,
11. Aug 2012
Ja, klar. Nur in Delphi geht mod nur mit Ganzzahlen.
Ich hab das jetzt so gemacht:
procedure AddDistance(var Lat, Lon: Extended; direction, Distance: Extended);
var
Lat1, Lon1, dist, winkel, Lat2, Lon2: Extended;
begin
Lat1:= (Lat * PI) / 180;
Lon1:= (Lon * PI) / 180;
Forum: Software-Projekte der Mitglieder
by wurzelzwerg,
11. Aug 2012
Danke,
habe auch diesen Java-Code gefunden:
double lat1 = (52.523405d * Math.PI) / 180.0d;
double lon1 = (13.411400d * Math.PI) / 180.0d;
double distance = (150000.0d) / 6378388.0d;
double winkel = (208.78d * Math.PI) / 180.0d;
Forum: Software-Projekte der Mitglieder
by wurzelzwerg,
11. Aug 2012
Super!:thumb:
Wie würde man einer Koordinate x Meter addieren/subtrahieren?
(also nur Lat +- x Meter oder Lon +- x Meter. Nicht diagonal)
Bin leider eine absolute Mathe-Null.
Gruss
Udo