Red de conocimiento informático - Material del sitio web - Cómo utilizar Delphi XE Android para realizar la comunicación entre el teléfono móvil y el módulo de puerto serie wifi

Cómo utilizar Delphi XE Android para realizar la comunicación entre el teléfono móvil y el módulo de puerto serie wifi

usa System.SysUtils,

Androidapi.Helpers,

Androidapi.JNIBridge,

Androidapi.Jni.Net,

Androidapi.JNI.GraphicsContentViewText,

Androidapi.JNI.JavaTypes,

FMX.Helpers.Android

función GetWIFIIP: cadena

var

WFM: JObject

WifiManager: JWifiManager

WifiInfo: JWifiInfo

IP: Entero;

comenzar

WFM:=TAndroidHelper.Context.getSystemService(TJContext.JavaClass.WIFI_SERVICE);

WifiManager:=TJWifiManager.Wrap( (WFM como ILocalObject) .GetObjectID);

WifiInfo:=WifiManager.getConnectionInfo;

IP:=WifiInfo.getIpAddress;

Resultado:=Format(' d.d.d.d',[ Lo(IP), Hi(IP), Lo(IP shr 16), IP shr 24]);

end;

//Obtener la IP local bajo sistema Android WIFI