Delphi-Quellcode:
function SwapBytes(
const ANumber: Cardinal): Cardinal;
asm
mov edx, ANumber;
bswap edx;
mov result, edx;
end;
ist "doppelt" gemoppelt, besser so
Delphi-Quellcode:
function SwapBytes(Value: Cardinal): Cardinal;
register;
asm
bswap eax
end;
BSWAP wird nicht auf allen CPU Plattformen unterstützt.
Gruß hagen