<Stream>.Read(<Word>, 2) überspringt ein Byte

[Apollonius]

Byteweiser Shift ist nicht sehr sinnvoll. Die Delphi-Operatoren shiften bitweise, wie es sich gehört.

In einem aktuellen Projekt verwende ich folgenden Code:

Delphi-Quellcode:

function ReverseU2(W: Word): Word;
asm
  xchg al, ah
end;