Und noch eine Antwort: Dein Text und dein Code passen irgendwie nicht zusammen.
Ich hatte eher sowas gemeint:
Delphi-Quellcode:
var
msg: TIdMessage;
part: TIdMessagePart;
i: Integer;
begin
// ...
for i := 0 to Pred(msg.MessageParts.Count) do
begin
part := msg.MessageParts.Items[i];
ShowMessage(BoolToStr(part.IsEncoded, True));
// ...
end;
// ...
end;
Ansonsten: Für Indy9 gibt es eine Demo "MailClient" - vielleicht gibt es die auch für Indy10. Wenn nicht, dann ist der Unterschied bestimmt auch nicht so groß, dass man nicht etwas davon lernen könnte.