Listbox-Items in TStringlist kopieren

Visum · Beiträge: 106

Hi,
wahrscheinlich eine eher einfache Frage, aber ich komm nicht drauf:

Wie kann ich den Inhalt (die Items) einer Listbox in eine tStringList kopieren?

Danke
Visum

Arakis · Beiträge: 344

Hi

,
hiermit sollte es funktionieren:

markieren

Quelltext

1:
2:
3:
4:
5:
6:
7:
8:

procedure TForm1.Button1Click(Sender: TObject);
var
  st: TStringList;
begin
  st:=TStringList.Create;
  st.AddStrings(self.ComboBox1.Items);
  st.Free;
end;

Bis dann

_________________
Mit dem Computer löst man Probleme, die man ohne ihn nicht hätte.
Entwickler von SpaceTrek: The New Empire - Siehe Hompage!

Tino · Beiträge: 9839 Erhaltene Danke: 45 Windows 8.1 Delphi XE4

oder so

markieren

Quelltext

1:
2:
3:
4:
5:
6:
7:
8:

procedure TForm1.Button1Click(Sender: TObject); 
var 
 st: tStringList; 
begin 
 st := tStringList.Create; 
 st.Assign (ComboBox1.Items); 
 st.Free; 
end;

	Mitgliederliste
	Gruppen
	Das Team
	Richtlinien
	Synonyme