Skip to content
Github referente ao componente Mobile Permissions
Pascal
Branch: master
Clone or download

Files

Permalink
Type Name Latest commit message Commit time
Failed to load latest commit information.
Component First Version Feb 6, 2020
Demos/Tests First Version Feb 6, 2020
Package Correção do erro de Versionamento Mar 2, 2020
Source Update MobilePermissions.UsesPermissions.FMX.Base.pas Mar 11, 2020
.gitignore First Version Feb 6, 2020
Group.groupproj First Version Feb 6, 2020
Group_prjgroup.tvsconfig First Version Feb 6, 2020
README.md Process Uninstall Feb 16, 2020
mobile_permissions.png Icone Feb 16, 2020

README.md

MobilePermissions

This is a component to turn more easy the request permission in Android 8.x or later

How to install

  1. Open Delphi in Administrator mode.

  2. Open MobilePermissions package file ($Path)\Package\MobilePermissions.dpk

  3. Right click in MobilePermissions.bpl in Project Manager and select Clean

  4. Right click in MobilePermissions.bpl in Project Manager and select Build

  5. Right click in MobilePermissions.bpl in Project Manager and select Install

Ready!

How to Uninstall

  1. Open Delphi in Administrator mode.

  2. Open MobilePermissions package file ($Path)\Package\MobilePermissions.dpk

  3. Right click in MobilePermissions.bpl in Project Manager and select Uninstall

Ready!

How to use (Mode 1)

  1. Drop a component to form (Tool Palette TDevRocks)

  2. Select the permission that you want to request to Android in your project mobile.

  3. Run your app in Android.

How to use (Mode 2)

  1. Drop a component to form (Tool Palette TDevRocks)

  2. Type the following code:

procecure TForm1.OnCreate(Sender: TObject);
begin
  MobilePermissions1.[CATEGORY].[Permission] := True;
  MobilePermissions1.Apply;
end;

E.g.:

procedure TForm1.Button1Click(Sender: TObject);
begin
  MobilePermissions1.Dangerous.CAMERA := True;
  MobilePermissions1.Standard.AccessNetworkState := True;
  MobilePermissions1.Apply;
end;
  1. Run your app in Android.
You can’t perform that action at this time.