как включить все ADO компоненты, или фильтрация в мастер и детальной таблицах

[reihtmonbern]

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

begin
DataModule3.adotable5.MasterFields:='';
DataModule3.adotable5.IndexFieldNames:='';
DataModule3.ADOTable5.mastersource.Enabled:=false;
DataModule3.adotable5.filtered:=false;
DataModule3.adotable5.Filter:=Combobox1.Text+ '=' +QuotedStr(Edit1.Text) ;
DataModule3.adotable5.filtered:=true;
end;

как вы понимаете из за этого кода данные в первой таблице дб грид не отображаются фильтрация идет только по второй таблице вот и для этого я отменяю фильтрацию и восстанавливаю связь отображение другим кодом

begin
DataModule3.ADOConnection1.Close;
DataModule3.adotable5.Close;
DataModule3.adotable5.Filter:='';
DataModule3.adotable5.mastersource:=DataModule3.DataSource1;
DataModule3.adotable5.mastersource.DataSet.Active:=true;
DataModule3.adotable5.IndexFieldNames:='PKey' ;
DataModule3.adotable5.MasterFields:='Код';
DataModule3.adotable5.mastersource.Enabled:=true;
DataModule3.ADOConnection1.Open;
DataModule3.adotable5.Open;
DataModule3.ADOTable1.Filtered:= false;
end;

и всё вроде бы ничего но у меня на DataModule3 куча других компонентов табле квери но из за того что я отключаю и потом подключаю DataModule3.ADOConnection1.Open; то данные отображаемые из других компонентов не отображаются в других дбгридах на других формах пустые мертвые и поэтому мне приходиться оживлять открывать другие компоненты самым что не наесть дебильным образом при выключении формы close и переходе на другую форму где лежат другие дбгриди с другими наборами данных от других компонентов я вынужден включить их все заново

begin
DataModule3.adotable1.Open;
DataModule3.adotable2.Open;
DataModule3.adotable3.Open;
DataModule3.adotable4.Open;
DataModule3.adotable5.Open;
DataModule3.adotable6.Open;
DataModule3.adotable7.Open;
DataModule3.adotable8.Open;
DataModule3.adotable9.Open;
DataModule3.adotable10.Open;
DataModule3.adotable11.Open;

Form6.adotable3.Open;

DataModule3.ADOQuery1.Open;
DataModule3.ADOQuery2.Open;
DataModule3.ADOQuery3.Open;
DataModule3.ADOQuery4.Open;
DataModule3.ADOQuery5.Open;
DataModule3.ADOQuery6.Open;
DataModule3.ADOQuery7.Open;
DataModule3.ADOQuery8.Open;
DataModule3.ADOQuery9.Open;
DataModule3.ADOQuery10.Open;
DataModule3.ADOQuery11.Open;
DataModule3.ADOQuery12.Open;
DataModule3.ADOQuery13.Open;
DataModule3.ADOQuery14.Open;
DataModule3.ADOQuery15.Open;
DataModule3.ADOQuery16.Open;
DataModule3.ADOQuery17.Open;
DataModule3.ADOQuery18.Open;
DataModule3.ADOQuery19.Open;
DataModule3.ADOQuery20.Open;
DataModule3.ADOQuery21.Open;
DataModule3.ADOQuery22.Open;
DataModule3.ADOQuery23.Open;
DataModule3.ADOQuery24.Open;
DataModule3.ADOQuery25.Open;
DataModule3.ADOQuery26.Open;
DataModule3.ADOQuery27.Open;
DataModule3.ADOQuery28.Open;
DataModule3.ADOQuery29.Open;
DataModule3.ADOQuery30.Open;
DataModule3.ADOQuery31.Open;
DataModule3.ADOQuery32.Open;
DataModule3.ADOQuery33.Open;
DataModule3.ADOQuery34.Open;
DataModule3.ADOQuery35.Open;
DataModule3.ADOQuery36.Open;
DataModule3.ADOQuery37.Open;
DataModule3.ADOQuery38.Open;
close;

вот а сам вопрос в том что может быть кто ни будь подскажет мне как все это хозяйство оптимизировать может кто знает более элегантный код или другой способ фильтрации, поиска данных без отключения DataModule3.ADOConnection1.Close;

[Yurk@]

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

[reihtmonbern]

Сообщение от Yurk@

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

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

[alexiz]

А почему бы не задействовать возможности SQL?
Зачем все эти танцы с фильтрацией.

[reihtmonbern]

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

А почему бы не задействовать возможности SQL?
Зачем все эти танцы с фильтрацией.

Потому что я sql уже натанцевался в сласть надоело хочу теперь с фильтрацией потанцевать не надо философствовать и спрашивать зачем и почему . Говорите по существу.

[Yurk@]

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

...не надо философствовать и спрашивать зачем и почему . Говорите по существу.

а как мы можем говорить по существу если нам не понятна логика задачи? ... люди (обычно) стремятся упростить работу, а ты наоборот - нагородил кучу непонятных элементов вместо того чтобы просто подойти к этому с другой стороны
ЗЫ: по теме: ну так не фильтрируй detail-dataset, а фильтрируй нужный тебе master-dataset при этом не разрывая соединения, но можешь просто закрыть detail на момент фильтрации по detailTable.Close;

[reihtmonbern]

Сообщение от Yurk@

а как мы можем говорить по существу если нам не понятна логика задачи? ... люди (обычно) стремятся упростить работу, а ты наоборот - нагородил кучу непонятных элементов вместо того чтобы просто подойти к этому с другой стороны
ЗЫ: по теме: ну так не фильтрируй detail-dataset, а фильтрируй нужный тебе master-dataset при этом не разрывая соединения, но можешь просто закрыть detail на момент фильтрации по detailTable.Close;

Да мне то как раз надо не мастеру а по detail нужно фильтровать вот и всё а в плане sql я эту задачу просто реализовал мне просто хотелось бы увидеть ваши предложения в плане кода есть ли какая нибудь возможность фильтровать по detail таблице не разрывая соединения и что бы фильтрация происходила во всем строкам таблице а не по тем что относится к той или иной строке из мастера ладно ни чё страшного чё нить придумаю

[Yurk@]

тогда примерно так:
для фильтрации

AdoTable5.Close;
AdoTable5.MasterSource:=nil;
AdoTable5.Filtered:=False;
AdoTable5.Open;
AdoTable5.Filter:=<наши условия фильтра>;
AdoTable5.Filtered:=True;

для возврата в исходное положение

AdoTable5.Close;
AdoTable5.MasterSource:=DataSource1;
AdoTable5.Filtered:=False;
AdoTable5.Open;

P.S. (на заметку) похожую твоей задаче решал совсем недавно. нужно было в "мастере" отфильровать данные которые соответствуют отпределённым условиям в "клиенте". решалось все это на Firebird+FIBPlus применением SQL условий в Conditions ... решение получилось очень коротким и функциональным

[reihtmonbern]

спасибо попробую..