Проблема с DBLookupCombobox Delphi.

DBLookupCombobox связан с таблицей Spec, DBGrid связан с таблицей Doctors c помощью Table и DataSorse (paradox). Нужно, чтобы при выборе поля из списка DBLookupCombobox, в DBGrid фильтровались данные по этому полю. Вот так не работает, почему?? ?

procedure TForm1.DBLookupComboBox4Click(Sender: TObject);
begin
Form1.Table2.Filtered:=false;
Form1.Table2.Filter:='[Speciality]='+Form1.DBLookupComboBox4.Text;
Form1.Table2.Filtered:=true;
Form1.DBGrid2.DataSource:=Form1.DataSource2;
end;