如何从给定的地址获取坐标?我正试图在Android和iOS平台上运行这个程序。我已尝试使用TGeocode中的OnGeocode属性。但这并不是真的管用。以下是我的代码,是我做错了什么吗?我是德尔福的新手。
var sAddr := TCivicAddress.Create;
sAddr.Address := '(My address)';
try
if not Assigned(FGeocoder) then begin
if Assigned(TGeocoder.Current) then
FGeocoder := TGeocoder.Current.Create;
if Assigned(FGeocoder) then
FGeocoder.OnGeocode := OnGeocodeEvent;
end;
if Assigned(FGeocoder) then begin
FGeocoder.Geocode(sAddr);
end;
except
on E: Exception do
ShowMessage(E.Message);
end;
1条答案
按热度按时间dgtucam11#
在此之前,您应该建立几个步骤。一步一步地尝试这个教程:https://docwiki.embarcadero.com/RADStudio/Sydney/en/Mobile_Tutorial:Using_Location_Sensors(iOS_and_Android)#Use_Reverse_Geocoding
它在Rad Studio11.1上运行得很好
应启用网络和GPS才能工作。
祝好运!