Фильтр по двум таблицам

[Scorpuha]

есть БД, в ней несколько таблиц, связь один ко многим. Как организовать фильтр в двух определенных таблицах по разным столбцам.
вот мои код который делает фильтр по одной таблице. Как сделать фильтр по двум таблицам. Условие для фильтрации задается через EDIT.

begin
   If Length(Edit1.Text)>0 then
  begin
  Datamodule2.ADOTable1.filtered:=false;
  Datamodule2.ADOTable1.filter:='[Tab_nomer] LIKE '+ #39 + '%' + Edit1.Text + '%' + #39;
  Datamodule2.ADOTable1.filtered:=true;
  end;
end;

[Streletz]

1 ADOTable = 1 таблица.
К сожалению, не совсем понятна постановка задачи. В самом общем случае, если доступ к обеим таблицам через ADOTable, то добавьте аналогичный код для 2й таблицы.
Для того, чтобы можно было подсказать что-либо определённое, полнее раскройте тему. Эти 2 таблицы связаны с 2мя отдельными DBGrid'ами? Какая структура БД? И т.д.

[Scorpuha]

если добавляю аналогичный код для второй таблицы то выдает ошибку "не удается открыть фильтр"

begin
   If Length(Edit1.Text)>0 then
  begin
  Datamodule2.ADOTable1.filtered:=false;
  Datamodule2.ADOTable1.filter:='[Tab_nomer] LIKE '+ #39 + '%' + Edit1.Text + '%' + #39;
  Datamodule2.ADOTable1.filtered:=true;
  Datamodule2.Attestat.filtered:=false;
  Datamodule2.Attestat.filter:='[Id_sotrud] LIKE '+ #39 + '%' + Edit1.Text + '%' + #39;
  Datamodule2.Attestat.filtered:=true;

  end

База Аксесс, для двух таблиц два отдельных ДБгрида.

[Scorpuha]

разобрался, во втором варианте фильтрации поправил код на

Datamodule2.Attestat.filtered:=false;
  Datamodule2.Attestat.filter:='[Id_sotrud]='+ Edit1.Text;
  Datamodule2.Attestat.filtered:=true;

т.к. поле Id_sotrud имеет тип числовой, а поле Tab_nomer - текстовый

[Dozent]

Я конечно не знаю вашей постановки задачи, но как-то это всё не правильно выглядет, фильтруются две табилцы по разным полям, причём одно явно ади и параметр для фильтров один и тот же, мб вы постановке не совсем правильн опоняли? не может быть ади сотр равным табельному номеру...

[Scorpuha]

тут тоже решил задачку, пришлось добавлять в таблицу Attestat поле Tabel и организовывать новые связи.

[xxbesoxx]

Сообщение от Scorpuha

если добавляю аналогичный код для второй таблицы то выдает ошибку "не удается открыть фильтр"

begin
   If Length(Edit1.Text)>0 then
  begin
  Datamodule2.ADOTable1.filtered:=false;
  Datamodule2.ADOTable1.filter:='[Tab_nomer] LIKE '+ #39 + '%' + Edit1.Text + '%' + #39;
  Datamodule2.ADOTable1.filtered:=true;
  Datamodule2.Attestat.filtered:=false;
  Datamodule2.Attestat.filter:='[Id_sotrud] LIKE '+ #39 + '%' + Edit1.Text + '%' + #39;
  Datamodule2.Attestat.filtered:=true;

  end

База Аксесс, для двух таблиц два отдельных ДБгрида.

Я бы заменил ADOTable1 на ADOQuery и объединил с помощью конструкция JOIN . Но если для вас проще использовать ADOTable1 . То учитесь Lookup http://basicsprog.ucoz.ru/publ/3-1-0-10

[Dozent]

ой помойму Lookup тут излишний... проще уж джойном или фильтр по таблице сделать