看不出你在说什么
用CopyMemory吧，如果你想给数组赋值的话
var
c:DWORD;
NewSpeed:array[0..3] of byte;
begin
c:=23568941;
copyMemory(@NewSpeed,@c,4);
showmessage(inttohex(c,8));
showmessage(inttohex(NewSpeed[0],2));
showmessage(inttohex(NewSpeed[1],2));
showmessage(inttohex(NewSpeed[2],2));
showmessage(inttohex(NewSpeed[3],2));
