0 / 0 / 0
Регистрация: 14.02.2017
Сообщений: 86

Учет недвижимости: связь полей базы с combobox и edit

15.02.2017, 14:39. Показов 4604. Ответов 101
Метки нет (Все метки)

Студворк — интернет-сервис помощи студентам
Ув. форумчане, вообщем делаю програму для агентства недвижимости, оболочка сама готова, базу подтягивает в DBgrid с MS ACCESS. Мораль сей басни такова что необходимо как то связать ячейки с данными которые мне выводит в дбгрид (ну тобиш ексесовская база)с полями ввода combobox и edit'ами, чтоб была возможность редактировать, искать, удалять и создавать новый обьект, в делфи новичок, опыта нету. Буду очень благодарен за оказанную помощь. Заранее спасибо!
0
IT_Exp
Эксперт
34794 / 4073 / 2104
Регистрация: 17.06.2006
Сообщений: 32,602
Блог
15.02.2017, 14:39
Ответы с готовыми решениями:

Связь edit и combobox
Здравствуйте! Возможно посоветуете и другие варианты решения) У меня есть база данных на акцессе, каждому наименованию соответствует...

Связь между ListBox, Edit, ComboBox
Граждане нужна Ваша помощь!!! При Вводе текста в Edit В зависимости какой ListBox выбран в ComboBox текст стаёт заданный ListBox. ...

Запись в файл из полей Edit и проверка Edit на пустоту
TForm1 *Form1; int Ext=0; int i; //--------------------------------------------------------------------------- __fastcall...

101
W
 Аватар для kavasaka
115 / 115 / 33
Регистрация: 16.04.2013
Сообщений: 750
21.02.2017, 14:57
Студворк — интернет-сервис помощи студентам
посмотри в личных сообщениях. у меня вопрос к тебе есть.
Цитата Сообщение от andreypoltava17 Посмотреть сообщение
извини немного не понял тебя, открыл твою базу юзеров не вижу там в таблице USERS
по идее 'kod' оно называется.
0
0 / 0 / 0
Регистрация: 14.02.2017
Сообщений: 86
21.02.2017, 15:17  [ТС]
сделал так

Form1.ADOTable1.FieldByName('k_user').As Integer := aq_USER.FieldByName('kod').AsInteger;

та ж петрушка
0
W
 Аватар для kavasaka
115 / 115 / 33
Регистрация: 16.04.2013
Сообщений: 750
21.02.2017, 15:29
закоментарь на время все строки в процедуре кнопки.
и проверь значение aq_USER.FieldByName('k_user').AsInteger, поставь строку :
Delphi
1
showmessage(IntTostr(aq_USER.FieldByName('kod').AsInteger));
подозреваю или aq_USER у тебя в недоступном для кнопки месте лежит,
или его вообще нет в проекте, или.. еще какие варианты
0
0 / 0 / 0
Регистрация: 14.02.2017
Сообщений: 86
21.02.2017, 15:36  [ТС]
я тоже грешу что aq_user чтото не але(((((( а если я тебе скину всю ету хрень тебе ж так проще будет глянуть?)
0
W
 Аватар для kavasaka
115 / 115 / 33
Регистрация: 16.04.2013
Сообщений: 750
21.02.2017, 15:43
ну да, только базу мне надо в mdb.
еще а тексте процедур когда '.' набираешь должен список параметров вываливаться - значит элемент доступен процедуре.
и при наезде мышью всплывает окошко с именем модуля где находится элемент. Если нет - значит что-то не так.
Миниатюры
Учет недвижимости: связь полей базы с combobox и edit  
0
W
 Аватар для kavasaka
115 / 115 / 33
Регистрация: 16.04.2013
Сообщений: 750
21.02.2017, 16:02
а чтобы компонент из ДМ был виден - ставлю имя юнита ДМ (и прочих из которых задействуем компоненты или переменные) вот сюда:
Миниатюры
Учет недвижимости: связь полей базы с combobox и edit  
0
0 / 0 / 0
Регистрация: 14.02.2017
Сообщений: 86
21.02.2017, 16:02  [ТС]
лови дружище))) хоть посмеешся с меня )))
Вложения
Тип файла: rar base.rar (533.2 Кб, 6 просмотров)
0
W
 Аватар для kavasaka
