Как посчитать сумму по столбцу TFDMemTable?

bnet
Дата: 23.07.2019 20:06:06
Дельфи 10.3, есть таблица:
 
DocTable: TFDMemTable;

with DocTable do
 begin
   with FieldDefs do
   begin
     Clear;
     Add('NAME', ftString, 255);
     Add('Price', ftFloat, 0);
     Add('Count', ftFloat, 0);
     Add('Summa', ftFloat, 0);
   end;


При изменении таблицы нужно в edit вывести общую сумму

в свойствах TFDMemTable добавил аггрегат
  Edit1.Text := VarToStr(DocTable.Aggregates[0].Value);

но результат всегда null

подскажите как правильно
DimaBr
Дата: 23.07.2019 21:10:06
отсюда
with FDMemTable1.Aggregates.Add do begin
  Expression := 'sum(sal + bonus)';
  Active := True;
end;
with FDMemTable1.Aggregates.Add do begin
  Expression := 'sum(sal + bonus)';
  IndexName := 'by_deps';
  Active := True;
end;
FDMemTable1.IndexName := 'by_deps';
FDMemTable1.AggregatesActive := True;

Label1.Caption := 'Total payments : ' + VarToStr(FDMemTable1.Aggregates[0].Value);
Label2.Caption := 'Current department payments : ' + VarToStr(FDMemTable1.Aggregates[1].Value);
bnet
Дата: 23.07.2019 21:30:56
у меня не работает
bnet
Дата: 24.07.2019 16:48:15
Решил.
DocTable.Aggregates.Items[0].BeginUpdate;