Delphi 7 - 将64字符串解码为文件

Question

我正在尝试找到解码base64字符串的方法，然后使用Delphi 7（这个特定的Delphi版本）将其保存到文件中。

base64字符串it-self是一个PDF文件，作为HL7消息的一部分编码为base64。我发现的几乎所有例子都与Delphi 7不兼容。

任何人都可以提供帮助吗？

更新：

正如Remy Lebeau所建议的那样使用TidDecoderMIME。 这是解码并保存到二进制文件的正确方法吗？

var MStream:TMemoryStream; Decoder:TIdDecoderMIME; Base64: string; begin Decoder := TIdDecoderMIME.Create(nil); MStream := TMemoryStream.Create; Base64 := 'abcd1234'; Decoder.DecodeToStream(Base64,MStream); MStream.SaveToFile('example.pdf'); FreeAndNil(Decoder); FreeAndNil(MStream); end;

Answer 1

Delphi附带了Indy，它有一个TIdDecoderMIME类用于解码base64字符串。