DBEdit и DBGrid

@SpartanecLexa · Регистрация: 24.10.2012

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

Добрый день, есть таблица на форме2

в которую данные заношу с помощью DBEdit, на форме4

производятся расчеты из таблицы с формы2, и выводятся а DBEdit формы4

Delphi

procedure TForm4.Button1Click(Sender: TObject);
begin
DBEdit2.Text:= FloatToStr((StrToFloat(Form2.DBEdit2.Text))/((StrToFLoat(Form2.DBEdit3.Text))));
DBEdit3.Text:= FloatToStr((StrToFloat(Form2.DBEdit4.Text))/((StrToFLoat(Form2.DBEdit3.Text))));
DBEdit4.Text:= FloatToStr((StrToFloat(Form2.DBEdit5.Text))/((StrToFLoat(Form2.DBEdit3.Text))));
DBEdit5.Text:= FloatToStr((StrToFloat(Form2.DBEdit2.Text))/((StrToFLoat(Form2.DBEdit6.Text))));
DBEdit6.Text:= FloatToStr((StrToFloat(Form2.DBEdit2.Text))/((StrToFLoat(Form2.DBEdit7.Text))));
DBEdit1.Text:= FloatToStr((StrToFloat(Form2.DBEdit1.Text))*1 );
end;

Как мне рассчитанные данные из DBEdit, занести в DBGrid на форме4?

@Cold · 21.04.2017, 00:25

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

Как мне рассчитанные данные из DBEdit

С помощью Adoquery или ADOTable примерно так (НЕ ПРОВЕРЯЛ)

Delphi

1
2
3

adoquery.disablecontrols;
adoquery.fieldbyname['Имя поля'].Value := strtofloat(DBEdit2.Text)+strtofloat(DBEdit3.Text)+strtofloat(DBEdit4.Text).....
adoquery.enablecontrols;

Добавлено через 4 минуты
или можно через переменную

Delphi

var
res : real;
begin
res := strtofloat(DBEdit2.Text)+strtofloat(DBEdit3.Text)+strtofloat(DBEdit4.Text);
adoquery.disablecontrols;// adoquery.Active := false
adoquery.fieldbyname['Имя поля'].Value := res;
adoquery.enablecontrols;//adoquery.Active := true
end;

@krapotkin · 21.04.2017, 06:52

блин, да что ж такое
DBxxx - это компоненты, отображающие то, что хранит ваш датасет.
И присваивать в них ничего не нужно, и читать в программе, это интерфейс для ручного ввода
Все что вы делаете в программе, вы должны делать с полями вашей ADOTable или что еще там у вас

@D1973 · 21.04.2017, 12:27

Не по теме:

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

блин, да что ж такое

глас вопиющего в пустыне...

@krapotkin 5784 / 4526 / 1431 Регистрация: 14.04.2014 Сообщений: 20,157 Записей в блоге: 20
	21.04.2017, 06:52	3
	блин, да что ж такое DBxxx - это компоненты, отображающие то, что хранит ваш датасет. И присваивать в них ничего не нужно, и читать в программе, это интерфейс для ручного ввода Все что вы делаете в программе, вы должны делать с полями вашей ADOTable или что еще там у вас 0

@D1973
	21.04.2017, 12:27 DBEdit и DBGrid #4
	Не по теме: Сообщение от krapotkin блин, да что ж такое глас вопиющего в пустыне... 0

DBEdit и DBGrid

Решение