如何在查询结果中增加一个计算字段

Question

如题。这个字段的计算方法比较复杂，不能直接在查询中用简单的运算表达式算出来。

Answer 1

我手动增加一个字段，如下：
      fld := TField.Create(self);
      fld.FieldName := '应付利息';
      Fields.Add(fld);
      Amount := 0;
      Interest := 0;
      First;
      fld.Value := CalcInterest(FieldByName('日期').AsDateTime,……)
可是最后赋值时提示错误：“cannot access field '应付利息' as type Variant”
是哪里出的问题呢？

Answer 2

fld.FieldName := 'YFLX'; 看看