Hallo DPler
Ich vergleiche die Einträge meiner Listbox mit einem text im Suchfeld. Jetzt würde ich gerne von euch wissen ob diese Lösung effektiv ist oder ob man es besser machen kann.
Ach ja, das Ganze geschiet im OnChange des Edit-Feldes.
Delphi-Quellcode:
lsbSuche.Clear;
if length(edSuchen.Text)>= 1 then
begin
for i := 0 to lsbPlaylist.Count - 1 do
if ansipos(ansilowercase(edSuchen.Text),ansilowercase(lsbPlaylist.Items.Strings[i]))
= 1 then
lsbSuche.Items.Add(lsbPlaylist.Items.Strings[i])
end;