begin
 ResultURL:=GetURLBase+RoundEx(GetLLon,6)+','+RoundEx(GetBLat,6)+','+RoundEx(GetRLon,6)+','+RoundEx(GetTLat,6)+'&x='+inttostr(GetX)+'&y='+inttostr(GetY)+'&z='+inttostr(GetZ);
end.