DES、3DES算法的完整delphi源代码（16进制）

DES、三重DES算法的完整delphi源代码（16进制），其他的对16进制算的结果都不对，总是长度加长，没办法自己写一个！！如：明文为：0123456789ABCDEF（64bit）密钥为：0123456789ABCDEFFEDCBA98765432100123456789ABCDEF（3*64bit）密文为：1A4D672DCA6CB335（64bit）