Delphi，MySQL，VarBinary，这就是＆＃34;对＆＃34;办法？

Question

我有一个有效的AES加密和解密算法。我现在可以使用WriteBinaryStream和ReadBinaryStream保存为inifile。所以我在MySQL中尝试使用它是很自然的。起初我尝试了无效的varchar，所以我切换到了varbinary。我就是这样做的：

加密并保存到MySQL varbinary字段。

UserMain.spUser.Params.ParamByName('pPassword').Value:=TEncoding.ANSI.GetBytes(aes_encrypt(Edit2.Text));

解密并在Edit.Text中显示

Edit2.Text:=aes_decrypt(TStringStream.Create(TEncoding.ANSI.GetString(UserMain.UserQueryPassword.AsBytes)));

嗯它有效，看起来很简单，这意味着我认为没关系:)我现在尝试了一段时间，无论长度如何，我总能解码密码。

我这样做＆＃34;对＆＃34;或者这里有危险的礼物？