怎样把一个word类型的数据的两个字节拆分到两个byte中，要保持原来的高位在前，低位在后。

Question

怎样把一个word类型的数据的两个字节拆分到两个byte中，要保持原来的高位在前，低位在后。

Answer 1

你说错了，应该是低位在前，高位在后，
var
  b: Word;
  a: Byte;
  c: Byte;
begin
  b := $c6bf;
  a := PByte(@b)[0];
  c := PByte(@b)[1];

Answer 2

不好意思，说错了
因为比较急
谢了，结贴。
我用位运算 
and $00FF
shr 8
好像也可以。

Answer 3

var
  W:Word;
  HB,LB:Byte;
begin
  W:=$3040;
  HB:=HiByte(W);  //高字节
  LB:=LoByte(W);  //低字节
end;