Форум программистов, компьютерный форум, киберфорум
Delphi: Базы данных
Войти
Регистрация
Восстановить пароль
Блоги Сообщество Поиск Заказать работу  
 
 
Рейтинг 4.88/8: Рейтинг темы: голосов - 8, средняя оценка - 4.88
 Аватар для Comrade-Archer
0 / 0 / 1
Регистрация: 28.12.2018
Сообщений: 21
MS Access

Как лучше оформить/создать добавление нового значения в зависимые поля со списком?

14.03.2020, 17:56. Показов 2014. Ответов 21
Метки нет (Все метки)

Студворк — интернет-сервис помощи студентам
Всем доброго дня!
Делаю СУБД на основе access. Первоначально создал БД в самом access'e и там же сделал форму для нее форму для ввода данных. Выглядело это примерно вот так:

Там же в access'e настроил добавление зависимых друг от друга данных как видно на скриншоте сверху. Зависимые поля это Вид, специальность и задача, они выбираются поступательно, т.е. сначала выбирается вид, потом в зависимости от выбранного вида специальность, а затем в зависимости от специальности задача (ну, или по аналогии в интернете часто есть пример: страна и город, в зависимости от выбора страны) зависимость выглядит вот так:

В итоге получилось сделать форму в которой можно не только выбрать данные из выпадающего списка, но и добавить новые (как видно из первого скриншота с примером новой задачи)
Теперь, когда примерно представил как это все должно выглядеть, я начал разрабатывать форму в delphi. Но тут такое большое количество разных DBEdit'ов (DBLookUpComboBox, DBLookListBox), и читая описания к ним можно посчитать что каждый из них может подойти (некоторые ответы на форумах вообще предлагают работать с обычным Edit'ом)
Можете посоветовать, что и как лучше бы это оформить?
0
Programming
Эксперт
39485 / 9562 / 3019
Регистрация: 12.04.2006
Сообщений: 41,671
Блог
14.03.2020, 17:56
Ответы с готовыми решениями:

Добавление нового значения в поле со списком
Простейший случай! Есть две таблицы, одна "заказы", в которой через подстановку выбираются значения из второй - "агенты". ...

Добавление нового значения в зависимое поле со списком
Всем добрый день, возникла небольшая проблемка с добавлением нового значения в поле со списком в форме. Прописал уже готовую функцию для...

Как создать неизменяемый текстовый шаблон для каждого значения поля со списком?
Привет! прошу:sorry: помочь мне с решением данного вопроса. Я в этом мягко говоря "не специалист"... хотелось бы чтоб при выборе...

21
5989 / 4564 / 1096
Регистрация: 29.08.2013
Сообщений: 28,207
Записей в блоге: 3
24.03.2020, 20:08
Студворк — интернет-сервис помощи студентам
Цитата Сообщение от Comrade-Archer Посмотреть сообщение
Form4.Query_City.Insert; // не выполняется: ошибка "Field 'ID' cannot be modified."
  Form4.Query_City.FieldByName('Вид экспертизы').AsString := Form5.Edit1.Text;
  Form4.Query_City.Open;
  Form4.Query_City.Post;
меняй всю эту фигню на 1 SQL запрос
0
 Аватар для Comrade-Archer
0 / 0 / 1
Регистрация: 28.12.2018
Сообщений: 21
03.04.2020, 20:05  [ТС]
Цитата Сообщение от qwertehok Посмотреть сообщение
меняй всю эту фигню на 1 SQL запрос
А как можно это написать, не совсем понял. Есть какой-то запрос чтобы он привязывал внешний ключ, уже выбраный в LookUpCombobox'e?

Добавлено через 2 часа 58 минут
В Access'e я использовал такую вот команду:
Visual Basic
1
2
3
4
5
6
7
8
9
10
11
...
Dim rst As DAO.Recordset
...
Set db = CurrentDb()
Set rst = db.OpenRecordset("Город")
rst.AddNew
    rst("Код Страны") = Me.Страна // т.е. тут добавляется код страны автоматом
    rst("Город") = NewData
rst.Update
Response = acDataErrAdded
rst.Close
Как мне использовать такой аналог в delphi или в sql запросе?

