Форум программистов, компьютерный форум, киберфорум
Delphi: Базы данных
Войти
Регистрация
Восстановить пароль
Блоги Сообщество Поиск  
 
 
Рейтинг 4.61/23: Рейтинг темы: голосов - 23, средняя оценка - 4.61
5 / 5 / 2
Регистрация: 27.08.2011
Сообщений: 75

Как сделать, чтобы отображались не цифры, а названия городов

29.03.2012, 11:48. Показов 5126. Ответов 33
Метки нет (Все метки)

Студворк — интернет-сервис помощи студентам
Добрый день. Глупый вопрос: пишу я, например, программу для работы с БД (ADO, MS Access).
Создаю в Access две таблицы: первая/главная (по полям) - Ключ, ФИО, город проживания.
Вторая таблица - Ключ, город. Связываю эти таблицы "один-ко-многим". Кидаю на форму компонент DBGrid + остальные, в колонке город проживания вижу индекс города из второй таблицы. Как сделать, чтобы отображались не цифры, а названия городов собственно? Только через ADOQuery? Или еще как?
За ранее спасибо. Микропроект в приложении.
Вложения
Тип файла: rar TestProj.rar (19.8 Кб, 23 просмотров)
0
cpp_developer
Эксперт
20123 / 5690 / 1417
Регистрация: 09.04.2010
Сообщений: 22,546
Блог
29.03.2012, 11:48
Ответы с готовыми решениями:

Как сделать, чтобы через базу данных отображались картинки в проекте Delphi?
Пишу программу "Тестирование ПДД" (курсовой проект). Необходимо, сделать так, чтобы при нажатии на запись, вопросы будут считываться из БД,...

Можно ли сделать, чтобы свойства созданного мной класса как-то отображались в инспекторе объектов на делфи?
Можно ли сделать, чтобы свойства созданного мной класса как-то отображались в инспекторе объектов на делфи?

Сделать чтобы должности отображались не числом, а названием
Как сделать чтобы должности отображались не числовой (1,2), а название где автомеханик или программист.

33
45 / 44 / 2
Регистрация: 06.02.2012
Сообщений: 147
05.04.2012, 10:07
Студворк — интернет-сервис помощи студентам
да не 1- 1
а "много" - 1.
суть такая:
много жильцов в одном доме,
много домов на одной улице... и т.д.
и где в твоей таблице домов поле id_streets? зачем связал ид_дома с ид_улицы?
а в таблице улиц id_town?
1
5 / 5 / 2
Регистрация: 27.08.2011
Сообщений: 75
05.04.2012, 10:14  [ТС]
Цитата Сообщение от steel_tiger Посмотреть сообщение
а "много" - 1.
Что-то просто уже мозг набекрень, учел замечания:
SQL
1
2
3
4
SELECT User_Table.FIO, Table_Of_Town.Nazvanie_Goroda, Streets.Name_Streets, Table_House.Number_House
FROM (Table_Of_Town
INNER JOIN (Streets INNER JOIN Table_House ON Streets.id_Streets = Table_House.id_Streets) ON Table_Of_Town.id_Town = Streets.id_Town)
INNER JOIN User_Table ON Table_House.id_House = User_Table.House
Миниатюры
Как сделать, чтобы отображались не цифры, а названия городов  
0
45 / 44 / 2
Регистрация: 06.02.2012
Сообщений: 147
05.04.2012, 10:26
я бы так писал... (хотя дело каждого)
SQL
1
2
3
4
5
SELECT User_Table.FIO, Table_Of_Town.Nazvanie_Goroda, Streets.Name_Streets, Table_House.Number_House
FROM User_Table 
INNER JOIN Table_House ON Table_House.id_House = User_Table.House
   INNER JOIN Streets       ON Streets.id_Streets = Table_House.id_Streets 
       INNER JOIN Table_Of_Town ON Table_Of_Town.id_Town = Streets.id_Town
суть та же, просто все соединения идут по возрастанию иерархии

Добавлено через 1 минуту
и я так и не понял:
у тебя заработало или нет?:cofee2:
1
5 / 5 / 2
Регистрация: 27.08.2011
Сообщений: 75
05.04.2012, 11:35  [ТС]
Цитата Сообщение от steel_tiger Посмотреть сообщение
суть та же, просто все соединения идут по возрастанию иерархии
Логично. Получается необязательным является тот факт, что в первой строке работы SQL-кода идет одна последовательность отображения имен столбцов из таблиц, а ниже приведенные строки идут в "обратной последовательности".
Сколько интересного я сегодня узнал!

