delphi简单单向字符串加密函数
摘要:
delphi用久了有的时候得给密码加密一下,简单点就行了,这个函数还是不错的。 const XorKey:array[0..7] of Byte=($B2,$09,$AA,$55,$93,$6D,$84,$47); // function Enc(Str:String):String;//字符加密函 阅读全文
posted @ 2017-09-30 00:54 癫狂编程 阅读(290) 评论(0) 推荐(0) 编辑