Saludos
Si entendi bien, sugiero ll siguiente.
El evento OnCalcField del dataset se implementa para esto
Código Delphi
[-]procedure TForm1.Table1CalcFields(DataSet: TDataSet);
begin
with Table1 do begin
FieldByName('Total').AsFloat:=FieldByName('Cantidad').Asfloat*FieldByName('Costo').AsFloat;
end;
end;