Как в DBGrid добавить данные из Edit

@Aycen · Регистрация: 27.03.2013

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

Подскажите пожалуйста, как в DBGrid добавить данные из Edit?
Есть Form1, на которой расположены ADOConnection, ADOQuery, DataSource и DBGrid.
База подключена из SQL Server.
На Form2 расположены пустые Edit-ы для заполнения.
И нужно чтоб при нажатии на Form2 кнопки "Добавить" в Form1.DBGrid добавлялась новая строка с данными из Edit-ов в соответствующие столбцы.

@Luckycat · 28.04.2013, 19:22

SQL

1 2	INSERT INTO имя_таблицы(колонка1,колонка2,колонка3) VALUES ("'+Edit1.text+'","'+Edit2.text+'","'+Edit3.text+'")

Вот такой вот запрос ван нужно будет реализовать с вашей таблицей и компанентами.
Не забудьте закрыть,очистить, открыть и вставить старый запрос в квери!

@MyBordOf · 28.04.2013, 19:29

Delphi

procedure TForm2.Button1Click(Sender: TObject);
    begin
            try
            ADOQuery1.Insert;
            ADOQuery1['Fio']:=edit1.Text;
            ADOQuery1['Nzach']:=edit2.Text;
            ADOQuery1.Post;
            except
        ShowMessage('Ошибка сохранения');
            end;
        ShowMessage('Сохранено');
    end;

@Aycen · 28.04.2013, 19:49 **[ТС]**

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

procedure TForm2.Button1Click(Sender: TObject);
begin
try
ADOQuery1.Insert;
ADOQuery1['Fio']:=edit1.Text;
ADOQuery1['Nzach']:=edit2.Text;
ADOQuery1.Post;
except
ShowMessage('Ошибка сохранения');
end;
ShowMessage('Сохранено');
end;

и как связать с 1 формой

Добавлено через 14 секунд

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

procedure TForm2.Button1Click(Sender: TObject);
begin
try
ADOQuery1.Insert;
ADOQuery1['Fio']:=edit1.Text;
ADOQuery1['Nzach']:=edit2.Text;
ADOQuery1.Post;
except
ShowMessage('Ошибка сохранения');
end;
ShowMessage('Сохранено');
end;

и как связать с 1 формой

@MyBordOf · 28.04.2013, 20:19

Нужно приписать к ADOQuery форму 1
Добавлено через 3 минуты

Delphi

procedure TForm2.Button1Click(Sender: TObject);
begin
 
 try
 Form1.ADOQuery1.Insert;
 Form1.ADOQuery1['Фио']:=edit1.Text;
 Form1.ADOQuery1['Адрес']:=edit2.Text;
 Form1.ADOQuery1.Post;
 except
 ShowMessage('Ошибка сохранения);
 end;
 ShowMessage('Сохранено);
end;
 
end.

@MyBordOf · 28.04.2013, 20:29

Можно создать такую панель. DBNavigator.
Указать в свойстве DataSourse подключение, какое вам надо. И можно добавлять прям в таблицу)
это гораздо экономичнее, чем загружать программу формами

@Aycen · 28.04.2013, 20:43 **[ТС]**

Спасиб

Добавлено через 8 минут
еще редактирование тож так делается да???

@MyBordOf · 28.04.2013, 22:17

Aycen, да)

@Aycen 1 / 1 / 0 Регистрация: 27.03.2013 Сообщений: 30
		1
	Как в DBGrid добавить данные из Edit 28.04.2013, 18:40. Показов 2074. Ответов 7 Метки нет (Все метки) Подскажите пожалуйста, как в DBGrid добавить данные из Edit? Есть Form1, на которой расположены ADOConnection, ADOQuery, DataSource и DBGrid. База подключена из SQL Server. На Form2 расположены пустые Edit-ы для заполнения. И нужно чтоб при нажатии на Form2 кнопки "Добавить" в Form1.DBGrid добавлялась новая строка с данными из Edit-ов в соответствующие столбцы. 0

@Aycen 1 / 1 / 0 Регистрация: 27.03.2013 Сообщений: 30
	28.04.2013, 19:49 [ТС]	4
	Сообщение от MyBordOf procedure TForm2.Button1Click(Sender: TObject); begin try ADOQuery1.Insert; ADOQuery1['Fio']:=edit1.Text; ADOQuery1['Nzach']:=edit2.Text; ADOQuery1.Post; except ShowMessage('Ошибка сохранения'); end; ShowMessage('Сохранено'); end; и как связать с 1 формой Добавлено через 14 секунд Сообщение от MyBordOf procedure TForm2.Button1Click(Sender: TObject); begin try ADOQuery1.Insert; ADOQuery1['Fio']:=edit1.Text; ADOQuery1['Nzach']:=edit2.Text; ADOQuery1.Post; except ShowMessage('Ошибка сохранения'); end; ShowMessage('Сохранено'); end; и как связать с 1 формой 0

@MyBordOf 0 / 0 / 1 Регистрация: 27.04.2013 Сообщений: 75
	28.04.2013, 20:29	6
	Можно создать такую панель. DBNavigator. Указать в свойстве DataSourse подключение, какое вам надо. И можно добавлять прям в таблицу) это гораздо экономичнее, чем загружать программу формами Миниатюры 0

@Aycen 1 / 1 / 0 Регистрация: 27.03.2013 Сообщений: 30
	28.04.2013, 20:43 [ТС]	7
	Спасиб Добавлено через 8 минут еще редактирование тож так делается да??? 0

@MyBordOf 0 / 0 / 1 Регистрация: 27.04.2013 Сообщений: 75
	28.04.2013, 22:17	8
	Aycen, да) 0

Опции темы