Hilfe: Emails empfangen => Auslesen von Mailbody und Anha

[Beatmaster S]

Hallo zusammen,
ich hab ein paar Probleme mit dem Auslesen von Mailbody und Anhängen (ich hoffe ich hab das richtig ausgedrückt). Es wäre super nett wenn mir jemand den untenstehenden Code erklären könnte! (PS: ich bin kein Pro :oops: )
Schon mal einen Dank im voraus!! :coder:

Code:

for intindex:= 0 to pred(idmessage1.messageparts.count) do begin
  if (idmessage1.messageparts.items[intindex] is tidAttachment) then do begin
    li := anhangViewMessageParts.Items.add;
    li.caption := Tidattachment(idmessage1.messageparts.Items[intindex]).filename;
  end //end 'if'
  else begin
    if idmessage1.MessageParts.items[intindex] is tidText then begin
      memoNachricht.lines.clear;
      MemoNachricht.lines.addstrings(tidtext(idmessage1.messageparts.items[intindex]).body);
    end; //end 'if'
  end; //end 'else'
end; //end 'for'

Ich hoffe der Code stimmt soweit!

[Christian Seehase]

Moin Beatmaster,

erst einmal herzlich willkommen in der Delphi-PRAXIS.

Eine unmittelbare Lösung habe ich jetzt nicht, aber wenn ich mich recht entsinne, hatten wir dieses Thema gerade erst.
Such' doch mal hier im Forum danach (z.B. nach tidattachment oder tidmessage).
Das dürfte das Thema für Dich erhellen ;-)