Статус доступа к микрофону

[Edward Tarasov]

Приветствую форумчане. несколько дней бьюсь над задачей- узнать имеет ли приложение доступ к микрофону. под андройд это делается легко, а вот под IOS... для геолокации удалось собрать костыль(кровь из глаз - но работает), а вот для микрофона что то не получается.

[Slym]

1. Патчить

 

2. Не хочется генофонд трогать
Можно скопипастить к себе TAVAudioSession и патчить у себя...

а потом

AudioSession := TAVAudioSession.Wrap(TAVAudioSession.OCClass.sharedInstance);
if AudioSession.recordPermission=AVAudioSessionRecordPermissionDenied then

AudioSession.requestRecordPermission(TPermissionBlock.Proc);

type
  TPermissionBlock=class
  public
    class procedure Proc(Granted: Boolean);
  end;

class procedure TPermissionBlock.Proc(Granted: Boolean);
begin
  if Granted then
end;

 

Изменено 23 октября, 2020 пользователем Slym

[Edward Tarasov]

17 часов назад, Slym сказал:

1. Патчить

 

2. Не хочется генофонд трогать
Можно скопипастить к себе TAVAudioSession и патчить у себя...

а потом

AudioSession := TAVAudioSession.Wrap(TAVAudioSession.OCClass.sharedInstance);
if AudioSession.recordPermission=AVAudioSessionRecordPermissionDenied then

AudioSession.requestRecordPermission(TPermissionBlock.Proc);

type
  TPermissionBlock=class
  public
    class procedure Proc(Granted: Boolean);
  end;

class procedure TPermissionBlock.Proc(Granted: Boolean);
begin
  if Granted then
end;

 

Прошу прощения. а для push подобное решение есть?)