码迷,mamicode.com
首页 > Windows程序 > 详细

Delphi XE - TGuidHelper

时间:2020-05-03 12:40:05      阅读:118      评论:0      收藏:0      [点我收藏+]

标签:new   phi   bytearray   delphi   string   nes   cli   ring   object   

procedure TForm1.btn2Click(Sender: TObject);
var
  G: TGUID;
  S: string;
  bs: TBytes;
begin
  G := G.NewGuid;
  S := G.ToString;       //{9B60BA3F-8EE5-448F-BC9B-64FD98685ADB}
  mmo1.Lines.Add(S);
  bs := G.ToByteArray;
end;

 

Delphi XE - TGuidHelper

标签:new   phi   bytearray   delphi   string   nes   cli   ring   object   

原文地址:https://www.cnblogs.com/redhat588/p/12821238.html

(1)
(1)
   
举报
评论 一句话评论(0
登录后才能评论!
© 2014 mamicode.com 版权所有  联系我们:gaon5@hotmail.com
迷上了代码!