Eintrag in einer Liste suchen

[alcaeus]

Hi Äfan,

du könntest alle Elemente in Liste 1 durchgehn, und mit Pos überprüfen, ob der Suchstring enthalten ist, und die Elemente ggf. in Liste 2 hinzufügen:

Delphi-Quellcode:

var i: Integer;
begin
  ListBox2.Items.Clear;
  for i := 0 to ListBox1.Items.Count-1 do
  begin
    if Pos(Edit1.Text, ListBox1.Items[i]) > 0 then
      ListBox2.Items.Add(ListBox1.Items[i]);
  end;
end;

Greetz
alcaeus