首页 > 其他 > 详细

getGuid()

时间:2018-08-16 12:03:13      阅读:234      评论:0      收藏:0      [点我收藏+]

function GetGUID: string;
var
  LTep: TGUID;
begin
  CreateGUID(LTep);
  Result := GUIDToString(LTep);
  Result := StringReplace(Result,‘}‘,‘‘,[rfReplaceAll]);
  Result := StringReplace(Result,‘{‘,‘‘,[rfReplaceAll]);
  Result := StringReplace(Result,‘-‘,‘‘,[rfReplaceAll]);
end;

getGuid()

原文:https://www.cnblogs.com/Thenext/p/9486263.html

(0)
(0)
   
举报
评论 一句话评论(0
关于我们 - 联系我们 - 留言反馈 - 联系我们:wmxa8@hotmail.com
© 2014 bubuko.com 版权所有
打开技术之扣,分享程序人生!