Einzelnen Beitrag anzeigen

emteg

Registriert seit: 16. Jun 2005
71 Beiträge
 
Delphi 2009 Architect
 
#2

Re: Suchfunktion <> Listbox ?

  Alt 4. Sep 2005, 15:39
Wenn das wort in dem listbox eintrag vorkommen kann, etwa so:
Delphi-Quellcode:
var i: integer;
    Wort: string;
begin
  for i:=0 to ListBox.Items.Count-1 do
  begin
    if pos(Wort,ListBox.Items[i])>0 then
      //ergebnise auflisten o.ä.
  end;
end;
Falls der Listboxeintrag gleich dem suchwort ist, würdest du das
Delphi-Quellcode:
pos(Wort,ListBox.Items[i])>0
{ersetzen durch}
ListBox.Items[i]=Wort
(ungetestet)
  Mit Zitat antworten Zitat