Delphi MacOS 请求使用麦克风的权限
Delphi MacOS request permission to use microphone
Delphi MacOS 上的 11 个项目正在请求使用此代码的权限:
procedure TCOWMainForm.Button1Click(Sender: TObject);
var
fMic: FMX.Media.TAudioCaptureDevice;
begin
fMic := TAVCaptureDeviceManager.Current.DefaultAudioCaptureDevice;
if (fMic <> nil) then
begin
ShowMessage('fMic not nil so calling fMic.RequestPermission');
fMic.RequestPermission;
end;
end;
Project | Options | Version Info
包含一对密钥
NSMicrophoneUsageDescription "COW records your voice."
仍然,根据 Apple 文档,项目在调用 fMic.RequestPermission
时被终止:
Requesting Authorization for Media Capture on macOS
在尝试获得在 macOS 公证应用程序中使用麦克风的权限时,我可能遗漏了什么?
编辑以包含此 Embarcadero RSP,它有一个最小的项目可以重现该问题。
感谢@DaveNottage,经过公证的 Delphi 应用程序确实需要 Info.plist.
中的 NSMicrophoneUsageDescription 密钥对。
该项目还需要 Project | Options | Application | Entitlement List | Audio Input
检查为真。
Delphi MacOS 上的 11 个项目正在请求使用此代码的权限:
procedure TCOWMainForm.Button1Click(Sender: TObject);
var
fMic: FMX.Media.TAudioCaptureDevice;
begin
fMic := TAVCaptureDeviceManager.Current.DefaultAudioCaptureDevice;
if (fMic <> nil) then
begin
ShowMessage('fMic not nil so calling fMic.RequestPermission');
fMic.RequestPermission;
end;
end;
Project | Options | Version Info
包含一对密钥
NSMicrophoneUsageDescription "COW records your voice."
仍然,根据 Apple 文档,项目在调用 fMic.RequestPermission
时被终止:
Requesting Authorization for Media Capture on macOS
在尝试获得在 macOS 公证应用程序中使用麦克风的权限时,我可能遗漏了什么?
编辑以包含此 Embarcadero RSP,它有一个最小的项目可以重现该问题。
感谢@DaveNottage,经过公证的 Delphi 应用程序确实需要 Info.plist.
中的 NSMicrophoneUsageDescription 密钥对。该项目还需要 Project | Options | Application | Entitlement List | Audio Input
检查为真。