[06-12-05]
test
test
Delphipedia - Delphipedia - Variant Records
Het is mogelijk om in een record meerdere overlappende delen te hebben, de zogenaamde variant records.
Nog een voorbeeld, hoe een Guid uit te lezen als array van bytes:
type
THack = record
case b : Boolean of
true : (g : TGuid);
false: (a : array[0..15] of Byte);
end;
procedure demo;
var
h : THack;
i : integer;
begin
CreateGUID(h.g);
for i := 0 to 15 do IetsMet(h.a[i]);
end;