之前在Delphi7中使用了一个Des的加解密单元，但是程序升级为2010时，这个算法在2010时不能使用的了！但是因为必须兼容以前的软件，所以必须将Delphi7中的Des单元修改为Delphi2010能用，而且两都之间可以互相加解密。里面有两个单元，一个是D7的一个是D2010的，2010是从网上找到的，都可以使用。