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.