- 博客(1)
- 收藏
- 关注
转载 Delphi字符串加密解密函数
功能:字符串加密和解密 首先定义一个常量数组 const XorKey:array[0..7] of Byte=($A1,$B7,$AC,$57,$1C,$63,$3B,$81); //字符串加密用 //在程序里加入以下两个函数, function Enc(Str:String):String;//字符加密函數 這是用的一個異或加密 var i,j:Integer; b
2014-11-12 16:29:27 2973 1
空空如也
空空如也
TA创建的收藏夹 TA关注的收藏夹
TA关注的人