如何实现32，16字节整数的高字节与低字节之间转化？
不想用
function Change16Bit(Value: Word): Word;
var
Low8, High8: Word;
begin
Low8 := Value and $00FF;
High8 := Value and $FF00;
Low8 := Value shl 8;
High8 := Value shr 8;
Result := Low8 or High8;
end;
这类的方法。

有没有编译指令，或者其他效率更高的方法？