Sophie

• Search
• Distribution
• Explorer
• Source & Patches
• Chat
• Help
• About

distrib > Mageia > 7 > armv7hl > media > core-release > by-pkgid > 9825acea20b8c1730a908ceb6b6baa6d > files > 544

fpc-doc-3.0.4-6.mga7.armv7hl.rpm

• Info
• Deps
• Files
• Scripts
• ChangeLog
• Location
• Others versions
• Analyse

program testuid;

uses sysutils, macuuid;

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

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