PermissionsService.RequestPermissions([APermission],
                  
                  
                          procedure(const APermissions: TClassicStringDynArray; const AGrantResults: TClassicPermissionStatusDynArray)
                  
                  
                          begin
                  
                  
                            LPermissionGranted := (Length(AGrantResults) = 1) and (AGrantResults[0] = TPermissionStatus.Granted);
                  
                  
                          end
                  
                  
                        );
                  
                  
                  callback метод вызывается асинхронно (хотя в доках ничего подобного не встречал), под дебагом на смартфоне ответ приходит секунд через 30 примерно, у всех так?
                  
                  
                
С этим, наверное, лучше туда: https://t.me/fmx_ru
Оки там тоже спрошу
Обсуждают сегодня