BlockRead(F, Buf, SizeOf(Buf), NumRead);
//......处理 Buf 中的数据
Myip[0]:=buf[1]*256+buf[0];//StrToInt(buf[1]+buf[0]);
Myip[1]:=buf[3]*256+buf[2];//StrToInt(buf[3]+buf[2]);
rc5_encrypt();
//10进制转换成2进制
//inttohex(myic[0],2);
@buf:=@myic;
BlockWrite(Sf, Buf, NumRead, NumWritten);
需要把一个整数分解给一个byte数组的2位
怎么弄