本文整理自网络,侵删。
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 windows 编程[5] - 学习窗体生成的过程五
Delphi与用windows 7下的用户账户控制(uac)机制
Delphi api �c multibytetowidechar的用法
更多相关阅读请进入《Delphi》频道 >>