Как отобразить данные Access из связанной таблицы по запросу или работа с вложенными таблицами.

[Armageddets]

Всем доброго времени суток, уважаемые эксперты. Есть куча таблиц в Access. Подключать и выводить их данные я умею. Есть такая вот схема данных:


Есть вот такая таблица:


Необходимо вывести данные таким вот образом. Чтобы кликая по левой таблице выбирались данные из вложенной таблицы в правую таблицу, причем только те, которые относятся к выбранной марке. Я пробовал через запросы делать, но у меня не получилось.

Результат должен быть такой:


Я пробовал такой вариант:

Form5.ADOQuery1.Close;
  Form5.ADOQuery1.Connection:=Form1.adoconnection1;
  Form5.ADOQuery1.SQL.Add('SELECT * from Модель,Марка WHERE Модель.МаркаID=Марка.Марка');
  Form5.ADOQuery1.Open;
  Form5.DataSource2.DataSet:=Form5.ADOQuery1;

В таком случае пишет что поле Модель.МаркаID не имеет значения по умолчанию. Пробовал и другие варианты, которые работали, но работали неправильно.

Саму БД тоже прилагаю:
http://rghost.ru/7M4PNqfJH

Заранее спасибо всем, кто откликнется.

[evg_m]

http://www.programmersforum.ru/showp...1&postcount=14

[Armageddets]

Спасибо большое. Программа стала выводить хотя бы необходимые поля с этой вложенной таблицы, но сама таблица пустая почему-то. Я пробовал двумя способами так:

Form5.ADOQuery1.Close;
  Form5.ADOQuery1.Connection:=Form1.adoconnection1;
  Form5.ADOQuery1.SQL.Add('SELECT * from Модель Where (Модель.МаркаId=:Марка.Id)');
  Form5.ADOQuery1.Open;
  Form5.DataSource2.DataSet:=Form5.ADOQuery1;

И вот так:

Form5.ADOQuery1.Close;
  Form5.ADOQuery1.Connection:=Form1.adoconnection1;
  Form5.ADOQuery1.SQL.Add('SELECT * from Модель Where (Модель.Id=:Марка.Id)');
  Form5.ADOQuery1.Open;
  Form5.DataSource2.DataSet:=Form5.ADOQuery1;

Что я делаю не так?

[Vapaamies]

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

Что я делаю не так?

Имя параметра не может быть с точкой.

[Armageddets]

Пробовал и без нее вот так, но все так же:

Form5.ADOQuery1.SQL.Add('SELECT * from Модель Where Id=:Id');

Вот сам проект. Если в его запустить в меню выбрать: справочники -> марки и модели, то видно что вторая таблица пустая...
Проект

[evg_m]

Модель.маркаID =:id

[Armageddets]

Нет, такой вариант:

Form5.ADOQuery1.SQL.Add('SELECT * from Модель Where Модель.маркаID =:id');

Работает точно так же. То есть таблица справа остается пустой к сожалению.

[Armageddets]

Ладно разобраться с этим не удалось, но я обошел данную проблему обычной фильтрацией. В любом случае спасибо всем, ознакомили меня с интересным методом.

[evg_m]

Ладно разобраться с этим не удалось,

1.

Если используется не Table с указанием имени таблицы, а Query с необходимостью написания SQL-запроса, то там в свойство DataSource выставляем dsMaster,

например так

form5.ADOQuery1.DataSource:=form5.DBGrid...<справочника марок>.DataSource;

2.

а в запросе используем параметры с именами полей главной таблицы:

в запросе для справочников должно быть поле ID и ...

Form5.ADOQuery1.SQL.Add('SELECT * from Модель Where Модель.маркаID =:id');

П.2. у тебя был(есть), а п.1 ???

[Dvoishnik]

так можно

  with ADOQuery1  do
BEGIN
Close;
SQL.Clear;
SQL.Add('select * From Модель where маркаID ='+ intToStr(ADOTable1.FieldByName('ID').AsInteger));
ExecSQL;
Open;
end;