Цитата:
Сообщение от Yurk@
ОК.
Попробую.
Но это не то, что мне бы хотелось сделать !
|
Сделай так:
Обрабатывай событие AfterScrool 1-го датасэта и по нему делай выборку во втором.
Код:
DataSet1.SQL.Text := 'SELECT * FROM departments';
DataSet2.SQL.Text := 'SELECT * FROM employes WHERE department = :department';
...
procedure DataSet1AfterScrool(DataSet : TDataSet);
begin
DataSet2.ParamByName('department').AsInteger :=
DataSet2.FieldByName('id').AsInteger;
end;
Возможно не самый лаконичный вариант. Зато с любыми компонентами и НД.