rc6unit.pas

来自「用visual c++ 编的关于RC6加密算法!」· PAS 代码 · 共 24 行

{*******************************************************}
{                                                       }
{                          RC6算法                      }
{                                                       }
{         版权所有(C) BieEncrypt安全实验室 2006         }
{                  版本：V1.0                           }
{            主页：http://www.bitencrypt.com            }
{            邮件：[e-mail]                   }
{                                                       }
{*******************************************************}
unit RC6Unit;

interface

function RC6StrEncrypt(lpInStr:PChar;lpKey:PChar;lpOutStr:PChar):Boolean;stdcall;external 'RC6.dll';
function RC6StrDecrypt(lpInStr:PChar;lpKey:PChar;lpOutStr:PChar):Boolean;stdcall;external 'RC6.dll';
function RC6FileEncrypt(lpInFile:PChar;lpKey:PChar;lpOutFile:PChar):Boolean;stdcall;external 'RC6.dll';
function RC6FileDecrypt(lpInFile:PChar;lpKey:PChar;lpOutFile:PChar):Boolean;stdcall;external 'RC6.dll';
function GetVersion(lpVersion:PChar):Boolean;stdcall;external 'RC6.dll';

implementation

end.