Delphi 异或校验方法

Posted 张志峰的博客

tags:

篇首语:本文由小常识网(cha138.com)小编为大家整理,主要介绍了Delphi 异或校验方法相关的知识,希望对你有一定的参考价值。

//数据异或校验
function BytesXor(buffer:array of byte):Integer;
var
i:integer;
begin
Result:=$0;
for i:=Low(buffer) to High(buffer) do
begin
result:=result xor buffer[i];
end;
end;

以上是关于Delphi 异或校验方法的主要内容,如果未能解决你的问题,请参考以下文章