Организация связи один-ко многим

@yura0103 · Регистрация: 20.10.2014

Студворк — интернет-сервис помощи студентам

Стоит следующая задача:
отобразить связь один ко многим в двух гридах.
Для реализации я использую Cobection, Query, Source.
Я пытаюсь сделать это следующим образом:

Первый query

Delphi
1
2
3
4
5
6
7
ADOConnection1.ConnectionString:='Provider=Microsoft.Jet.OLEDB.4.0;Data Source=ASUP.mdb;Persist Security Info=False';
 ADOConnection1.LoginPrompt:=false;
    ADOQuery1.Connection:=ADOConnection1;
    ADOQuery1.SQL.Add('Select * From Mesto');
    ADOQuery1.Active:=true;
      DataSource1.DataSet:=ADOQuery1;
      DBGrid1.DataSource:=DataSource1;

Второй query

Delphi
1
2
3
4
5
6
    b:=DBgrid1.DataSource.DataSet.FieldValues['id_mesta'];
     ADOQuery2.Connection:=ADOConnection1;
    ADOQuery2.SQL.Add('Select * From Polzovatel where id_mesta='+b);
    ADOQuery2.Active:=true;
      DataSource2.DataSet:=ADOQuery2;
      DBGrid2.DataSource:=DataSource2;

Вопрос в следующем: первая запись отображается нормальна , а при попытке отображения второй записи возникает ошибка

@yura0103 · 24.11.2014, 16:34 **[ТС]**

при работе возникла следующая проблема:
данные в грид нормально выводятся, а вот DBListBox выводится только первая запись

Delphi
1
2
3
4
while not DataModule2.ADOQuery2.Eof do begin
DBListBox1.Items.Add(DataModule2.DataSource2.DataSet.Fields[1].AsString);
 
DataModule2.ADOQuery2.Next;

Новые блоги и статьи Все статьи Все блоги /
Установка нескольких штампов электронной подписи в строго определенных местах файла docx ВладимирСамохин 19.07.2026 (В!) Работа с Электронной подписью - это неотъемлемая часть современного документооборота. Но что делать, если нужно поставить несколько штампов электронной подписи в строго определенных местах. . .	сукцессия 35. Научная статья о проделанной работе anaschu 19.07.2026 Написал в формате латекс и пдф	Вангую, что это не пройдёт модерацию, и на неделе я запущу свой сервер. Hrethgir 19.07.2026 Эта публикация сейчас в песочнице и ждёт приглашения. https:/ / habr. com/ ru/ sandbox/ 295048/ начало и оглавление - Как «пернатого» заставить осваивать новые горизонты опыта через масштабирование. . .	сукцессия 33. открытые вопросы от клауде anaschu 19.07.2026 "Что накопилось за эту часть А — тринадцать правок, из которых шесть пришли из ваших вопросов и каждая оказалась реальной ошибкой, а не калибровкой: односторонний симбиоз, отсутствующий листопад,. . .
32 сукцессия anaschu 19.07.2026 сукцессия 28‑мерное ядро стабилизировано Коллеги, фиксирую разбор инженерных правок и их изоморфную проекцию на экономику, меметику и половой отбор. Модель теперь не «подкручивает» сходимость —. . .	сукцессия 31: модель микоризы - это модель ещё нескольких явлений, социальных и экономических anaschu 18.07.2026 Теория «Всего»: апдейт v1. 1. 2 — 28‑мерное ядро стабилизировано Коллеги, фиксирую разбор инженерных правок и их изоморфную проекцию на экономику, меметику и половой отбор. Модель теперь не. . .	сукцессия 30. Массив проверяющих друг друга моделей anaschu 18.07.2026 Архитектура сети взаимопроверяющих моделей микоризной сукцессии (v2. 0) Развитие тензорного ОДУ-ядра и создание кросс-платформенного калибровочного полигона Уважаемые коллеги! В продолжение. . .	Грибы - это женщины, деревья - это мужчины. Анти инь янь для союза мужчины и женщины. anaschu 18.07.2026 ГЛАВНЫЙ НАУЧНО-ФИЛОСОФСКИЙ ВЫВОД: Сексуально-Репродуктивный Капитализм против Государства Моногамии Коллеги, мы вышли на финишную прямую 20-мерного ОДУ-моделирования вековой сукцессии (ветка. . .