Hallo,
sowas riecht nach variant record
Delphi-Quellcode:
type
Tvar_rec = packed record
case i: Integer of
0:
(
_card_low : Cardinal;
_card_high : Cardinal;
);
1:
(
_int64: Int64;
);
end;
var
rec: Tvar_rec;
begin
rec._int64:= 12345;
rec.card_low // auslesen oder setzen
rec.card_high // auslesen oder setzen
weitere Infos dazu unter
records in Delphi
<Update>:
Oder den vordefinierten int64Rec benutzen, wie mein Vorgänger schon gezeugt hat ...
Heiko
PS: habs nicht getestet, vielleicht muss low und high noch vertauscht werden.