Máy phát điện Delphi UUID

Question

Delphi có tích hợp bất kỳ thứ gì để tạo UUID không?

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. 

Dưới sự bao trùm CreateGuid() gọi hàm Windows API CoCreateGuid().

Answer 2

Ngoài ra, nếu bạn cần một GUID cho một tuyên bố giao diện, nhấn ctrl + thay đổi + g trong trình soạn thảo mã để chèn một GUID vào dấu mũ.

Answer 3

Nếu bạn đang sử dụng một trong các phiên bản mới nhất của Delphi, bạn có thể sử dụng lớp TGuidHelper bằng cách gọi TGuidHelper.NewGuid đang tạo TGUiD mới.