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》频道 >>

转载请注明出处：木庄网络博客 » Delphi andorid应用程序检查Wifi有效还是无效