Отправить данные из Edit в Access

@Vongud · Регистрация: 02.02.2013

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

Как можно внести данные с формы Delphi (из edit) в базу access и именно в определённую таблицу базы? Есть 6 Edit и 4 таблицы. У меня имя базы пишет, что идентификатор не определен. Форма в приложении не главная.

@InterA · 30.05.2014, 22:55

Впиши на процедуру нажатия кнопки

Delphi
1
2
3
4
5
6
7
ADOQuery1.edit;
ADOQuery1.insert;
ADOQuery1.FieldByName('название первой таблицы').AsString:=Edit1.Text; //Внесет текст в конкретную таблицу access из Edit1 
ADOQuery1.FieldByName('название второй таблицы').AsString:=Edit2.Text; //Внесет текст в конкретную таблицу access из Edit2 
ADOQuery1.post; //сохранение внесенной информации
Edit1.Text:=''; //обнулит текст Edit1
Edit2.Text:='';//обнулит текст Edit2

@northener · 31.05.2014, 02:11

Сообщение от Vongud

Как можно внести данные с формы Delphi (из edit) в базу access и именно в определённую таблицу базы? Есть 6 Edit и 4 таблицы. У меня имя базы пишет, что идентификатор не определен. Форма в приложении не главная.

Ну прям "Пойди туда, не знаю куда. Скажи мне то, не знаю что".
И ты в самом деле думаешь что на такой вопрос можно дать точный ответ? Хоть бы свой код привёл, пусть даже он и не твой.

@Vongud · 31.05.2014, 20:24 **[ТС]**

А ADOQuery1 объявлять не нужно? А то пишет Undeclared identifier: 'ADOQuery1'. И как, если можно, опишите пожалуйста.

Добавлено через 49 секунд
Да, и ведь названия полей то тоже нужно писать.

Добавлено через 7 минут
Ну теперь это код (был немного другой):

Pascal
1
2
3
4
5
6
7
8
9
10
11
ADOQuery1.edit;
ADOQuery1.insert;
ADOQuery1.FieldByName('Врачи').AsString:=Edit1.Text; //Внесет текст в конкретную таблицу access из Edit1
ADOQuery1.FieldByName('Врачи').AsString:=Edit2.Text; //Внесет текст в конкретную таблицу access из Edit2
ADOQuery1.FieldByName('Врачи').AsString:=Edit3.Text;
ADOQuery1.FieldByName('Врачи').AsString:=Edit4.Text;
ADOQuery1.FieldByName('Врачи').AsString:=Edit5.Text;
ADOQuery1.FieldByName('Врачи').AsString:=Edit6.Text;
ADOQuery1.post; //сохранение внесенной информации
Edit1.Text:=''; //обнулит текст Edit1
Edit2.Text:='';//обнулит текст Edit2

Врачи-это таблица

@InterA · 31.05.2014, 21:00

DBGrid нужно соеденить с вашей базой данных. для этого на форме нужно разместитьь DBGrid, ADOQuery, ADOConnection, DataSource
Данные компоненты Вы можете найти во вкладках ADO,DataAccess,DataControls
Далее нужно эти компоненты настроить. В ADOConnection в свойствах находите ConnectionString. Настраиваете его на Microsoft Jet 4.0 OLE DB Provider , жмете далее и указываете путь к вашей БД.

В свойствах ADOQuery ищем Connection и в выпадающем списке выбираем наш ADOConnection
Затем в DataSource в свойствах ищем DataSet и указываем ADOQuery.

@Vongud · 31.05.2014, 21:04 **[ТС]**

так это у меня уже сделано в главной форме. а вот добавить данные в базу нужно не из главной формы.

@InterA · 31.05.2014, 21:26

так как ADOquery находится на главной форме, а ты обращаешься к ней с другой формы, то указывай, что ты обращаешься именно к ADOquery на главной форме

Delphi
1
2
3
Form1.ADOQuery1.edit;
Form1.ADOQuery1.insert;
Form1.ADOQuery1.FieldByName('Врачи').AsString:=Edit1.Text;

