张志峰的博客

水滴石川，积少成多。

导航

随笔分类 -  delphi 异或运算

在delphi中，如何把十进制数转换为十六进制整形数。若用inttohex只能转化为十六进制字符串。

摘要：var b: Byte; s: string;begin s := '31'; //16进制字符串 b := StrToInt('$' + s);end; 不过要注意一点，如果在程序调试时想看b的值，看到的将会是10进制的值 阅读全文

posted @ 2016-05-25 15:07 ╰★张志峰★╮ 阅读(1207) 评论(0) 推荐(0)

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 阅读全文

posted @ 2016-05-25 13:56 ╰★张志峰★╮ 阅读(2760) 评论(0) 推荐(0)

delphi 按位运算 not and or xor shl shr

摘要：delphi 按位运算 not and or xor shl shr delphi 按位运算 not and or xor shl shr unit Unit1; interface uses Windows, Messages, SysUtils, Variants, Classes, Graph 阅读全文

posted @ 2016-05-25 10:58 ╰★张志峰★╮ 阅读(3018) 评论(0) 推荐(0)