115 / 115 / 33
Регистрация: 16.04.2013
Сообщений: 750
21.02.2017, 16:28
в ADOConnection1 в ConnectionString пиши ...Source=K_BAZA.mdb... вместо полного пути. А то в другой папке или на другом компе, если там путь не такой не будет к базе подсоединяться. (это так просто..)

А ругается потому что в aq_user свойство SQL пустое. Там должен быть текст SQL запроса. А нет запроса нет и полей вот и ругается. (Для проверки работы aq_user его Active ставишь в True, ругаться не должен). На SQL есть [...] вот ту да и запрос пишется.
0
0 / 0 / 0
Регистрация: 14.02.2017
Сообщений: 86
21.02.2017, 16:31  [ТС]
kavasaka, а какой sql запрос там должен быть?
0
W
 Аватар для kavasaka
115 / 115 / 33
Регистрация: 16.04.2013
Сообщений: 750
21.02.2017, 16:42
А вот если ты еще где-то как-то какой-то пример найдешь, ты его тоже просто в свою папку с проектом как он есть свалишь, типа вдруг оно там само срастется? В проекте должен быть один mdb фник (база), а в нем уже куча таблиц.
0
0 / 0 / 0
Регистрация: 14.02.2017
Сообщений: 86
21.02.2017, 16:43  [ТС]
подье...?))
0
W
 Аватар для kavasaka
115 / 115 / 33
Регистрация: 16.04.2013
Сообщений: 750
21.02.2017, 17:00
Цитата Сообщение от andreypoltava17 Посмотреть сообщение
а какой sql запрос там должен быть?
SELECT USERS.* FROM USERS;

Добавлено через 15 минут
И ADOConnection доджен быть один подключенный к одной базе. А adoTable и ADOQuery несколько..
0
0 / 0 / 0
Регистрация: 14.02.2017
Сообщений: 86
22.02.2017, 14:37  [ТС]
короче вообще запутался, теперь даже базу на главной форме не отображает дбгрид))

Добавлено через 12 минут
вообще прикол, обьект получается добавляется в саму базу ексеса а в дб грид никаких данных не отображается(((

Добавлено через 21 минуту
дружище помоги пожалуйста ето в кучу склеять)))

Добавлено через 24 минуты
у меня тупо DataSource не видит DataSet(((((( поле пустое
0
2 / 2 / 0
Регистрация: 23.05.2015
Сообщений: 43
23.02.2017, 09:33
Посмотри вот этот курс. Там все работает (кроме переключателей)

http://www.intuit.ru/studies/courses/614/470/info
0
0 / 0 / 0
Регистрация: 14.02.2017
Сообщений: 86
23.02.2017, 22:29  [ТС]
mishk2norushck2, большое спасибо

Добавлено через 10 часов 26 минут
фух с редактированием разобрался, помогите теперь пожалуйста с поиском. Ну чтоб искало через комбобокс обьекты указанные в дбгриде или может там не через комбобокс)
0
W
 Аватар для kavasaka
115 / 115 / 33
Регистрация: 16.04.2013
Сообщений: 750
27.02.2017, 16:25
Цитата Сообщение от andreypoltava17 Посмотреть сообщение
помогите теперь пожалуйста с поиском
тебе скорее фильтр нужен а не поиск. Посмотри в #3: Фильтр в БД
Там датасет это твой ADOTable1.
0
2 / 2 / 0
Регистрация: 23.05.2015
Сообщений: 43
27.02.2017, 19:02
andreypoltava17, в курсе который я советовала есть поиск по фамилии, правда только через поле ввода но там нужно только свойство компонента поменять...
0
0 / 0 / 0
Регистрация: 14.02.2017
Сообщений: 86
27.02.2017, 20:10  [ТС]
спасибо уже разобрался)) Кавасака пропажа) куда пропадал?))) ты если можеш пожалуйста помоги с правами доступа, все остальное я уже сделал
0
28.02.2017, 09:05

