Справочная Автовокзала (проблемы с поиском по базе данных с двумя таблицами)

[Choovak]

У меня проблемы с поиском по базе данных с двумя таблицами.
БД сделана в Accesse, состоит из двух таблиц Info_reisa (№_Reisa, Marshrut, Vrema_otpravlenia, Dni_otpravlenia и т.д.) и Punkt_naznachenia (№_Reisa, Punkt_naznachenia, vrema_prebitia, Vrema_v_puti и т.д.).

Связь между таблицами Один ко многим (от Info_reisa к Punkt_naznachenia, так как рейс 1, а населенных пунктов через который проходит несколько. Ключевое поле №_Reisa).

Я хочу чтобы в Edit вписать проходящий пункт. Ниже DBGrid вывел рейсы которые проходят через населенный пункт (т.е. искал в одной таблице а выдал результаты другой).

Допустим выбрали нужный маршрут в этом DBGrid, кликаем по нему (маршруту) и он выдает данные таблици Punkt_naznachenia (время пребытия, цену и всё такое).

+ выдает некоторые данные таблицы Info_reisa

Это вообще возможно, ли надо это как то упростить?

[Прик]

Компонентами ADO (TADOQuery, например) и SQL можно вытащить и показать все что угодно.

[Choovak]

но как????????? и где искать что то подобное?????

[Stilet]

http://yandex.ua/yandsearch?date=&te...=5290&lr=20554
Плюс http://www.programmersforum.ru/showthread.php?t=1589 скажем Фаронов Delphi 5 руководство разработчика баз данных

[Choovak]

Что у меня здесь не правильно?

procedure TPoisk.Edit1Change(Sender: TObject);
begin
  ADOQuery1.Close;
  ADOQuery1.SQL.Clear;
  ADOQuery1.SQL.Add('Select * from punkt_naznachenia where punkt_naznachenia like
  "+Edit1.Text+'%" order by vrema_prebitia asc;');
  ADOQuery1.Active:=true
end;

end.

Нормально, что название таблицы и имя одного из её столбцов совпадают?

[Прик]

Из чего стало понятно, что "не правильно"?

ADOQuery1.SQL.Text := 'Select * from punkt_naznachenia '+
        'where punkt_naznachenia like ' +QuotedStr(Edit1.Text+'%') +
        ' order by vrema_prebitia';
ADOQuery1.Open;

QuotedStr для того чтобы не париться с кавычками.
Пара мало значащих замечаний:
Open лучше чем Active := True, хотя это почти одно и тоже.
asc можно не указывать - сортировка в возрастающем порядке происходит по умолчанию.

Нормально, что название таблицы и имя одного из её столбцов совпадают?

Не нормально хотя бы потому, что об этом пришлось спрашивать.

[Choovak]

Блин вообще ничего не получается. Может лучше как то объединить эти таблицы и уже устроить поиск по объединенной???

Для объединения таблиц на форму поместил ADOQuery написал запрос:
select * from Info_reisa, Punkt_naznachenia
where Info_reisa.№_Reisa_I = Punkt_naznachenia.№_Reisa_P

Пытаюсь подключить, выдает ошибку:
Параметр Info_reisa.№_Reisa_I не имеет значения по умолчанию

Почему?

А если я не укажу ключевые строки (в моем случае №_Reisa), то в таблице получается полный сброд

[Stilet]

в моем случае №_Reisa

А ты пишешь №_Reisa_I
Ничего не смущает? Как правильно называется поле?

[Choovak]

Пардон. Я сам немного запутался.
Пришлось смотреть в access, там была ошибка в том, что у меня после № стоял пробел. Теперь заработало.
Перехожу к осуществлению поиска

[Choovak]

Извините за очень глупый вопрос!
На форму надо кидать еще один компонент Query для поиска?