Hi. I'm trying getting permission from Android in my app, i'm using standart code for this:
procedure TForm1.GetPermission;
begin
if not PermissionsService.IsPermissionGranted(JStringToString(TJManifest_permission.JavaClass.VIBRATE)) then
PermissionsService.RequestPermissions([JStringToString(TJManifest_permission.JavaClass.VIBRATE)],
procedure(const APermissions: TClassicStringDynArray; const AGrantResults: TClassicPermissionStatusDynArray)
begin
if (Length(AGrantResults) = 1) and (AGrantResults[0] = TPermissionStatus.Granted) then
ShowMessage('Access granted')
else
ShowMessage('Access denied');
end);
end;
But that not works. My app not asking permission on the launch this code, it just sending message 'Access denied'. What's wrong and how fix it? Also, when i'm using this code for getting permission WRITE_EXTERNAL_STORAGE, all working right.