Не по теме:


Цитата Сообщение от andreypoltava17 Посмотреть сообщение
куда пропадал?
выходные на 23е +корпоратив +отходняк, вот к 28му вроде очухался:))

0
0 / 0 / 0
Регистрация: 14.02.2017
Сообщений: 86
28.02.2017, 13:15  [ТС]
skavasaka, привет) помоги с пользователями разобратся? запутался)
0
Надоела реклама? Зарегистрируйтесь и она исчезнет полностью.
BasicMan
Эксперт
29316 / 5623 / 2384
Регистрация: 17.02.2009
Сообщений: 30,364
Блог
28.02.2017, 13:15

Учет изменения полей (перенос содержимого полей) с сохранением даты изменения (автомат)
Добрый вечер, Появилась задача, которую я условно делю на несколько: 1. Перенос значения поля в другое при изменении этого или...

Кнопка: сохранить данные с Edit, скопировать файл (картинку) и переименовать новый файл из одного из полей edit
Помогите дописать для кнопки такое: по состоянию компонента CheckBox копировать определеный файл и давать ему название например из поля...

Получить список таблиц, полей и описание полей базы данных
Добрый день! подскажите как можно получить список таблиц, полей и описание полей базы данных?

Удаление неиспользуемых полей из списка полей базы
<quote>Удаление неиспользуемых полей базы в инспекторе дизайнера В Lotus Designer есть одна неудобная штука. Если Вы удалили поле, то...

Edit Label (линейный) Panel, Edit Label (строки), Memo (одномер-ный),ComboBox ListBox , RadioButton (RadioGroup) CheckBox ,StringGrid (ввод пароля)
1)Edit Label (линейный) Panel Проверить истинность высказывания: "Цифры данного трехзначного числа образуют возрастающую...


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

Или воспользуйтесь поиском по форуму:
100
Ответ Создать тему
Опции темы

Новые блоги и статьи
Скрипты 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. Опрашиваются регистры. . .
Hyper-V: Компьютер должен поддерживать доверенный платформенный модуль 2.0.
Maks 31.08.2026
При установке Windows 11 на виртуальную машину Hyper-V 2-го поколения вылезла такая ошибка: Решение: в параметрах виртуальной машины, в разделе "Безопасность" (Security) активировать флаг. . .
Архитектура биовида Стива в Майнкрафте: Зачем бонобо кубический каннибализм
anaschu 30.08.2026
Кубический Вагинокапитализм в Minecraft: Математический инвариант ОДУ и рок Стивов-бонобо Главная задача разработанной «Модели Всего» — наглядно продемонстрировать наличие системной «судьбы». . .
Оттачиваю умение писать js программы.
russiannick 30.08.2026
Проектом выходного дня стало написание Книги шифров Виженера. Итогом стала версия 200, синий туман. Синий туман назван так, потому что замораживает текст под собой. Нажатие синих кнопок управляют. . .
мат медиц модель 30. презентация проекта
anaschu 27.08.2026
хоп хоп хоп хидахоп, а я кладую))
Как у меня протекала болезнь
zorxor 27.08.2026
Здравствуйте, друзья! Эта запись блога предназначена именно для вас - для моих дорогих друзей, которые знали меня лично. Чтобы ответить на вопрос - а что же со мной произошло на самом деле? Я учился. . .
Нашел вот забавное видео о измерениях. Лучшее что я видел на эту тему
kumehtar 26.08.2026
ILETXiw9bMQ Основная суть и тезисы по измерениям: 0D (Нулевое измерение): точка, не имеющая длины, ширины, высоты или объема. Объект не может перемещаться в 0D. 1D (Первое измерение):. . .
КиберФорум - форум программистов, компьютерный форум, программирование
Powered by vBulletin
Copyright ©2000 - 2026, CyberForum.ru