Hallo Zusammen,
ich habe die aktuelle Version von LockBox3 Version 3.5.0 in Delphi XE7 installiert
und mich auf der Such nach der Doku gemacht. Anscheinend gibt es keine oder gut versteckt.
Es geht darum einfach ein String zu ver- und entschlüsseln.
Gefunden habe ich das, aber es funktioniert nicht.
Ich bekomme eine Fehlermeldung: TSimpleCodec.Begin_EncryptMemory - Algorytms not set.
Was sind das für Werte für StreamCipherId, BlockCipherId und ChainModeId?
Delphi-Quellcode:
function EncryptText_AES_128(input: string; password: string): string;
var
Codec: TCodec;
CipherText: String;
Encoding:TEncoding;
begin
Codec := TCodec.Create(nil);
try
Codec.CryptoLibrary := TCryptographicLibrary.Create(Codec);
//
Codec.StreamCipherId := 'native.StreamToBlock';
Codec.BlockCipherId := Format('native.AES-%d', [128]);
Codec.ChainModeId := 'dunit.ECB';
//
Codec.Password := Password;
Codec.EncryptString(input, CipherText, Encoding.ANSI);
//
Result := string(CipherText);
finally
Codec.Free;
end;
end;
Hat jemand eine Idee?
Gruß Kostas