[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;