type TFDDataSetHelper = class helper for TFDDataSet
public
procedure InternalCalc;
end;
implementation
uses FireDAC.DatS;
{ TFDDataSetHelper }
procedure TFDDataSetHelper.InternalCalc;
var
oRow: TFDDatSRow;
begin
oRow := GetRow(ActiveBuffer);
oRow.ForceChange(rsCalculating);
end;
and use the unit then, after any of the fields change that the internal calculated fields rely on, call:
TFDDataSet(dataset).InternalCalc;