本文整理自网络,侵删。
function GetDeviceOnlyIdentifier: string;
begin
with TUIDevice.Wrap(TUIDevice.OCClass.currentDevice) do
begin
Result := (identifierForVendor.UUIDString.UTF8String);
end;
end;
相关阅读 >>
Delphi sendtextmessage 等方便的消息发送函数
Delphi 用正则表达式获取指定的字符串续取出所有符合要求的字符串
Delphi 学习 sql 语句 - select(9): 其他
更多相关阅读请进入《Delphi》频道 >>