• Willkommen im Geoclub - dem größten deutschsprachigen Geocaching-Forum. Registriere dich kostenlos, um alle Inhalte zu sehen und neue Beiträge zu erstellen.

Mopsos: Versionsstand

OP
KoenigDickBauch

KoenigDickBauch

Geoguru
117: PascalScriptEngine für Tracks eingebaut

download

Hiermit solltes es möglich sein alle Formate lesen und schreiben zu können. Als Beispiel wird eine Script zum Schreiben einer Asciiliste mit gegeben.

Code:
program SchreibAsciiListe;

var
   i: integer;
   TP: TTrkPoint;
   SL: TStringList;
begin
   SL:=TStringList.Create;
   try

      for i:=0 to Track.Count-1 do begin
         TP:= Track.Items[i];
      
         SL.Add(Format('%d %7.4f %7.4f %d %5.1f %10.5f',[
               i,
               TP.Lat,
               TP.Lon,
               TP.Int,
               TP.Alt,
               TP.Time
         ]));

      end;
      SL.SaveToFile(ChangeFileExt(Track.FileName,'.txt'));
   finally
      SL.Free;
   end;
   Writeln('fertig');
end.

Da sicher noch nicht alle wünschenwerten Funktionen zur Verfügung stehen, gebt bescheid was ihr benötigt. Grundsätzlich können wir auf alle Delphi-Funktionen zugreifen, aber ich habe nicht alles eingebunden.

KDB
 
OP
KoenigDickBauch

KoenigDickBauch

Geoguru
131: GoogleMap Onlineanzeige um Cacheart, Anzeige der nächsten Caches und dem 161m Radius erweitert. Interaktives Wechseln zum nächsten Cache durch anklicken des Caches und im Fenster dann des GC???? Code.
download
 
OP
KoenigDickBauch

KoenigDickBauch

Geoguru
132:
a) Tab Konvertieren überarbeitet
b) Einlesen der Waypoints aus *-wpts.gpx
c) Export OziExplorer Route *.rte
d) Export OziExplorerCE Route2 *.rt2
e) Export *.asc
download
 
Oben