Mobile Permission

[Olli73]

Oder das hier noch:

Delphi-Quellcode:

var
  PA: TArray<String>;
begin
  ...
  SetLength(PA, 1);
  PA[0] := PermissionWriteExternalStorage;
  ...
  PermissionsService.RequestPermissions(PA,
    procedure ...