Indy Pop3 - mails herunterladen !

[agm65]

guten abend leute,
ich möchte mit meinem indy pop3 client emails runterladen und als txt files oder eml files speichern ...

hat einer dazu nen source ?
also ich lade meine mails in eine listviw aber damit sind sie ja noch nicht gepsiechert ?

Code:

  index : integer;
  li    : TListItem;
begin
   for index := 1 to IdPOP31.CheckMessages do
    begin
     IdPOP31.Retrieve(index,idMessage1);
     li         := ListView1.Items.Add;
     li.Caption := IdMessage1.From.Text;
     li.SubItems.Add(IdMessage1.Subject);
     li.SubItems.Add(DateToStr(IdMessage1.Date));
     idMessage1.Clear;
    end;
  IdPOP31.Disconnect;