Я использую Delphi XE6 и LockBox 3.4.3 для запуска кода actEncryptStringExecute. Этот код был опубликован как ответ на вопрос «Как использовать шифрование AES-256 в сейфе 3 с помощью Delphi». Я получаю сообщение об ошибке TSimpleCodec.Begin_EncryptMemory — неправильный режим.
Есть еще один вопрос «TSimpleCodec.Begin_EncryptMemory — неправильный режим», где ответ «Вам не нужно делать это, если вы настраиваете кодек со значениями времени разработки. Это намного проще сделать во время разработки. Просто установите опубликованные свойства по мере необходимости».
TCodec properties are :-
AdvancedOptions2 = []
AsymetricKeySizeInBits = 1024
ChainMode = ECB (with block padding)
Cipher = Base64
CryptoLibrary = CryptographicLibrary1
Encoding = (TEncoding)
TCryptographicLibrary properties are :-
CustomCipher = (TCustomStreamCipher)
Name = CryptographicLibrary1
ParentLibrary =
Код: -
var
base64CipherText : String;
PlainTextStr : String;
ReconstructedPlainTextStr : String;
procedure TForm1.btnEncryptClick(Sender: TObject);
begin
PlainTextStr := edtPlainText.Text;
Codec1.EncryptString(PlainTextStr, base64CipherText, TEncoding.Unicode);
lblEncrypted.Caption := base64CipherText;
Codec1.DecryptString(ReconstructedPlainTextStr, base64CipherText, TEncoding.Unicode);
lblReconstructed.Caption := base64CipherText;
end;
Что мне нужно изменить во время разработки, чтобы этот простейший пример заработал?