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 异或校验方法的主要内容,如果未能解决你的问题,请参考以下文章
如何在 delphi中十进制数的每一位变成二进制然后进行异或