|
Registriert seit: 10. Jun 2003
Ort: Berlin
9.580 Beiträge
Delphi 11 Alexandria
|
Re: ListBox filtern
20. Mär 2009, 04:38
Delphi-Quellcode:
SearchText := EditX.Text;
ListBoxX.Items.Clear;
for i := 0 to MyStringList.Count - 1 do
if (SearchText = '') or (Pos(SearchText, MyStringList[i]) > 0) then
ListBoxX.Items.Add(MyStringList[i]);
Sebastian Jänicke
Alle eigenen Projekte sind eingestellt, ebenso meine Homepage, Downloadlinks usw. im Forum bleiben aktiv!
|