UUID，是英文单词 Universally Unique Identifier 的缩写，即通用唯一识别码。

目前最广泛应用的 UUID，是微软的 Microsoft's Globally Unique Identifiers (GUIDs)。

如果使用代码生成 GUID，可以使用 CreateGuid 函数，示例代码如下：

procedure TForm1.Button1Click(Sender: TObject);
varUid: TGuid;Result: HResult;
beginResult := CreateGuid(Uid);if Result = S_OK thenShowMessage(GuidToString(Uid));
end;