![]() |
|
|
#1
|
|||
|
|||
|
вот код:
Код:
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_результат') |
|
#2
|
|||
|
|||
|
Я не совсем понял в чем проблема, но ее решение кроется в последней строке. Зачем ты помещаешь результат туда? Помещай его туда куда тебе надо - Form8.Table1.FieldByName('ГПП-7_ввод1_результат') Ты же сохраняешь в Form8.Table1.FieldByName('ГПП-7_ввод1_показания')
![]() |