RealICQClient/Includes/RSA/RSALib.pas

unit RSALib;

interface

  procedure GetDNE(var KeyD: PChar; KeyDMaxCount: Integer;
                 var KeyN: PChar; KeyNMaxCount: Integer;
                 var KeyE: PChar; KeyEMaxCount: Integer); stdcall external 'RSA.dll';
  function RealICQRSAEncrypt(P: PChar; KeyE, KeyN: PChar): PChar; stdcall external 'RSA.dll';
  function RealICQRSADecrypt(E: PChar; KeyD, KeyN: PChar): PChar; stdcall external 'RSA.dll';
  procedure DeleteStrPointer(ARetValue: PChar); stdcall external 'RSA.dll';

implementation

end.