DELPHI里byte型数组取值与比较

Delphi里申明一个数组array of byte = ($00,$**,$**,$**,$**,$00);
我从服务器收到一段数据存在如上的一个6字节数组中，我要判断中间的4个字节是不是($80,$00,$00,$01),要怎么写呢，非要一个个字节比较吗？

很简单...
假设你的数组变量为 a，并且下标从 0 开始：
var
a: YourArrayType;
p: PInteger;
begin
...
p := @a[1]; //指向第二个字节
if p^ = $01000080 then // Intel 处理器的整数高位在高地址区，所以要反过来
...
end;
原理就是：4个字节是一个整数的空间，直接比较一个整数变量和一个常数是否相等
如果你要判断的字节数超过8个，或者($80,$00,$00,$01)是变化的，这个方法就不行了，要用 CompareMem 来比较，速度要慢一些：
var
a: YourArrayType;
b: YourConst;
begin
...
if CompareMem(@a, @b, SizeOf(b)) then
...
end;