Eine Google-Maps-Urls sieht so aus:
Code:
https://www.google.de/maps/@53.5437308,9.9867191,15z
Allgemein:
Code:
http://maps.google.com/maps/@<lat>,<long>,<zoomfaktor>z
Delphi-Quellcode:
sUrl := Format('https://www.google.de/maps/@%s,%s,%sz', [editLatitude.Text, editLongitude.Text, editZoomfaktor.Text]);
ShellExecute(0,'open',PWideChar(sUrl),nil,nil,SW_SHOWDEFAULT);
Hierbei gilt: Der Dezimalseparator in den Editfeldern ist der Punkt.
Zuerst aus den Zeichenfolgen der Editfelder Extended zu machen, um die dann in ShowGoogleMaps wieder in Zeichenfolgen zu verwandeln, halte ich für übertrieben.