文件加密算法单元EncryptFileDecryptFile

【文件属性】：

文件名称：文件加密算法单元EncryptFileDecryptFile

文件大小：2KB

文件格式：PAS

更新时间：2014-06-16 05:35:20

文件加密

function Encrypt(const S: String; Key: Word): String; function Decrypt(const S: String; Key: Word): String; procedure EncryptFile(INFName, OutFName : String; Key : Word); procedure DecryptFile(INFName, OutFName : String; Key : Word);