Форум программистов
 

Восстановите пароль или Зарегистрируйтесь на форуме, о проблемах и с заказом рекламы пишите сюда - alarforum@yandex.ru, проверяйте папку спам!

Вернуться   Форум программистов > Delphi программирование > Общие вопросы Delphi
Регистрация

Восстановить пароль
Повторная активизация e-mail

Купить рекламу на форуме - 42 тыс руб за месяц

Ответ
 
Опции темы Поиск в этой теме
Старый 22.10.2014, 12:46   #1
sdr1
Пользователь
 
Регистрация: 06.10.2014
Сообщений: 46
По умолчанию dbgrid1+dbgrid2=dblistbox

Есть в программе 2 формы 1 и 2, на каждой форме есть dbgrid тоже 1 и 2, dbgrid 1 подвязан к табл. Организации(organization) в ней несколько полей (organization_name),('inn'),('kpp') и т.д. dbgrid 2 подвязан ко 2 табл. Сотрудники(sotrudniki) в ней тоже несколько полей и есть поле (organization_name) оно дает выбор из первой таблицы список организаций.
Так вот вопрос такой как сделать так чтоб при выборе строки в dblistBox
появлялась не только информация из строки dbgrid2(sotrudnik_name, organization_name, adress)
вот как я сделал
Код:
DBListBox1.Clear;
DBListBox1.Items.Add(DBGrid1.DataSource.DataSet.FieldByName('organization_name').AsString);
, но и информация по этой организации из dbgrid 1(inn, kpp и т.д.)

DBListBox1 находится на форме 2
sdr1 вне форума Ответить с цитированием
Старый 22.10.2014, 15:22   #2
maloun
Форумчанин
 
Аватар для maloun
 
Регистрация: 03.01.2011
Сообщений: 233
По умолчанию

если подцеплять DBGrid через ADOTable, то
Код:
ADOTable.First;
for i:=0 to ListBox1.ItemIndex-1 do
  ADOTable.Next; // добираемся в цикле до нужной строки

// читаем из второй таблицы
KPP:=ADOTable.FieldByName('KPP').AsWideString;
INN:=ADOTable.FieldByName('INN').AsWideString;
пыжок
maloun вне форума Ответить с цитированием
Старый 23.10.2014, 09:12   #3
sdr1
Пользователь
 
Регистрация: 06.10.2014
Сообщений: 46
По умолчанию

Мне нужно через ADOQuery
sdr1 вне форума Ответить с цитированием
Ответ


Купить рекламу на форуме - 42 тыс руб за месяц



Похожие темы
Тема Автор Раздел Ответов Последнее сообщение
перенос данных из DBGrid1 в DBGrid2 Max571 C++ Builder 7 22.05.2013 19:33
из DBGrid1 в DBGrid2 DNLHC БД в Delphi 5 17.03.2012 12:25
DbListbox Alamkhon БД в Delphi 0 11.10.2011 15:56
DBGrid2(CellClick) фокус на строке в цвете в DBGrid1 funball БД в Delphi 5 31.08.2009 17:30
Копирование строки из dbgrid1 в dbgrid2 XFilippowX Общие вопросы Delphi 3 17.02.2009 19:00