[Delphi] źródło wiadomości pocztowej

Witam
jak za pomocą komponentów indy idmessage wyswietlic w komponncie memo pelne zrodlo otrzymanej wiadomosci pocztowej...?

hae napisał:
Witam
&gtjak za pomocą komponentów indy idmessage wyswietlic w komponncie memo pelne zrodlo otrzymanej wiadomosci pocztowej...?

  for v := 0 to Pred(Msg.MessageParts.Count) do
  begin
      if Msg.MessageParts.Items[v] is TIdText then
      begin
        Memo.Lines.Clear;
        Memo.Lines.AddStrings(TIdText(Msg.MessageParts.Items[v]).Body);
      end;
  end;

--__________________________________
Pozdrawiam...
piechnat