ListView suchen

[DeddyH]

Ich verstehe nicht, was daran so schwierig sein soll.

Delphi-Quellcode:

gefunden := false;
for i := 0 to ListView.Items.Count - 1 do
  if ListView.Items[i] = Edit.Text then
    begin
      gefunden := true;
      break;
    end;

Oder ohne break mit einer while-Schleife:

Delphi-Quellcode:

gefunden := false;
i := 0;
while not gefunden and (i < ListView.Items.Count) do
  begin
    if ListView.Items[i] = Edit.Text then
      gefunden := true;
    inc(i);
  end;