Delphi XE i TPLockbox (AES256) implementacijaHocu da enkriptujem tekst pomocu AES256 (ECB chain mode). Postavim TCodec i TCryptographicLibrary komponente na formu, povezem ih, u TCodec izaberem AES256 i ECB mode i kod koji koristim je:
Code:
var
enc : AnsiString;
begin
Codec1.Reset;
Codec1.Burn;
Codec1.Password := '1234567890123456';
Codec1.EncryptString('test', enc);
Edit1.Text := enc;
var
enc : AnsiString;
begin
Codec1.Reset;
Codec1.Burn;
Codec1.Password := '1234567890123456';
Codec1.EncryptString('test', enc);
Edit1.Text := enc;
Ovo sve naizgled radi, medjutim vrednosti mojeg ciphera i nekog online ciphera (recimo http://www.tools4noobs.com/online_tools/encrypt/) se razlikuju. Ja dobijam yAZ70LI5wgvqnDlLZzIegQ== kada enkriptujem "test" string, dok online cipheri vracaju eGu7Hb+27YymOMTqibZFupcPHuYfGU87pv7N6/VDxus= za isti tekst.
Jel ima neko ideju gde gresim ?
