错误的含义TSimpleCodec.Begin_EncryptMemory - 错误的模式

时间:2014-07-10 00:52:42

标签: delphi lockbox-3

我使用Delphi XE6和LockBox 3.4.3来运行代码actEncryptStringExecute。此代码是作为问题的答案发布的,如何使用delphi'在密码箱3中使用AES-256加密。 我得到的错误是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;

在设计时需要更改哪些内容才能让这个最简单的示例正常工作?

0 个答案:

没有答案