delphi android Device Information

本文整理自网络，侵删。

 
Android:
uses
 
  Androidapi.Helpers, Androidapi.JNI.Provider,
 
function GetDeviceId: string;
 
begin
 
  Result := JStringToString(TJSettings_SECURE.JavaClass.getString(SharedActivity.getContentResolver, TJSettings_SECURE.JavaClass.ANDROID_ID));
 
end;

iOS:
uses
 
  Macapi.Helpers, iOSapi.UIKit,
 
 
 
function GetDeviceId: string;
 
var
 
  Device : UIDevice;
 
begin
 
  Device := TUIDevice.Wrap(TUIDevice.OCClass.currentDevice);
 
  Result := NSStrToStr(Device.identifierForVendor.UUIDString);
 
end;
 

相关阅读 >>

Delphi 控制iis，检测、增加、删除虚拟目录

Delphi 快速调用resource资源数据

Delphi goto语句用法

Delphi生成随机字符串

Delphi xe 共享一个之前封装的多进程共享内存的memorystream

Delphi 如果判断一个网络文件是否存在？

Delphi 控制台 输入输出实例代码

Delphi inttohex 查看字符的十六进制值

Delphi测试数据库连接时间

Delphi tstringlist.find

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

转载请注明出处：木庄网络博客 » delphi android Device Information