вот код:
Код:
procedure TForm10.Button1Click(Sender: TObject);
var tmp: single;
begin
tmp:=Form8.Table1.FieldByName('ГПП-7_ввод1_показания').Value;
Form8.Table1.Insert;
Form8.Table1.FieldByName('Дата').AsString:= MaskEdit1.Text;
Form8.Table1.FieldByName('ГПП-7_ввод1_показания').AsString:= Edit2.Text;
Form8.Table1.FieldByName('ГПП-7_ввод1_показания').Value:=1.8*(StrToFloat(Edit2.T ext)-tmp);
lmikle: Пользуемся тегами!!!
нужно чтоб из данных которые заносяться в ячейку "ГПП-7_ввод1_показания" вычитались предыдущие данные из этой же ячейки, т.е. из данных сегодняшнего числа данные вчерашнего числа, и умножались на 1,8.
Он работает но результат вычисления записывается в эту же калонку, а мне надо сделать так чтоб в этой колонке остались данные которые ввожу а результат записывался в колонку Form8.Table1.FieldByName('ГПП-7_ввод1_результат')