delphi – 如何手动执行“OnCalcFields”事件？

假设我暂时想要在TClientDataSet上执行耗时的操作期间禁用OncalcFields事件(例如,通过设置cdsCalcFields：= nil).当我重新附加OncalcFields方法时,如何告诉TClientDataSet重新计算计算字段？

可能需要手动重新计算的另一种情况是某些计算字段取决于其他数据集的情况(例如,计算字段用于临时保存来自其他数据集的某些聚合值).这在大多数情况下都可以正常工作,因为OncalcFields事件的执行频率足以从其他数据集中获取正确的值.但在某些情况下,需要重新计算才能从其他数据集中获取正确的值.

将AutoCalcFields属性设置为False也可能会使您进入需要手动重新计算的某些情况.

我已经看到了关于如何减少OncalcFields事件执行的几个解释,但我找不到一个简单的方法来执行重新计算……

有什么建议？

解决方法

从数据库中检索记录时计算计算字段,因此请在数据集上调用Refresh(或Close – > Open)以强制重新计算.

(关于对问题的评论),要强制仅对一条记录进行重新计算,可以在数据集上调用RefreshRecord.如果特定数据集后代未实现该方法,则编辑后跟取消调用将实现相同.