odbieranie e-maili i INDY

Jak wyśle e-maila bez załącznika i potem odbieram tego e-maila za pomocą komponentu idpop3 to w IdMessage1.Body mam treść wysłanej wiadomości. Natomiast jak wyślę e-maila z załącznikiem (załącznikami) i odbieram go komponentem idpop3 to w idMessage1.Body nie mam treści wiadomości, którą wysłałem, tylko napis "This is a multi-part message in MIME format" - jak odebrać treść wiadomości, gdy wysłany e-mail zawiera zalaczniki?

Tak jak odbierasz. Problem w tym (znaczy jaki tam problem), że jest to wiadomość wieloczęściowa. Poczytaj sobie o IdText i IdAttachment.

Moze się komuś przyda - znalazlem rozwiązanie

procedure TForm1.Button1Click(Sender: TObject);
var
  lMsg: TIdMessage;
  liCount: Integer;
  liMessages: Integer;
begin
  POP3.Connect;
  liMessages := POP3.CheckMessages;
  Memo1.Lines.Add('CheckMessages: ' + IntToSTr(liMessages));
  lMsg := TIdMessage.Create;
  try
    POP3.Retrieve(1, lMsg);
    Memo1.Lines.Text := lMsg.MsgId;
    for liCount := 0 to lMsg.MessageParts.Count-1 do
    begin
      if lMsg.MessageParts[liCount] is TIdText then
        Memo1.Lines.AddStrings((lMsg.MessageParts[liCount] as TIdText).Body);
      if lMsg.MessageParts[liCount] is TIdAttachment then
        //to jest załącznik
    end;
  finally
    lMsg.Free;
  end;
end;