Help using Rijndael Algorithm in Delphi 2007. Net
I'm working in Delphi 2007. Net, where I can find an example of using the Rijndael algorithm. Bye. Some time ago I wrote this code, should work ok. uses System.Security.Cryptography, System.Text; type TDynamicArrayOfByte = array of Byte; function Encrypt(StrtoEncrypt, PK: string): TDynamicArrayOfByte; // pk, must be of a string of 32 characters var miRijndael: Rijndael; encrypted: TDynamicArrayOfByte; toEncrypt: TDynamicArrayOfByte; bytPK: TDynamicArrayOfByte; i: integer; begin Result := nil; miRijndael := System.Security.Cryptography.RijndaelManaged.Create; try toEncrypt := System.Text