|
|
Регистрация Восстановить пароль |
Повторная активизация e-mail |
Регистрация | Задать вопрос |
Заплачу за решение |
Новые сообщения |
Сообщения за день |
Расширенный поиск |
Правила |
Всё прочитано |
|
Опции темы | Поиск в этой теме |
18.08.2008, 15:45 | #1 |
Регистрация: 18.08.2008
Сообщений: 5
|
доступ к данным подчиненной таблицы
вопрос такой:
есть две связанные таблицы ADOTable1 и ADOTable2,а также ADODataSet1... ADOTable1-главная,ADOTable2-подчиненная.... доступ к определенному полю ADOTable1 осуществляется так AdoDataSet1.RecNo:=n; edit1.text:=AdoDataSet1.FieldByName ('наименование' ).value; а как скажите пожалуйста как точно так же получить доступ к определенному полю в подчиненной таблице?т.е загнать значение в edit1.text? Заранее спасибо всем ответившим |
18.08.2008, 15:50 | #2 | |
Белик Виталий :)
Старожил
Регистрация: 23.07.2007
Сообщений: 57,097
|
Цитата:
Код:
I'm learning to live...
|
|
21.08.2008, 12:20 | #3 | |
Регистрация: 18.08.2008
Сообщений: 5
|
Цитата:
суть задачи заключалась в Memo вывести запись поля ADOTable1 и соответствующие ей подчиненные записи из ADOTable2 сделал так procedure TForm1.Button2Click(Sender: TObject); var i,j: integer; begin for i:=1 to DataModule2.ADOTable1.RecordCount do begin DataModule2.ADOTable1.RecNo:=i; Memo1.Lines.Add('Организация: '+DataModule2.ADOTable1.fieldbyname ('Наименование').value); for j:=1 to DataModule2.ADOTable2.RecordCount do begin DataModule2.ADOTable2.RecNo:=j; Memo1.Lines.Add('ИНН: '+DataModule2.ADOTable2.fieldbyname ('ИНН').Value); end; end; end; |
|
21.08.2008, 12:59 | #4 | |
Белик Виталий :)
Старожил
Регистрация: 23.07.2007
Сообщений: 57,097
|
Цитата:
I'm learning to live...
|
|
21.08.2008, 16:51 | #5 |
Регистрация: 18.08.2008
Сообщений: 5
|
|
21.08.2008, 17:04 | #6 |
Белик Виталий :)
Старожил
Регистрация: 23.07.2007
Сообщений: 57,097
|
Да, только не у DBGrida а у Table(Query)
I'm learning to live...
|
Похожие темы | ||||
Тема | Автор | Раздел | Ответов | Последнее сообщение |
Как получить доступ к данным | kiber0net0 | Помощь студентам | 2 | 03.09.2008 08:14 |
Как двигаться по данным после select? | _ozzy_ | SQL, базы данных | 5 | 30.06.2008 09:33 |
Пути к данным | Лубышев | Общие вопросы Delphi | 3 | 21.01.2008 18:56 |
Доступ к данным | buk | Microsoft Office Excel | 2 | 11.07.2007 09:44 |