Generador de UUID de Delphi

Question

¿Tiene Delphi algo incorporado para generar 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. 

Debajo de las sábanas CreateGuid() llama a la función API de Windows CoCreateGuid().

Answer 2

Además, si necesita un GUID para una declaración de interfaz, golpeó ctrl + cambio + g en el editor de código para inserte un GUID en el cursor.

Answer 3

Si está utilizando una de las últimas versiones de Delphi, puede usar la clase TGuidHelper llamando a TGuidHelper.NewGuid que está generando un nuevo TGUiD.