Связь TListBox и TDBGrid - БД в Delphi

New_One1603 · 22.05.2010, 16:02

Если кто знает, расскажите, пожалуйста, как сделать так, чтобы при выборе записи в главной таблице, те записи в дочерней таблице, которые соответствуют выбранной записи, все скопировались отобразились в ListBox-e?
DBGrid - родительская. Используется компонент TQuery.
Заранее спасибо.

artemavd · 22.05.2010, 18:57

Если используется TQuery, то и используйте запрос.

New_One1603 · 22.05.2010, 19:02

Есть 2 таблицы Access, главная отображается в DBGrid, а дочерняя должна отображаться в ListBox, у главной набор данных TTable, дочерняя TQuery.
Проблема состоит в том, что в дочерней таблице отображается только первая запись, а когда я начинаю выбирать записи в главной таблице, ListBox не изменяется...
Код
Table1.DatabaseName:='DBVoc';
Table1.TableName:='dic';
DataSource1.DataSet:=Table1;
DBGrid1.DataSource:=DataSource1;
Table1.Active:=True;
Query1.Active:=false;
Query1.DataBaseName:='DBVoc';
DataSource3.DataSet:=Query1;
Query1.DataSource:=DataSource1;
Query1.SQL.Clear;
Query1.SQL.Add('select Trans from trans where idLword=:idLword');
Query1.Active:=true;
Query1.First;
ListBox1.Items.Add(Query1.Fields.Fi eldByName('Tran s').AsString);
Query1.Next;

Не знаю, что сюда добавить или изменить, чтобы нормально работало...

22.05.2010, 16:02	#1
New_One1603 Регистрация: 22.05.2010 Сообщений: 3	Связь TListBox и TDBGrid Если кто знает, расскажите, пожалуйста, как сделать так, чтобы при выборе записи в главной таблице, те записи в дочерней таблице, которые соответствуют выбранной записи, все скопировались отобразились в ListBox-e? DBGrid - родительская. Используется компонент TQuery. Заранее спасибо.

22.05.2010, 18:57	#2
artemavd Старожил Регистрация: 05.06.2008 Сообщений: 4,206	Если используется TQuery, то и используйте запрос. Не стоит смеяться над человеком делающим шаг назад, возможно он делает разбег.

Похожие темы
Тема	Автор	Раздел	Ответов	Последнее сообщение
TListBox	Dr.Badnezz	Компоненты Delphi	3	03.02.2009 23:15
TDBGrid	Blackmore	БД в Delphi	2	26.05.2008 09:39
скролинг TDBGrid	azat	БД в Delphi	5	18.01.2008 15:12
редактирование TDBGrid	mm_mauser	БД в Delphi	5	29.11.2007 11:39

22.05.2010, 19:02	#3
New_One1603 Регистрация: 22.05.2010 Сообщений: 3	Есть 2 таблицы Access, главная отображается в DBGrid, а дочерняя должна отображаться в ListBox, у главной набор данных TTable, дочерняя TQuery. Проблема состоит в том, что в дочерней таблице отображается только первая запись, а когда я начинаю выбирать записи в главной таблице, ListBox не изменяется... Код Table1.DatabaseName:='DBVoc'; Table1.TableName:='dic'; DataSource1.DataSet:=Table1; DBGrid1.DataSource:=DataSource1; Table1.Active:=True; Query1.Active:=false; Query1.DataBaseName:='DBVoc'; DataSource3.DataSet:=Query1; Query1.DataSource:=DataSource1; Query1.SQL.Clear; Query1.SQL.Add('select Trans from trans where idLword=:idLword'); Query1.Active:=true; Query1.First; ListBox1.Items.Add(Query1.Fields.Fi eldByName('Tran s').AsString); Query1.Next; Не знаю, что сюда добавить или изменить, чтобы нормально работало...