[NumLock]

Код:

Table2.FieldByName('Ostatok').AsInteger:=DBGrid1.DataSource.DataSet.FieldByName('Ostatok').AsInteger-100500;