Добавлено через 1 минуту
Цитата Сообщение от steel_tiger Посмотреть сообщение
у тебя заработало или нет?
Все заработало Я и внимания не обратил на то, что когда-то при проектировании "приложения" я занес в TADOQuery поля таблицы

Добавлено через 1 час 5 минут
Странно, почему запрос выполняется нормально, но когда я переношу его в программу:
Delphi
1
2
3
4
5
6
procedure TForm1.Button1Click(Sender: TObject);
begin
  ADOQuery1.SQL.Text:='SELECT User_Table.FIO, Table_Of_Town.Nazvanie_Goroda, Streets.Name_Streets, Table_House.Number_House' +
  'FROM (Table_Of_Town INNER JOIN (Streets INNER JOIN Table_House ON Streets.id_Streets = Table_House.id_Streets) ON Table_Of_Town.id_Town = Streets.id_Town) INNER JOIN User_Table ON Table_House.id_House = User_Table.House';
  ADOQuery1.ExecSQL;
end;
- выдает ошибку?
0
45 / 44 / 2
Регистрация: 06.02.2012
Сообщений: 147
05.04.2012, 11:38
Number_House' +
'FROM
вот здесь получается Number_HouseFROM.
добавь пробел в конце или вначале и должно работать
1
39 / 71 / 10
Регистрация: 03.02.2012
Сообщений: 362
05.04.2012, 12:47
Цитата Сообщение от steel_tiger Посмотреть сообщение
вот здесь получается Number_HouseFROM.
добавь пробел в конце или вначале и должно работать
у него
Delphi
1
ADOQuery1.ExecSQL;
2
45 / 44 / 2
Регистрация: 06.02.2012
Сообщений: 147
05.04.2012, 13:48
а я не заметил

Geksod, почитай зачем нужно ExecSQL и Open()
а пробел все равно добавь.
1
5 / 5 / 2
Регистрация: 27.08.2011
Сообщений: 75
06.04.2012, 09:17  [ТС]
Спасибо! Про ExecSQL я же читал на этом же форуме упустил, видать из памяти
Все заработало! Я рад как ребенок

Добавлено через 20 минут
Что-то я раньше времени обрадовался
Заработало, да не так: выборка по фамилиям идет, но присваивается каждому человеку один и тот же город и одна и та же улица, а вот номера домов соответсвуют правде:
SQL
1
2
3
4
5
SELECT User_Table.FIO, Table_Of_Town.Nazvanie_Goroda, Streets.Name_Streets, Table_House.Number_House
FROM (Table_Of_Town
INNER JOIN (Streets INNER JOIN Table_House ON Streets.id_Streets = Table_House.id_Streets) ON
Table_Of_Town.id_Town = Streets.id_Town)
INNER JOIN User_Table ON Table_House.id_House = User_Table.House
0
45 / 44 / 2
Регистрация: 06.02.2012
Сообщений: 147
06.04.2012, 09:25
возьми мой запрос из поста #23

Добавлено через 1 минуту
но походу ты с данными напутал что-то
1
5 / 5 / 2
Регистрация: 27.08.2011
Сообщений: 75
06.04.2012, 09:33  [ТС]
Цитата Сообщение от steel_tiger Посмотреть сообщение
но походу ты с данными напутал что-то
Не работает что-то. И ошибку я не могу увидеть
Вложения
Тип файла: rar TestProj.rar (40.5 Кб, 4 просмотров)
0
5 / 5 / 2
Регистрация: 27.08.2011
Сообщений: 75
06.04.2012, 09:39  [ТС]
И еще вопрос про добавление записи возникает сразу: используя компоненты TDBLookupComboBox делаю "набор" данных для занесения в БД. Настраиваю их (наверное правильно ), как будет выглядеть процедура добавления? Я так подозреваю, что-то типа этого:
Delphi
1
2
3
4
5
procedure TForm1.Button4Click(Sender: TObject);
begin
  ADOQuery2.SQL.Text := 'INSERT INTO User_Table (FIO) VALUES ('+ QuotedStr(Edit2.Text) + ')';
  ADOQuery2.ExecSQL;
end;
Но в главной таблице хранятся только индексы. Как это осуществить?
0
45 / 44 / 2
Регистрация: 06.02.2012
Сообщений: 147
06.04.2012, 09:56

у тебя дома с id 5,7 относятся к одной улице (id_street = 1).
ясен пень, что города и улицы будут одинаковы!
1
5 / 5 / 2
Регистрация: 27.08.2011
Сообщений: 75
06.04.2012, 21:46  [ТС]
Цитата Сообщение от steel_tiger Посмотреть сообщение
у тебя дома с id 5,7 относятся к одной улице (id_street = 1).
Да это понятно, это я специально сделал, чтобы посмотреть. Посмотри, при этом запросе все города - Томск, все улицы - Академический получились.

