Delphi<\/a><\/p>\nGUID (Globally Unique IDentifier) \u662f\u4e00\u500b 128-bit Integer (16 bytes) \u7684\u6578\u503c\u3002<\/p>\n
\u5728 Delphi IDE \u4e2d\u53ef\u4ee5\u6309\u4e0b Ctrl + Shift + G \u5feb\u6377\u9375\u6703\u51fa\u73fe\u985e\u4f3c\u4e0b\u5217\u7684 GUID \u503c\uff1a<\/p>\n
1<\/p>\n
[‘{2F45BDFE-1BE4-404D-9C5B-4B481D6A7482}’]<\/p>\n
\u6bcf\u6b21\u6309\u4e0b\u5feb\u6377\u9375\u90fd\u6703\u7522\u751f\u4e0d\u540c\u7684 GUID \u503c\u3002<\/p>\n
<\/p>\n
<\/p>\n
\u800c\u7a0b\u5f0f\u4e2d\u7522\u751f GUID \u503c\u7684\u65b9\u5f0f\u5982\u4e0b\u5217\u7a0b\u5f0f\u78bc\uff1a<\/p>\n
procedure TForm1.FormCreate(Sender: TObject);
var
s_GUID: string;
t_GUID: TGUID;
begin
if CoCreateGUID(t_GUID) = S_OK then
begin
s_GUID := GUIDToString(t_GUID);
ShowMessage(s_GUID);
end else begin
ShowMessage(‘Create GUID ERROR.’);
end;
end;<\/p>\n
<\/p>\n
In Delphi 5 need uses ComObj, ActiveX.<\/p>\n
\u4e5f\u53ef\u4ee5\u7576\u4f5c UUID \u4f86\u61c9\u7528\u3002<\/p>\n","protected":false},"excerpt":{"rendered":"<\/p>\n
GUID\u539f\u672c\u9084\u770b\u4e0d\u61c2\uff0c\u5f8c\u4f86\u7ffb\u8b6f\u5b57\u9762\u610f\u601d\u624d\u77e5\u9053\u5b83\u6709\u7368\u4e00\u7121\u4e8c\u7684\u610f\u601d\uff0c\u6240\u4ee5\u5728\u7a0b\u5f0f\u88e1\u9762\u5565\u6642\u5019\u9700\u8981\u7368\u4e00\u7121\u4e8c\u78bc\u7684\u6642\u5019\u5c31\u5f88\u6709\u7528\u8655\u5566!!!!<\/p>\n
<\/p>\n
\u6587\u7ae0\u4f86\u6e90\uff1ahttp:\/\/blog.bestlong.idv.tw\/2009\/07\/25\/655<\/p>\n
<\/p>\n
\u4e03\u6708.25, 2009 in Delphi<\/p>\n
GUID (Globally Unique IDentifier) \u662f\u4e00\u500b 128-bit Integer (16 bytes) \u7684\u6578\u503c\u3002<\/p>\n
\u5728 Delphi IDE \u4e2d\u53ef\u4ee5\u6309\u4e0b Ctrl + Shift + G \u5feb\u6377\u9375\u6703\u51fa\u73fe\u985e\u4f3c\u4e0b\u5217\u7684 GUID \u503c\uff1a<\/p>\n
1<\/p>\n
[‘{2F45BDFE-1BE4-404D-9C5B-4B481D6A7482}’]<\/p>\n
\u6bcf\u6b21\u6309\u4e0b\u5feb\u6377\u9375\u90fd\u6703\u7522\u751f\u4e0d\u540c\u7684 GUID \u503c\u3002<\/p>\n
<\/p>\n
<\/p>\n
\u800c\u7a0b\u5f0f\u4e2d\u7522\u751f GUID \u503c\u7684\u65b9\u5f0f\u5982\u4e0b\u5217\u7a0b\u5f0f\u78bc\uff1a<\/p>\n
procedure TForm1.FormCreate(Sender: TObject); var s_GUID: string; t_GUID: TGUID; begin if CoCreateGUID(t_GUID) = […]<\/p>\n","protected":false},"author":1,"featured_media":0,"comment_status":"closed","ping_status":"open","sticky":false,"template":"","format":"standard","meta":[],"categories":[3],"tags":[189],"_links":{"self":[{"href":"http:\/\/blog.infinity.idv.tw\/index.php?rest_route=\/wp\/v2\/posts\/172"}],"collection":[{"href":"http:\/\/blog.infinity.idv.tw\/index.php?rest_route=\/wp\/v2\/posts"}],"about":[{"href":"http:\/\/blog.infinity.idv.tw\/index.php?rest_route=\/wp\/v2\/types\/post"}],"author":[{"embeddable":true,"href":"http:\/\/blog.infinity.idv.tw\/index.php?rest_route=\/wp\/v2\/users\/1"}],"replies":[{"embeddable":true,"href":"http:\/\/blog.infinity.idv.tw\/index.php?rest_route=%2Fwp%2Fv2%2Fcomments&post=172"}],"version-history":[{"count":1,"href":"http:\/\/blog.infinity.idv.tw\/index.php?rest_route=\/wp\/v2\/posts\/172\/revisions"}],"predecessor-version":[{"id":568,"href":"http:\/\/blog.infinity.idv.tw\/index.php?rest_route=\/wp\/v2\/posts\/172\/revisions\/568"}],"wp:attachment":[{"href":"http:\/\/blog.infinity.idv.tw\/index.php?rest_route=%2Fwp%2Fv2%2Fmedia&parent=172"}],"wp:term":[{"taxonomy":"category","embeddable":true,"href":"http:\/\/blog.infinity.idv.tw\/index.php?rest_route=%2Fwp%2Fv2%2Fcategories&post=172"},{"taxonomy":"post_tag","embeddable":true,"href":"http:\/\/blog.infinity.idv.tw\/index.php?rest_route=%2Fwp%2Fv2%2Ftags&post=172"}],"curies":[{"name":"wp","href":"https:\/\/api.w.org\/{rel}","templated":true}]}}