Добавлено через 16 минут
а можно еще уточнить?
Врачи - это целая таблица с колонками?) я по ходу не так выразился.

Form1.ADOQuery1.FieldByName('Врачи').AsS tring:=Edit1.Text; добавит текст из эдита в конкретную колонку, допустим в таблице врачи есть колонки Имя, Фамилия и тд.
так вот данная запись добавит из Эдита текст в колонку с именем
Form1.ADOQuery1.FieldByName('Имя').AsStr ing:=Edit1.Text;

@Vongud · 31.05.2014, 21:29 **[ТС]**

уже на первой строке пишет, что идентификатор не определён ADOQuery. Типа переменной такой нет. а как её объявлять и зачем/почему?

Добавлено через 3 минуты
Врачи-это таблица. В ней есть поля (как вы сказали, имя, фамилия и т д) так вот нужно из определённого эдита добавить в определённое поле данные. а вся база-это больница. там есть пациенты, врачи, палаты.

@InterA · 31.05.2014, 21:40

А может у Вас компонент назван по другому не ADOQuery1, а qry1 или ADOqry1 или чтото подобное

@Vongud · 31.05.2014, 22:15 **[ТС]**

Да вроде так и зовётся.

@InterA · 01.06.2014, 00:57

Так у вас DBEditы стоят а не просто editы и вы используете ADOTAble, который находится на datamodule2.
на кнопку "применить" достаточно этого.

Delphi
1
2
3
4
procedure TFEditDoctors.Button2Click(Sender: TObject);
begin
DataModule2.TDoctors.Insert;
end;

Наверняка понадобится еще и удалять строки, для этого на кнопку "удалить" писать надо DataModule2.TDoctors.delete;

DataModule2.TDoctors.post - будет сохранять записи в БД

Добавлено через 27 минут

@Cold · 02.06.2014, 13:27

А через DBEdit не пробывал?

@Zil · 02.06.2014, 19:00

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

@Vongud · 03.06.2014, 13:22 **[ТС]**

Ага, спасибо всем. Оказывается нужно было всё добавлять через модуль данных. А разве сильно отличается DBEdit от простого Edita?

@InterA · 03.06.2014, 21:01

DBedit можно связывать прямо с базой данных в свойствах. просто Edit нет.

@Zil · 04.06.2014, 04:49

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

@tarasov81 · 07.07.2014, 14:48

Все прописал как вы написали но выдает ошибку

Новые блоги и статьи Все статьи Все блоги /
SDL3 для Desktop (MinGW): Рисуем цветные прямоугольники с помощью рисовальщика SDL3 на Си и C++ 8Observer8 17.03.2026 Содержание блога Финальные проекты на Си и на C++: finish-rectangles-sdl3-c. zip finish-rectangles-sdl3-cpp. zip	Символические и жёсткие ссылки в Linux. algri14 15.03.2026 Существует два типа ссылок — символические и жёсткие. Ссылка в Linux — это запись в каталоге, которая может указывать либо на inode «файла-ИСТОЧНИКА», тогда это будет «жёсткая ссылка» (hard link),. . .	[Owen Logic] Поддержание уровня воды в резервуаре количеством включённых насосов: моделирование и выбор регулятора ФедосеевПавел 14.03.2026 Поддержание уровня воды в резервуаре количеством включённых насосов: моделирование и выбор регулятора ВВЕДЕНИЕ Выполняя задание на управление насосной группой заполнения резервуара,. . .	делаю науч статью по влиянию грибов на сукцессию anaschu 13.03.2026 прикрепляю статью
SDL3 для Desktop (MinGW): Создаём пустое окно с нуля для 2D-графики на SDL3, Си и C++ 8Observer8 10.03.2026 Содержание блога Финальные проекты на Си и на C++: hello-sdl3-c. zip hello-sdl3-cpp. zip Результат:	Установка CMake и MinGW 13.1 для сборки С и C++ приложений из консоли и из Qt Creator в EXE 8Observer8 10.03.2026 Содержание блога MinGW - это коллекция инструментов для сборки приложений в EXE. CMake - это система сборки приложений. Здесь описаны базовые шаги для старта программирования с помощью CMake и. . .	Как дизайн сайта влияет на конверсию: 7 решений, которые реально повышают заявки Neotwalker 08.03.2026 Многие до сих пор воспринимают дизайн сайта как “красивую оболочку”. На практике всё иначе: дизайн напрямую влияет на то, оставит человек заявку или уйдёт через несколько секунд. Даже если у вас. . .	Модульная разработка через nuget packages DevAlt 07.03.2026 Сложившийся в . Net-среде способ разработки чаще всего предполагает монорепозиторий в котором находятся все исходники. При создании нового решения, мы просто добавляем нужные проекты и имеем. . .

