|
|
@@ -157,7 +157,7 @@ begin
|
|
|
SetLength(Result, 38);
|
|
|
StrLFmt(PChar(Result), 38,'{%.8x-%.4x-%.4x-%.2x%.2x-%.2x%.2x%.2x%.2x%.2x%.2x}',
|
|
|
[
|
|
|
- GUID.D1, GUID.D2, GUID.D3,
|
|
|
+ Longint(GUID.D1), GUID.D2, GUID.D3,
|
|
|
GUID.D4[0], GUID.D4[1], GUID.D4[2], GUID.D4[3],
|
|
|
GUID.D4[4], GUID.D4[5], GUID.D4[6], GUID.D4[7]
|
|
|
]);
|
michael