Добавлено через 4 часа 32 минуты
Короче при выборе из таблицы, у Сидорова (по-моему) должен быть город Петербург
0
5 / 5 / 2
Регистрация: 27.08.2011
Сообщений: 75
07.04.2012, 22:12  [ТС]
Так, с этой проблемой справился
А как осуществить запись, используя TADOQuery в связанные таблицы?
Что-то ума не приложу
Вложения
Тип файла: rar TestProj.rar (45.9 Кб, 7 просмотров)
0
Надоела реклама? Зарегистрируйтесь и она исчезнет полностью.
raxper
Эксперт
30234 / 6612 / 1498
Регистрация: 28.12.2010
Сообщений: 21,154
Блог
07.04.2012, 22:12

Необходимо чтобы названия из файла отображались списком в ComboBox
доброго времени суток! помогите пожалуйста новичку с задачей. задача такова: есть ComboBox, Edit и текстовый файл следующего...

Как сделать, чтобы в заголовках отображались даты, а в полях результаты? Можно ли так сделать?
Как сделать чтобы в заголовках отображались даты а в полях результаты можно ли так сделать?

Как сделать чтобы в запросе отображались TOP100?
собственно сабж, есть определенный рейтинг продаж по сумму продаж, как сделать чтобы вывод был определенного числа значений? .... вот

Как сделать чтобы в календаре отображались праздники
Всем привет))) Не могу разобраться с WEB- приложением. Очень нужна помощь. Есть приложение "Календарь", хочу сделать так чтобы...

Как сделать чтобы картинки не отображались в низ?
Исполняемый файл: function myavatars($userid){ $result = mysql_query("SELECT * FROM `avatars` WHERE `uid` = '$userid'"); ...


Искать еще темы с ответами

Или воспользуйтесь поиском по форуму:
34
Ответ Создать тему
Новые блоги и статьи
ИИ не может найти нужный язык в списке
Supersumestria 05.10.2026
Я ему даю вот такое изображение и прошу найти и подчеркнуть немецкий язык. Возвращает он вот это: https:/ / i. **********/ vqBWLe2. png Нужную строчку в 3й колонке просто выдумал. . Это. . .
Новая последняя моя музыка в SUNO
zorxor 05.10.2026
Здравствуйте, дорогие мои друзья! С большой радостью я хотел бы представить вам свою новую последнею музыку, которую сгенерировала мне по моей просьбе нейросеть SUNO. С уважением, zorxor. Это. . .
Программный домашний кинотеатр
russiannick 27.09.2026
Сподобился на программный домашний кинотеатр. В качестве ЯВУ по традиции выбрал js. В помощники взял Яндекс-Алису. Было создано три зала на разные интересы. исторические и ретро сериал Хичкок. . .
Беседа с ИИ о программистах, недопускающих к созданию и правке кода генеративные ИИ и причины этого
zorxor 21.09.2026
Раньше я радовался или получал некоторые эмоции, пусть небольшие, но всё же, от самого процесса написания кода, рекомпиляции и запуска, видя постепенное развитие программы и прочее. А теперь лень. . .
Мобильное приложение ColorStep
pavlinmavlin 17.09.2026
Реализовал приложение Красный, Зеленый, Синий в Unity3d + c#. Название изменил на ColorStep. Приложение прошло модерацию и теперь доступно для скачивания. Делал его сам, шаг за шагом — и вот,. . .
Запрет дублирования строк в табличной части
Maks 13.09.2026
Реализация из решения ниже выполнена на нетиповом справочнике "Нормы ТО" с табличной часть "Виды ТО", разработанного в КА2, со следующими реквизитами: - ВидТО (СправочникСсылка. ВидыТО); - ВидГСМ. . .
Скрипты Tampermonkey для CyberForum, ChatGPT, Claude и пр.
Jin X 06.09.2026
Скрипты Tampermonkey для CyberForum, ChatGPT, Claude и пр. Работая с форумом и нейросетями в браузере часто хочется что-то подкорректировать или добавить какого-то функционала. Ниже прикреплён. . .
Программа опроса у.з. расходомера SLS-720F
Argus19 02.09.2026
Программа опроса у. з. расходомера SLS-720F Программа опрашивает один раз в минуту три ультразвуковых расходомера SLS-720F через интерфейс RS-485 по протоколу Modbus RTU. Опрашиваются регистры. . .
КиберФорум - форум программистов, компьютерный форум, программирование
Powered by vBulletin
Copyright ©2000 - 2026, CyberForum.ru