Question
Est-ce que Delphi a quelque chose à générer intégré UUID?
La solution
program Guid;
{$APPTYPE CONSOLE}
uses
SysUtils;
var
Uid: TGuid;
Result: HResult;
begin
Result := CreateGuid(Uid);
if Result = S_OK then
WriteLn(GuidToString(Uid));
end.
Sous les couvertures CreateGuid()
appelle l'une des différentes API, en fonction de la plate-forme. Par exemple sous Windows, il appelle de nos jours UuidCreate
.
Autres conseils
En outre, si vous avez besoin d'un GUID pour une déclaration d'interface, appuyez sur ctrl + déplacer + g dans l'éditeur de code pour insérer un GUID au caret.
Si vous utilisez une des dernière version de Delphi, et inclure SysUtils, vous pouvez appeler TGuid.NewGuid
pour générer un nouveau guid.
NewGuid
est effectivement mis en œuvre dans une classe d'aide pour TGUID ( TGuidHelper ), qui est déclaré dans SysUtils.
Cette fonction appelle la méthode CreateGUID (également dans SysUtils et déjà mentionné dans la réponse par Mitch blé), qui est en fait une fonction multi-plateforme qui appelle différentes bibliothèques en fonction de la plate-forme, il fonctionne sur.