安卓蓝牙动态权限 _蓝牙

相逢意气为君饮，系马高楼垂柳边。这篇文章主要讲述安卓蓝牙动态权限相关的知识，希望能为你提供帮助。
【安卓蓝牙动态权限】安卓蓝牙动态权限
安卓7.0及以下版本
在 IDE 的 Project - Options 菜单弹出来的窗口里面，找到左边树结构的： Application -- Uses Permissions 项目，则右边会出来一堆权限让你打勾。这里要勾选上 Bluetooth 和 Bluetooth admin 两项。老的安卓版本，勾选这两项就可以了。安卓8.0及以上版本，还需要运行期用代码动态申请权限。代码里面：首先要实现一个函数： procedure RequestPermissionsResult(Sender: TObject; const APermissions: TArray< string> ; const AGrantResults: TArray< TPermissionStatus> ); 这个函数是一个动态申请权限的结果的回调函数。在启动 BLE 的时候，通过以下代码申请权限： PermissionsService.RequestPermissions([FLocationPermission], RequestPermissionsResult, DisplayRationale); 上述的代码的 PermissionsService 是声明在 System.Permissions 里面的。上述代码里面的 RequestPermissionsResult 就是前面的那个回调函数。它在这里被调用，而且还被填入参数。上述代码里面的 FLocationPermission: string; 它来自：

procedure TForm6.FormCreate(Sender: TObject); begin{$IFDEF android}FLocationPermission := JStringToString(TJManifest_permission.javaClass.ACCESS_COARSE_LOCATION); {$ENDIF}end;

上述代码里面用到的 JStringToString 要 Uses Androidapi.Helpers;
上述代码中还有一个 DisplayRationale 也是一个函数：

procedure TForm6.DisplayRationale(Sender: TObject; const APermissions: TArray< string> ; const APostRationaleProc: TProc); beginTDialogService.ShowMessage(‘We need to be given permission to discover BLE devices‘,procedure(const AResult: TModalResult)beginAPostRationaleProc; end)end;

在 RequestPermissionsResult 这个函数里面，判断是否通过权限，如果通过，才去调用蓝牙的方法。

procedure TForm6.RequestPermissionsResult(Sender: TObject; const APermissions: TArray< string> ; const AGrantResults: TArray< TPermissionStatus> ); begin// 1 permissions involved: ACCESS_COARSE_LOCATIONif (Length(AGrantResults) = 1) and (AGrantResults[0] = TPermissionStatus.Granted) thenStartBLEDiscoveryelseTDialogService.ShowMessage(‘Cannot start BLE scan as the permission has not been granted‘); end;

到这里，APP 使用手机的 BLE 的权限问题才搞定。奇怪的是，因为这里是使用的“ 定位” 权限，APP 运行时，会弹出窗口询问用户，APP要使用定位权限，是否允许。用户允许后，的确可以使用 BLE 了。同样的测试手机，如果我不去做动态权限申请，直接调用 BLE 的相关功能，没有任何提示，但 BLE 的相关功能的确出不来。难道没有单独的【蓝牙】权限？给用户一个定位权限的提示，用于打开蓝牙，有点奇怪。