[matroskin24]

вот код:

Код:

1 2 3 4 5 6 7 8

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_результат')

[zerg]

Я не совсем понял в чем проблема, но ее решение кроется в последней строке. Зачем ты помещаешь результат туда? Помещай его туда куда тебе надо - Form8.Table1.FieldByName('ГПП-7_ввод1_результат') Ты же сохраняешь в Form8.Table1.FieldByName('ГПП-7_ввод1_показания')