Suche in TListView - Zugriffsverletzung?

[robinWie]

Hallo,
ich verusuche in meinen Programm eine Suchfunktion für eine TListView einzubauen, die Dateien anzeigt. Das ganze soll so wie bei der Winamp Media-Library sein. Also das nur die Einträge angezeigt werden, die das gesuchte Wort beinhalten.
Aber ich erhalte immer eine Zugriffsverletzung

Hier der Code:

Delphi-Quellcode:

procedure TMainForm.Search_edtChange(Sender: TObject);
var
  i: integer;
  FOUND: Boolean;
begin
  if Seach_edt.Text <> '' then
    begin
      for i := 0 to FileList.Items.Count -1 do
        begin
          FOUND := AnsiCompareText(FileList.Items[i].Caption, Search_edt.Text) = 0;
          if not FOUND then
            FileList.Items[i].Delete;
        end;
    end;
end;

ich habe mir einen klienen Teil des Codes hier "geklaut"

Weiss jemand rat?

Robin