Delphi android.os获取sn号

本文整理自网络，侵删。

 
//android.os获取sn号
uses Androidapi.Helpers, Androidapi.JNI.Os;
function GetSerial: string;
begin
  Result := JStringToString (TJBuild.JavaClass.SERIAL);
end;


procedure TForm1.Button1Click(Sender: TObject);
begin
Memo1.Lines.Add(JStringToString (TJBuild.JavaClass.SERIAL)); //SERIAL号
Memo1.Lines.Add(JStringToString (TJBuild.JavaClass.DEVICE)); //x86
Memo1.Lines.Add(JStringToString (TJBuild.JavaClass.DISPLAY)); //
Memo1.Lines.Add(JStringToString (TJBuild.JavaClass.CPU_ABI)); //
Memo1.Lines.Add(JStringToString (TJBuild.JavaClass.ID)); //V417IR
Memo1.Lines.Add(JStringToString (TJBuild.JavaClass.USER));  //root
end;
 

相关阅读 >>

Delphi感染文件的例子

Delphi 的运算符列表

Delphi 防止程序重复执行的单元

Delphi utf-8

Delphi firedac在后台线程中从mssql server检索记录的方法

Delphi webbrowser 滚动条的去除、边框去除

Delphi 获取文件所在路径

Delphi copy 从字符串中复制指定范围中的字符

Delphi executewait运行一个程序等待其结束

Delphi重写一个字符串分割函数

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

转载请注明出处：木庄网络博客 » Delphi android.os获取sn号