Как состыковать два DBLookupComboBox

[tov.Suhov]

Господа, прошу помощи!
Ситуация следующая! Пишу БД для частной авиа школы. Это мой диплом. Есть 3 таблицы над которым надо сделать нехитрую вещь. Таблицы: ЛА(летательный аппарат), двигатель, винт.
Для каждой записи в табл ЛА будет заполнятся и запись в табл двигатель и винт.
Заполнив табл ЛА, я записываю в нее такие данные как номер двигателя и номер винта, затем нажимаю кнопку Сохранить. Запись сделана. Сразу же приступаю к заполнению табл Двигатель и винт для моего самолета.
Тут нужна такая хитрость. В DBLookupComboBox я выбираю для какого самолета я буду дописывать данные по двигателю и винту. Допустим это самолет ТУ-134. Но в авиакомпании допустим таких аппаратов 10. Различают их как и автомобили, по их номерам. Так вот мне надо чтобы во втором DBLookupComboBox отсеклись все номера для имеющихся ТУ-134. Затем я выбираю из этих номеров нужный для меня. Выбрав номер, в DBLookupComboBox3 должен появится номер двигателя(в другой табл появляется номер винта) который я уже вводил в табл ЛА. Выбрав этот номер(он будет единтвенный в списке бокса) я заполню другие данные, типа срок тех обслуживания и так далее.
Далее я опять нажимаю Сохранить, и заполненные данные по двигателю и винту записываются соответсвенно в таблицы Двигатель и Винт. Надеюсь вы сможете мне помочь)

[artemavd]

Правильно ли я понял, что Вам нужно следующее. Вы первой таблице выбирается ЛА, после этого во второй таблице отображаются записи, которые соответствуют выбранному в первой таблице ЛА, а во второй таблице выбираете запись нужную, и, в третьей таблице отображаются только те записи, которые соотвествуют только той записи, которая была выбрана во второй таблице. Так?

[tov.Suhov]

Щас я еще разок объяснить попробую...В табл ЛА я заполняю поля ЛА,Тип ЛА, Двигатель,Винт и т д....
Но есть и табл Двигатель и Винт
После ЛА я заполняю эти табл....
Табл Двигатель:
в Боксе 1 я выберу ЛА(их у нас может быть 5 одинаковых но Номера у них разные)
в Боксе 2 должен быть список номеров ЛА, в соответсвии с выбором Бокса1
Дальше я заполняю данные для двигателя моего самолета и нажимаю кнопку Созранить!
Аналогично делаю с табл Винт.
На рисунке который я выложил в начале можете посмотреть как устроено все это дело....Спасибо

[tov.Suhov]

Таким же способом мне нужно будет искать записи....через ЛукапБоксы.....

[artemavd]

Начинаю тупить, попробую въехать. Со вставкой у тебя проблем нет?

[tov.Suhov]

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

Начинаю тупить, попробую въехать. Со вставкой у тебя проблем нет?

Пока проблем нет так как я незнаю как это сделать)))
Говорят что там вообще кода мало...просто надо настроить Лукапы грамотно....
То что мне надо оч похоже на поиск Вконтакте...
Выбрал Страну, а в след Боксе только Города этой страны....такая технология

[artemavd]

То что мне надо оч похоже на поиск Вконтакте...

Плагиат

Выбрал Страну, а в след Боксе только Города этой страны....такая технология

Могу предложить следующее:
1. Создаются (имеются) таблицы со странами и городами;
2. Таблица Городов связана с таблицой Стран по какому-то полю;
3. В Combobox1 заносятся Страны;
4. На событии OnCreate у Form1 висит подобие такого запроса:

 query1.active:=false;
 query1.sql.clear;
 query1.sql.text:='select distinct goroda from tab_goroda';
 query1.active:=true;

  ComboBox1.Clear;
  while not Query1.Eof do
  begin
    ComboBox1.Items.Add(Query1.FieldByName('goroda').AsString);
    Query1.Next;
  end;

5. В ComboBox2 заносятся те города, которые соответствуют выбранной (событие OnChange) стране, например, так:

 query2.active:=false;
 query2.sql.clear;
 query2.sql.text:='select distinct strana from tab_strana where gorod='+quotedstr(combobox1.text);
 query2.active:=true;

  ComboBox2.Clear;
  while not Query2.Eof do
  begin
    ComboBox2.Items.Add(Query2.FieldByName('strana').AsString);
    Query2.Next;
  end;

Может и коряво, но я бы попробовал такой прием

[tov.Suhov]

вот немного подредактировал код....но в БОксе2 почему то пусто(((

begin
ADOQuery2.active:=false;
ADOQuery2.sql.clear;
ADOQuery2.sql.text:='select distinct Name from Country';
ADOQuery2.active:=true;

ComboBox1.Clear;
while not ADOQuery2.Eof do
begin
ComboBox1.Items.Add(ADOQuery2.Field ByName('Name').AsString);
ADOQuery2.Next;
end;

ADOQuery3.active:=false;
ADOQuery3.sql.clear;
ADOQuery3.sql.text:='select distinct Capital from Country where Name='+quotedstr(combobox1.text);
ADOQuery3.active:=true;

ComboBox2.Clear;
while not ADOQuery3.Eof do
begin
ComboBox2.Items.Add(ADOQuery3.Field ByName('Capital').AsString);
ADOQuery3.Next;
end;
end;

[artemavd]

А таблицы Contry и Capital как связаны?