Zapis wybranego rekordu bazy danych do Richedit

Witam..otóż mam coś takiego:

while not Table1.Eof do begin
Table1.SetKey;
Table1.Fields[9].AsString := Edit1.Text;
table1.gotokey;
Richedit1.Lines.add(table1.Fields[1].asstring);
table1.Next; end;
end;
..i jest zasadniczo fajnie bo wypisuje mi wysztkie dane z pola o indeksie 1, tyle ,że chodził by mi oto, żeby wypisywał mi TYLKO te rekordy ,które zawierają tekst z Edit1.Szukałem szukałem i do tej pory nie udało mi sie rozwiązać tego problemu. Byłbym bardoz zobowiązany za jakąkolwiek podpowiedź w tej, podejrzewam, banalnej sprawie.
Pozdrówka
mixer

to może:

if table1.Fields[1].asstring=Edit1. text then
  Richedit1.Lines.add(table1.Fields[1].asstring)

Obawiam się ,że nie zadziałało.... :-( ..popróbuje jeszcze pokombinować....ale dzięki. NIe ma nic gorszego jak proste rozwiązanie, którego nie można znaleźć

Wszytsko jest OK dopóki nie wstawię pętli WHILE...wtedy mi sie zawiesza program i "ślus" :/ [glowa]

Zwracam honor - to ja jestem głupi! Działa :-)

z łaski swojej edytuj posty a nie rób łańcuszka