unit AESLib; interface function AESDecyptStr(StrIn, AESKey: PChar): PChar; stdcall external 'AES.dll'; function AESEncryptStr(StrIn, AESKey: PChar): PChar; stdcall external 'AES.dll'; procedure DeleteAESStrPointer(ARetValue: PChar); stdcall external 'AES.dll'; implementation end.