Indy MTP multipart/mixed mit nur einem Teil

[Codehunter]

Ja solche Non-Standard-Dienste kosten mir auch öfters mal viel Zeit. Wobei mich schon wundert dass Indy sich da so zickig hat. Versuch doch mal, den Anhang zuerst zu erzeugen und dann erst den Mime-Typ zuzuweisen.

[hoika]

Hallo,
die folgende Zeile aus IdMessage.pas verursacht das Problem

FIsMsgSinglePartMime := (Encoding = meMIME) and (MessageParts.Count = 1) and IsBodyEmpty;

Hier wird in meinem FIsMsgSinglePartMime=True
und damit wird der Anhang in den Body geschrieben.

Quellcode sei dank habe ich das jetzt umschifft mit einer zusätzlichen Variable in TIdMessage (bSinglePartMime: Boolean)

Delphi-Quellcode:

if not bSinglePartMime then
begin
  FIsMsgSinglePartMime := (Encoding = meMIME) and (MessageParts.Count = 1) and IsBodyEmpty;
  FIsMsgSinglePartMime:= False;
end;

Zumindestens das Problem ist erledigt.