可先在EXE中加入控件来参考,如要导出给其它语言调用参数得用PChar,XE以上的估计得再调整,待实用时再测试 如下代码在2007中可直接导出使用 uses Windows, SysUtils, DCPcrypt2, DCPblockciphers, DCPtwofish, DCPsha1; function TwofishEncryptString(sKey, sInput: PChar): PChar;StdCall; var DCP_twofish1: TDCP_twofish; begi…