本文整理自网络,侵删。
function IOSGetDeviceID: string;
var
LDevice: UIDevice;
begin
Result := '';
LDevice := TUIDevice.Wrap(TUIDevice.OCClass.currentDevice);
if LDevice <> nil then
Result := NSStrToStr(LDevice.identifierForVendor.UUIDString);
end;
这个函数,在FMX.PushNotification.iOS单元中。
我也没用过,请教Aone,他说这个返回唯一值,但重装app后会变化。
真是麻烦事!
相关阅读 >>
Delphi enumwindows 获取窗体句柄 进程id 窗体信息
更多相关阅读请进入《Delphi》频道 >>