Datentype Array of Byte und Cardinal

[Bummi]

Einen hab ich noch

Delphi-Quellcode:

  function Swap(Value: Cardinal): Cardinal;
  asm
     BSWAP EAX
  end;

procedure TForm1.Button1Click(Sender: TObject);
var
  c:Cardinal;
begin
 c := $AABBCCDD;
 c := Swap(c);
 Showmessage(IntToHex(c,8))
end;