E-Mails in ListBox?

Michi_Mueller · Beiträge: 21

Hallöchen zusammen!

Bin gard dabei nen E-Mail Programm zu proggen. Es läuft alles wunderbar, aber nur wenn ich eine bestimmte Masil überprüfe! Ich möchte jedoch zum Beispiel alle Betreffs in einer ListBox ausgeben.
Dazu benutze ich folgendes:

markieren

Quelltext

1:
2:
3:
4:

for i:= 1 to IdPOP31.CheckMessages do begin
  IdPOP31.RetrieveHeader(i, IdMessage1);
  ListBox1.Items.Add(IdMessage1.subject);
end;

Jetzt zeigt die ListBox aber nur den Betreff der ersten Mail an und zwar mehrmals!

Hat jemand ne Idee?? Wäre nett wenn ihr mir weiterhelfen könnt!

(27.10.02 19:24 Tino) Code-Tags hinzugefügt.

Ex0rzist · Beiträge: 550 Win XP Prof. Mandrake 10.0 D6

Hallo,

überprüfe mal diese Codezeile hier:

Michi_Mueller hat folgendes geschrieben:

markieren

Quelltext

1:	ListBox1.Items.Add(IdMessage1.subject);

Was ist IDMessage1? Ändert sich das? Oder ist IDMessage ein Array und du wolltest eigentlich IdMessage[i].subject; haben?

_________________
If accidentally read, induce vomitting.

Michi_Mueller · Beiträge: 21

Nein, das war schon richtig so. Das ist ne Indy Componente um E-Mails in in Sachen wie Absender,Betreff etc. aufzuspalten!

Hab den Fehler selber schon gefunden. Wenn jemand das gleiche Prob hat, hier der richtige Code:

markieren

Quelltext

1:
2:
3:
4:
5:

for i:= 1 to IdPOP31.CheckMessages do begin
  IdMessage.Clear: 
  IdPOP31.RetrieveHeader(i, IdMessage1); 
  ListBox1.Items.Add(IdMessage1.subject); 
end;

	Mitgliederliste
	Gruppen
	Das Team
	Richtlinien
	Synonyme