delphi如何将 整型数据 转换成4字节十六进制数存入字节数组

把原数跟FF与一下的结果存入数组，
原数右移4位，再跟FF与一下的结果 存入数组
再右移4位。。。
做个循环就可以了，注意存入的数组序号要从大到小
就给个思路，代码你自己写吧 

能写个简单的例子么？谢谢

 

x:=5835849
for i=3 downto 0 do
begin
a[i]:=x and $FF;
x:=x shr 4
end;
你也可以用内存拷贝,这个简单多了
CopyMemory(@X,@a,sizeof(integer))