Eintrag in einer Liste suchen

[Äfan]

Hi,

Also ich brauche mal hilfe:

Ich habe 2 liste, eine EditBox und einen Button. Wenn man auf den Button klickt soll aus der Liste1 der eintrag gefunden werden der in der EditBox steht und die Such Ergebnisse in Liste 2 angezeigt werden. Ich weiß nicht wie ich das anstellen soll.

Danke

[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

[Äfan]

Jaaaa, vielen dank, ihr seit die besten. Nur noch eine frage, wie kann ich es machen das nicht auf die groß und kleinschreibng geachtet wird ?

[alcaeus]

Hi Äfan,

bei der Überprüfung musst du einfach Edit1.Text und ListBox1.Items[i] mit Hilfe von LowerCase in Kleinbuchstaben umwandeln: aus

Delphi-Quellcode:

if Pos(Edit1.Text, ListBox1.Items[i]) > 0 then

wird dann

Delphi-Quellcode:

if Pos(LowerCase(Edit1.Text), LowerCase(ListBox1.Items[i])) > 0 then

Greetz
alcaeus

[Äfan]

Ja danke danke danke. Ich kenn mich net so gut mit delphi aus, denn ich bin noch anfänger.

Das is hier echt das schnellste Forum der Welt :-D