@Vongud 0 / 0 / 0 Регистрация: 02.02.2013 Сообщений: 39

	Отправить данные из Edit в Access 30.05.2014, 17:54. Показов 8678. Ответов 16 Метки нет (Все метки) Как можно внести данные с формы Delphi (из edit) в базу access и именно в определённую таблицу базы? Есть 6 Edit и 4 таблицы. У меня имя базы пишет, что идентификатор не определен. Форма в приложении не главная. 0

@InterA 3 / 3 / 3 Регистрация: 14.03.2014 Сообщений: 18
	31.05.2014, 21:00
	DBGrid нужно соеденить с вашей базой данных. для этого на форме нужно разместитьь DBGrid, ADOQuery, ADOConnection, DataSource Данные компоненты Вы можете найти во вкладках ADO,DataAccess,DataControls Далее нужно эти компоненты настроить. В ADOConnection в свойствах находите ConnectionString. Настраиваете его на Microsoft Jet 4.0 OLE DB Provider , жмете далее и указываете путь к вашей БД. В свойствах ADOQuery ищем Connection и в выпадающем списке выбираем наш ADOConnection Затем в DataSource в свойствах ищем DataSet и указываем ADOQuery. 1

@Vongud 0 / 0 / 0 Регистрация: 02.02.2013 Сообщений: 39
	31.05.2014, 21:04 [ТС]
	так это у меня уже сделано в главной форме. а вот добавить данные в базу нужно не из главной формы. 0

@Vongud 0 / 0 / 0 Регистрация: 02.02.2013 Сообщений: 39
	31.05.2014, 21:29 [ТС]
	уже на первой строке пишет, что идентификатор не определён ADOQuery. Типа переменной такой нет. а как её объявлять и зачем/почему? Добавлено через 3 минуты Врачи-это таблица. В ней есть поля (как вы сказали, имя, фамилия и т д) так вот нужно из определённого эдита добавить в определённое поле данные. а вся база-это больница. там есть пациенты, врачи, палаты. 0

@InterA 3 / 3 / 3 Регистрация: 14.03.2014 Сообщений: 18
	31.05.2014, 21:40
	А может у Вас компонент назван по другому не ADOQuery1, а qry1 или ADOqry1 или чтото подобное 0

@Cold 87 / 87 / 65 Регистрация: 22.05.2014 Сообщений: 485
	02.06.2014, 13:27
	А через DBEdit не пробывал? 0

@Vongud 0 / 0 / 0 Регистрация: 02.02.2013 Сообщений: 39
	03.06.2014, 13:22 [ТС]
	Ага, спасибо всем. Оказывается нужно было всё добавлять через модуль данных. А разве сильно отличается DBEdit от простого Edita? 0

@InterA 3 / 3 / 3 Регистрация: 14.03.2014 Сообщений: 18
	03.06.2014, 21:01
	DBedit можно связывать прямо с базой данных в свойствах. просто Edit нет. 0

@Zil 23 / 23 / 5 Регистрация: 30.04.2012 Сообщений: 75
	04.06.2014, 04:49
	Да, но использование таких "прямых" связей часто вредит, поэтому лучше просто писать правильный код самому. 0

@tarasov81 0 / 0 / 0 Регистрация: 05.07.2014 Сообщений: 7
	07.07.2014, 14:48
	Все прописал как вы написали но выдает ошибку Миниатюры 0

Отправить данные из Edit в Access

Решение