4 Bytes woraus?
Angenommen es wäre ein record mit 4 einzelnen (Byte- oder Char-)Membern, dessen Typ TBla wäre, dann so:
Delphi-Quellcode:
var bla:TBla; card:Cardinal;
begin
card := Cardinal(bla);
end;
Kommt drauf an. Bitte nochmal spezifizieren. Die Frage ist zu ungenau!
Edit: sorry, Syntaxfehler. Bin zur zeit auf C++
... andere haben eben andere Drogen ... *g*
Noch'n Edit: Wenn es einzelne Bytes sind, dann ginge noch folgendes ...
Delphi-Quellcode:
var HoechstesByte, DrittesByte, ZweitesByte, NiedrigstesByte: Byte; card: Cardinal
begin
card := Cardinal((HoechstesByte shl 24) or (DrittesByte shl 16) or (ZweitesByte shl 8) or NiedrigstesByte);
end;