delphi - Delphi UUID ジェネレーター

Question

Delphi には、UUID を生成するための機能が組み込まれていますか?

Answer 1

program Guid;

{$APPTYPE CONSOLE}

uses
SysUtils;

var

Uid: TGuid;
Result: HResult;

begin
Result := CreateGuid(Uid);
if Result = S_OK then
   WriteLn(GuidToString(Uid));
end.

内部ではCreateGuid()、プラットフォームに応じて、さまざまな API のいずれかを呼び出します。たとえば、Windows では、最近ではUuidCreate.

Answer 2

また、インターフェイス宣言に GUID が必要な場合は、コード エディターでctrl+ shift+gを押して、キャレットに GUID を挿入します。