Добавлено через 1 час 27 минут
дописал такую вот конструкцию, вроде работает, но не уверен что правильно :\
Delphi
1
2
Form4.Query_spec.FieldByName('Специальность').AsString := Form5.DBEdit1.Text;
Form4.Query_spec.fieldbyname('Код вида').AsInteger:= Form4.Query_vid.FieldByName('Код_vid').asInteger;
0
Надоела реклама? Зарегистрируйтесь и она исчезнет полностью.
inter-admin
Эксперт
29715 / 6470 / 2152
Регистрация: 06.03.2009
Сообщений: 28,500
Блог
03.04.2020, 20:05
Помогаю со студенческими работами здесь

Одномоментное добавление нового поля и его значения в таблицу Access
Уважаемые форумчане, добрый вечер! Цель: иметь возможность из формы по необходимости создать новое поле для связанной с формой таблицы...

Зависимые поля (список значений одного поля зависит от значения другого поля)
Здравствуйте, Уважаемые участники форума, изучив множество подобных вопросов на разных форумах, не смог найти для себя нужный вариант....

как лучше сделать поля со списком?
в документе есть несколько полей, где данные выбираются из списка. беда в том, что список вероятно будет меняться. До меня все эти списки...

Выбор значения из поля со списком, исходя из предыдущего поля со списком
Дана БД. Форма на добавление данных. Необходимо сделать следующее: 1) В поле "Свободно велосипедов" выводить значение из...

Как на форме при выборе значения из Поля со списком сделать автоматическое выведение значения в другое Поле?
Вечер добрый, господа. :curtsy: Требуется помощь ваша в MS Access, ибо самостоятельное изучение чуда сего происходит семимильными шагами...


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

Или воспользуйтесь поиском по форуму:
22
Ответ Создать тему
Новые блоги и статьи
Валидация и контроль данных табличной части документа перед записью
Maks 22.04.2026
Алгоритм из решения ниже реализован на примере нетипового документа, разработанного в КА2. Задача: контроль и валидация данных табличной части документа перед записью с учетом регламента компании. . .
Отчёт о затраченных материалах за определенный период с макетом печатной формы
Maks 21.04.2026
Отчёт из решения ниже размещён в конфигурации КА2. Задача: разработка отчёта по затраченным материалам за определённый период, с возможностью вывода печатной формы отчёта с шапкой и подвалом. В. . .
Отчёт о спецтехнике находящейся в ремонте
Maks 20.04.2026
Отчёт из решения ниже размещен в конфигурации КА2. Задача: отобразить спецтехнику, которая на данный момент находится в ремонте. Есть нетиповой документ "Заявка на ремонт спецтехники" который. . .
Памятка для бота и "визитка" для читателей "Semantic Universe Layer (Слой семантической вселенной)"
Hrethgir 19.04.2026
Сгенерировано для краткого описания по случаю сборки и компиляции скелета серверного приложения. И пусть после этого скажут, что статьи сгенерированные AI - туфта и не интересно. И это не реклама -. . .
Запрет удаления строк ТЧ документа при определённом условии
Maks 19.04.2026
Алгоритм из решения ниже реализован на примере нетипового документа "Аккумуляторы", разработанного в конфигурации КА2. У данного документа есть ТЧ, в которой в зависимости от прав доступа. . .
Модель заражения группы наркоманов
alhaos 17.04.2026
Условия задачи сформулированы тут Суть: - Группа наркоманов из 10 человек. - Только один инфицирован ВИЧ. - Колются одной иглой. - Колются раз в день. - Колются последовательно через. . .
Мысли в слух. Про "навсегда".
kumehtar 16.04.2026
Подумалось тут, что наверное очень глупо использовать во всяких своих установках понятие "навсегда". Это очень сильное понятие, и я только начинаю понимать край его смысла, не смотря на то что давно. . .
My Business CRM
MaGz GoLd 16.04.2026
Всем привет, недавно возникла потребность создать CRM, для личных нужд. Собственно программа предоставляет из себя базу данных клиентов, в которой можно фиксировать звонки, стадии сделки, а также. . .
КиберФорум - форум программистов, компьютерный форум, программирование
Powered by vBulletin
Copyright ©2000 - 2026, CyberForum.ru