Delphi DES加密解密单元

使用方法很是简单，调用如下4个函数便可：函数   function EncryStr(Str, Key: String): String;   --加密   function DecryStr(Str, Key: String): String;   --解密   function EncryStrHex(Str, Key: String): String;  --加密   function De

>>阅读原文<<