Sophie: fpc-2.2.0-1mdv2008.1 x86

fpc-2.2.0-1mdv2008.1.x86_64.rpm

Info
Deps
Files
Scripts
ChangeLog
Location
Others versions
Analyse

program testlibuid;

uses sysutils,libuuid;

Var
  T : TGUID;
  P : PByte;
  I : Integer;

begin
//  GetURandomBytes(T,SizeOf(T));
  CreateGUID(T);
  Writeln(GUIDToString(T));
end.