Поиск в БД, Нужна помощь! Опции

[BAEVIK]

Есть БД PARADOX нада сделать так чтобы когда водиш любое слова в edit оно его искала в таблице в колонке Название и потом выводила результат поиска ! Если кто знает подскажите !

[BAEVIK]

Вот я так попробывал сделать !

procedure TForm3.Button1Click(Sender: TObject); 
var   s:string;
 begin Table1.IndexName:='Name';// имя индексного файла (по полю название) 
  if  table1.FindKey([edit1.Text]) then begin 
  s:=Edit1.Text;  
 if CheckBox1.Checked then // это ПОЛНОЕ СОВПАДЕНИЕ ИЛИ ЧАСТИЧНОЕ     edit1.Text:='Name='+chr(39)+edit1.Text+chr(39) //name это мое поле было   
else edit1.Text:='Name='+chr(39)+edit1.Text+'*'+chr(39);   
table1.Filtered:=True;  
Table1.Filter:=edit1.Text;   
edit1.Text:=s;  end; end;

Когда запускаю всё без ошибак но потом когда в едит вожу букву то вот такое получаеться на скринах сматри !


Сообщение отредактировано: BAEVIK - 3.06.2009 17:07