Hocam kodu kendinize göre düzenlersiniz..
MEsela sizin GPS yani konum için TJManifest_permission.JavaClass.ACCESS_FINE_LOCATION i de kullanmanız gerekiyormuş.
{$IF Defined(ANDROID)}
TThread.CreateAnonymousThread(
procedure()
begin
TThread.Synchronize(TThread.CurrentThread,
procedure()
begin
// izin başla
PermissionsService.RequestPermissions([JStringToString(TJManifest_permission.JavaClass.READ_EXTERNAL_STORAGE), JStringToString(TJManifest_permission.JavaClass.WRITE_EXTERNAL_STORAGE),
JStringToString(TJManifest_permission.JavaClass.CAMERA), JStringToString(TJManifest_permission.JavaClass.READ_PHONE_STATE)],
procedure(const APermissions: TArray<string>; const AGrantResults: TArray<TPermissionStatus>)
begin
if (AGrantResults[0] = TPermissionStatus.Granted) then
and_per := 0
else
begin
Showmessage('Lütfen Yetkileri Veriniz..');
and_per := 1
end;
end);
// izin bitir
end);
end).Start;
{$ENDIF}
MEsela sizin GPS yani konum için TJManifest_permission.JavaClass.ACCESS_FINE_LOCATION i de kullanmanız gerekiyormuş.
// Bilgi paylaştıkça çoğalır..

