Wo ist das Problem ?
Delphi-Quellcode:
uses DECUtil, Cipher;
function Encode(const Value, Password: String): String;
begin
with TCipher_Rijndael.Create(Password, nil) do
try
Result := CodeString(Value, paEncode, fmtMIME64);
finally
Free;
end;
end;
function Decode(const Value, Password: String): String;
begin
with TCipher_Rijndael.Create(Password, nil) do
try
Result := CodeString(Value, paDecode, fmtMIME64);
finally
Free;
end;
end;
Wie einfacher soll es denn noch gehen ??
Gruß Hagen
PS: auf alle Fälle ist dies sicherer als alle anderen genannten Beispiele.
PPS: LockBox ist schön und gut, aber nicht unbedingt einfacher und eben sicherer. Hier im Forum hatte ich dies schon mal ausführlich erklärt warum dies so sein muß.