Delphi 7 - 使用TIdDecoderMIME解码Base64

Question

好吧,这让我疯了,哈哈.

我有一个Base64字符串,我正在尝试使用TIdDecoderMIME将其解码为TMemoryStream.

我目前的代码如下:

Var MStream:TMemoryStream; Decoder:TIdDecoderMIME;
begin
  Decoder := TIdDecoderMIME.Create(nil);
  MStream := TMemoryStream.Create;
  Decoder.DecodeToStream(BSting,MStream);
end;

其中BString = My Base64字符串.

现在,当代码运行时,我收到一条错误消息"DecodeToString中的大小不均匀".

有任何想法吗？

任何帮助是极大的赞赏.谢谢.

Answer 1

您正在向函数传递DecodeToStream一个 Base64 字符串，其长度不是 4 的倍数。换句话说，您传递的字符串无效。