Da musst du mal in die Dokumentation schauen, wie so eine
GUID aussieht
http://docwiki.embarcadero.com/Libra...e/System.TGUID
Delphi-Quellcode:
TGUID = packed record
D1: Cardinal; // 4 Bytes
D2: Word; // 2 Bytes
D3: Word; // 2 Bytes
D4: array[0..7] of Byte; // 8 Bytes
class operator Equal(const Left, Right: TGUID): Boolean;
class operator NotEqual(const Left, Right: TGUID): Boolean;
class function Empty: TGUID; static;
class function Create(const Data; BigEndian: Boolean = False): TGUID; overload; static;
class function Create(const Data: array of Byte; AStartIndex: Cardinal; BigEndian: Boolean = False): TGUID; overload; static;
end;
Dazu gibt es noch
System.SysUtils.StringToGUID und wenn man sich jetzt mal anschaut, was bei
SizeOf(TGUID)
herauskommt (16 Bytes?) dann kann man aus dem Record direkt eine Bytefolge erstellen.
Kaum macht man's richtig - schon funktioniert's
Zertifikat: Sir Rufo (Fingerprint: ea 0a 4c 14 0d b6 3a a4 c1 c5 b9
dc 90 9d f0 e9 de 13 da 60)