Einzelnen Beitrag anzeigen

Klaus01

Registriert seit: 30. Nov 2005
Ort: München
5.757 Beiträge
 
Delphi 10.4 Sydney
 
#5

Re: Listbox mit einer Suchfunktion durchsuchen?

  Alt 23. Dez 2008, 14:28
Zitat von DeddyH:
Der zu suchende String soll aber in der Listbox stehen, oder? Dann wäre es IMHO das Einfachste, die Listbox.Items in einer Schleife (rückwärts!) zu durchlaufen und die Items zu löschen, die den Suchstring nicht enthalten.
Delphi-Quellcode:
for i := Pred(ListBox.Items.Count) downto 0 do
  //möglicherweise habe ich jetzt die Parameter vertauscht, einfach mal in der Hilfe nachsehen
  if not StrUtils.AnsiContainsText(Suchstring,ListBox.Items[i]) then
    ListBox.Items.Delete(i);
Ist aber blöd, wenn ich mich z.B. vertippt habe und ein bereits eingegebenes Zeichen
wieder lösche - dann kann es vorkommen, dass der String bei den vorherigen Schritten
aus der Liste geflogen ist.

Was vielleicht noch interessant ist - autovervollständigen
Musst Du dir nur noch entsprechend umbauen von StringList nach ListBox.items.

Grüße
Klaus
Klaus
  Mit Zitat antworten Zitat