DBGrid durchsuchen

[Tim Henford]

Hallo,

ich versuche gerade eine Suchfunktion für ein DBGrid zu realisieren.
Und zwar hat ich mir das so vorgestellt, dass man das Feld, in dem man suchen will, auswählt und dann in ein EditFeld den Suchbegriff eingibt.

Nun dacht ich, ich könnte über eine Filter-Option

Delphi-Quellcode:

    Query.Filter:= 'Feld1='''+Edit1.Text+'''';
    Query.Filtered:= true;

    Query.First;
    while not Query.Eof do begin
      DBGrid1.SelectedRows.CurrentRowSelected := true;
      Query.Next;
    end;

  Query.Filtered:= false;

die interessanten Eintäge filtern, markieren und wieder entfiltern, aber dann stimmen die Indizes nach dem Entfiltern nicht mehr.

Gibt es eine bessere Lösung, die funktioniert?