Entwickler-Ecke
Internet / Netzwerk - ListBox Problem mit Nmpop3
Anonymous - Sa 19.04.03 19:40
Titel: ListBox Problem mit Nmpop3
Hallo!
Ich habe mal wieder folgendes Problem....
Mein Programm schaut nach wie viele E-Mails auf einem Pop3 Server liegen. Dieses wird ja nmpop3.MailCount aufgelistet.
Nun mein Problem:
Ich möchte für jede E-Mail ein neues Item in der Listbox haben, so dass wenn ich z.B. das zweite Item anklicke nur die zweite E-Mail runtergeladen wird.
Wie realisiere ich das....Schaffe es noch nicht einmal die E-Mails in der ListBox anzuzeigen....
Soll ja einfach nur stehen:
Nachricht 1
nachricht 2
u.s.w.
Anonymous - Sa 19.04.03 19:56
Das erste hab ich schon hinbekommen:
Quelltext
1:
2:
3:
4:
5:
6:
7:
| i := 0;
while i < nmpop31.Mailcount do
begin
ListBox1.Items[i] := 'Nachricht ' + inttoStr(i + 1);
i := i + 1;
end; |
Jetzt muss ich nur noch wissen wie ich das mit dem E-Mails abrufen mache....
Anonymous - Sa 19.04.03 20:04
ok, das letzte Problem hat sich auch schon erledigt...
nächstes mal probier ich mal was länger bevor ich poste....
hier trotzdem der code:
Quelltext
1:
2:
3:
4:
5:
6:
7:
8:
| procedure TForm1.ListBox1DblClick(Sender: TObject);
var a : Integer;
begin
a := ListBox1.ItemIndex;
a := a + 1;
NMpop31.GetMailMessage(a);
Memo1.Lines.Assign(nmpop31.MailMessage.Body);
end; |
Entwickler-Ecke.de based on phpBB
Copyright 2002 - 2011 by Tino Teuber, Copyright 2011 - 2026 by Christian Stelzmann Alle Rechte vorbehalten.
Alle Beiträge stammen von dritten Personen und dürfen geltendes Recht nicht verletzen.
Entwickler-Ecke und die zugehörigen Webseiten distanzieren sich ausdrücklich von Fremdinhalten jeglicher Art!