Delphi andorid应用程序检查Wifi有效还是无效


本文整理自网络,侵删。

 
type
  TForm1 = class(TForm)

    function IsWifiEnabled: Boolean;

  end;

uses
  Androidapi.Helpers,
  Androidapi.JNI.JavaTypes,
  Androidapi.JNI.GraphicsContentViewText,
  Androidapi.JNIBridge,
  Androidapi.JNI.WifiManager;

function TForm1.IsWifiEnabled: Boolean;
var
  Obj: JObject;
  WifiManager: JWifiManager;
begin
  Obj := SharedActivityContext.getSystemService
    (TJContext.JavaClass.WIFI_SERVICE);
  if Obj = nil then
    Exit(False);
  WifiManager := TJWiFiManager.Wrap((Obj as ILocalObject).GetObjectID);
  Result := WifiManager.isWifiEnabled;
end;

相关阅读 >>

Delphi中interface接口的使用方法

获取网络日期

Delphi 文件路径获取文件名不带扩展名

Delphi xe strpas 遇到的问题

Delphi 禁止改变窗口大小和移动窗口

Delphi 创建一个进程并读取其控制台输出内容

Delphi 系统托盘组件 ttrayicon 简介

Delphi 多函数形式的多线程同步-线程执行顺序

Delphi copyrect实现的几个图片的转换效果

Delphi tms web core 获取url 参数

更多相关阅读请进入《Delphi》频道 >>



打赏

取消

感谢您的支持,我会继续努力的!

扫码支持
扫码打赏,您说多少就多少

打开支付宝扫一扫,即可进行扫码打赏哦

分享从这里开始,精彩与您同在

评论

管理员已关闭评论功能...