Email mit Indy verschicken

[Chrissi91]

[/delphi]Super! Funktioniert alles! Letzte Frage:

Recipients.Add.Text := Trim(edit1.text); Jetzt steht nicht nur ein Empfänger in einem Edit, sondern jetzt stehen 10 Empfänger in einer Listbox. Wie mache ich das?

Recipients.Add.Text := Trim(listbox1.items); Das geht leider nicht. Aber eine andere Frage, fast dieselbe:

Ich will einem Stringsrray alle Listboxinhalte geben: Funktioniert auch nicht!

Delphi-Quellcode:

var
 adressen: array[1..1000] of string;
begin
 for i:= 1 to listbox1.Items.count do
  begin
   adressen[i]:=listbox1.Items(i);
  end;

Danke schon im Vorraus!