Проблемы с выпадающим полем на dbgrideh...

[maxbls]

Помогите

Вопрос?

- Как мне сделать выпадающее поле с данными из другой таблицы из этой же БД, на втором dbgrideh?

Проблема

- Таблица открывается с БД, и таблиц несколько и они все разные.

Вспомогательное описание, для пояснение вопроса.

В БД есть около 8 таблиц каждый уникален по своему.

Сама БД access, подключаюсь через adoconnect+adoquery+datasource, а вывожу на dbgrideh.

После вывода какой нибудь таблицы(в первой форме, только для чтения), выбирается какая нибудь запись(Строка), и это запись открывается(отдельно) в другой форме через другие adoquery и datasource на другом dbgrideh(только одна запись, которая текущая запись в первой форме).


На первой форме событие выбора строки для ред.

procedure TForm1.RedClick(Sender: TObject);
begin
 
form4.ADOQuery1.SQL.Text:='select * from '+form1.label1.Caption+' where ['+(DBGridEh1.Columns[DBGridEh1.SelectedIndex].Title.Caption)+']='+DBGridEh1.Fields[DBGridEh1.SelectedIndex].Text;
 
form4.ADOQuery1.Active:=true;
 
form4.show;
 
 
end;