Связь 2-х таблиц в Delphi

[Droid]

У меня есть 2 таблицы в Delphi, как их связать между собой, чтобы можно было удалять из одной, и из другой тоже удалялось, и при выделении запии в одном DBGrid-e мне в другом показывало к какой записи относится данная строка, В MySQL - Fronte у меня удаляет нормально в Delphi выдает ошибку ---->Безымянный.jpg
пытался так не получается, искал в инете чет тоже не нашел.
Dm.ADOQ_PACid_pacienta.FieldName:=D M.ADOQ_OSid_pacienta.FieldName;

[Droid]

Народ как связать 2 DBGrida, между собой, чтобы при выделении 1 записи в 1 DBGrid показывали соответсявующие записи во 2 DBGrid-e ??? Использую компоненты ADOQuery, DataSourse, ADOCommand ппц все перепробовал все, что знаю.

[artemavd]

свяжите таблицы через master detail

[Evgeniy26]

Михаил Фленов -> Библия Delphi -> Глава 14. Delphi и базы данных -> 14.10. Связанные таблицы

[Droid]

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

свяжите таблицы через master detail

У меня в тех компонентах нет MasterFields, я добавил ADODataSet только с каким ADODataSourse его звязывать не пойму чет, там все как то не понятно.

[vovk]

Если ADODataSet тогда в подчинённом ADODataSet в свойстве DataSource выбирай датасоурс к которому привязана главная таблица, а в запросе добавляеш условие

where ( <тут подчинённое поле>=:<имя поля в главной таблице>)

[Droid]

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

Если ADODataSet тогда в подчинённом ADODataSet в свойстве DataSource выбирай датасоурс к которому привязана главная таблица, а в запросе добавляеш условие

where ( <тут подчинённое поле>=:<имя поля в главной таблице>)

DM.ADOQ_OS.Close;
DM.ADOQ_OS.SQL.Clear;
DM.ADOQ_OS.SQL.Text:='SELECT * FROM osnovnoy_soputstvuyhiy_diagnoz osd INNER JOIN pacient pt ON pt.id_pacienta=osd.id_pacienta INNER JOIN diagnoz dz ON dz.id_diagnoza=osd.id_diagnoza WHERE osd.id_pacienta=:idos;';
DM.ADOQ_OS.Parameters.ParamByName('idos').Value:=DM.ADOQ_PACid_pacienta.Value;
DM.ADOQ_OS.Open;

все получилось )))

[vovk]

можно и так, только использую свойств DataSource (AdoQuery или ADODataSet), достаточно просто добавить датосоурс главной таблицы и написать запрос в свойство (SQL или Commandtext зависит от компонента) и всё, у вас же скорее всего это расположено в DataSource.odatachange датасоурса главной таблицы., Можно кстать запрос написать 1 раз а в действии исползовать только

DM.ADOQ_OS.Close;
DM.ADOQ_OS.Parameters.ParamByName('idos').Value:=DM.ADOQ_PACid_pacienta.Value;
DM.ADOQ_OS.Open;

причём тут DM.ADOQ_PACid_pacienta.Value; лучше всё таки обращатся к полю DM.ADOQ_PAC.FieldByname('id_pacient a').asstring; ну мне так кажется вообще не люблю задавать филды в конструкторе, мне кажется от этого потом гибкость теряется, а при изменении писать больще, но это моё мнение

[Droid]

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

можно и так, только использую свойств DataSource (AdoQuery или ADODataSet), достаточно просто добавить датосоурс главной таблицы и написать запрос в свойство (SQL или Commandtext зависит от компонента) и всё, у вас же скорее всего это расположено в DataSource.odatachange датасоурса главной таблицы., Можно кстать запрос написать 1 раз а в действии исползовать только

DM.ADOQ_OS.Close;
DM.ADOQ_OS.Parameters.ParamByName('idos').Value:=DM.ADOQ_PACid_pacienta.Value;
DM.ADOQ_OS.Open;

причём тут DM.ADOQ_PACid_pacienta.Value; лучше всё таки обращатся к полю DM.ADOQ_PAC.FieldByname('id_pacient a').asstring; ну мне так кажется вообще не люблю задавать филды в конструкторе, мне кажется от этого потом гибкость теряется, а при изменении писать больще, но это моё мнение

Возможно, у меня туча форм и я в них путаюсь ыыыы.