dbgrideh 有字段 num1,num2, price total字段

dbgrideh 有字段 num1,num2,  price   total字段
如何实现 当输入 num1,num2,price 时 total 自动即时出结果（=(num1+num2)*price)
是不是用到timer 控件，怎么写呢？
如
procedure TForm1.Timer1Timer(Sender: TObject);
var
a,b,c,d:real;
begin
a:=strtofloat(adoQuery1.FieldByName('num1').AsString );
b:=strtofloat(adoQuery1.FieldByName('num2').AsString );
c:=strtofloat(adoQuery1.FieldByName('price').AsString );
d:=(a+b)*c;
adoQuery1.FieldByName('total').AsString:=floattostr(d);end;