procedureTCCAMap.StartLocation();begin{$IFDEFANDROID}PermissionsService.RequestPermissions([JStringToString(TJManifest_permission.JavaClass.ACCESS_COARSE_LOCATION),JStringToString(TJManifest_permission.Jav