Delphi 7 - 将Base64字符串解码为字节数组

Question

我正在制作一个构建器/存根应用程序。构建器在XE2中编码，而存根在Delphi 7中编码。

在XE2中，当我使用“EncdDecd”时，它具有编码EncodeBase64和DecodeBase64的功能。 但是在Delphi 7中，当我使用EncdDecd时，它没有我需要的DecodeBase64函数。

在我的构建器中，我将文件加载到流中并将其编码为B64 AnsiString并将其添加到存根的资源中。目标是让存根将此B64 AnsiString解码为字节数组，并最终将其写入磁盘上的文件。

Answer 1

v6的所有版本的Delphi都预装了Indy。其IdCoderMIME单元具有TIdEncoderMIME和TIdDecoderMIME类，用于编码/解码base64内容。

Answer 2

你可以使用很多base64免费的Delphi代码。 TurboPower LockBox 3也有base64的实现。这在Delphi 7中是可编译的。