如何减少使用 Synapse TMimeMess 解码 MIME 时的巨大 RAM 使用量？答案

【问题标题】：How to reduce huge RAM usage on decoding MIME using Synapse TMimeMess?如何减少使用 Synapse TMimeMess 解码 MIME 时的巨大 RAM 使用量？
【发布时间】：2012-12-07 16:42:26
【问题描述】：

我使用 TMimeMess 来解码基于我的 SMTP 服务器的传入电子邮件在突触上。

我发现用于解码 50MB MIME 消息（带有附件），TMimeMess 使用了 600-800MB 的内存。

这里的解码代码：

FMimeMsg.Header.DecodeHeaders(FMimeMsg.MessagePart.Lines);
FMimeMsg.MessagePart.DecomposeParts;
ExtractPartsFromMess(FMimeMsg.MessagePart);
...
procedure ExtractPartsFromMess(AMimePart: TMimePart);
var i: integer;
begin
  if AMimePart.GetSubPartCount = 0 then
    Begin
      if (AMimePart.PrimaryCode = MP_TEXT) then
        Begin
          AMimePart.DecodePart;          
          FBody.Add(string(ReadStrFromStream(AMimePart.DecodedLines,AMimePart.DecodedLines.Size)));
    end
  else if (AMimePart.PrimaryCode = MP_BINARY) then
    Begin
      if AMimePart.FileName <> '' then
        Begin
          AMimePart.DecodePart;
          AMimePart.DecodedLines.SaveToFile(FPathToIncomingFolder+AMimePart.FileName);
        end;
    end;
end
else
Begin
  for i:=0 to AMimePart.GetSubPartCount-1 do
    Begin
      ExtractPartsFromMess(AMimePart.GetSubPart(i));
    end;
end;
end;

谢谢。

【问题讨论】：

您是否就这个问题联系过 Synpse 作者？
我将此消息发布到 synalist-public，但没有人不回复。
可以用 indy MIME 解码器代替吗？
是的。为此，Indy 有 TIdSMTP 和 TIdMessage 组件。它们在从服务器下载 SMTP 数据时对其进行动态解码，数据不会预先缓存在内存中，并且附件默认存储在 HDD 上的临时文件中。
@RemyLebeau，这应该是一个答案，不是吗？

标签： delphi memory smtp mime

【解决方案1】：

Indy 为此目的提供了 TIdSMTP 和 TIdMessage 组件。它们在从服务器下载 SMTP 数据时对其进行动态解码，数据不会预先缓存在内存中，并且附件默认存储在 HDD 上的临时文件中。

您也可以尝试通过 Synpse 作者的电子邮件地址或网站联系他们。

【讨论】：